You know in reading this exchange, all I can think is that it would be
far easier to make the access db a data source and do the whole thing
in CF. For all the effort put into this so far, you could probably
have this completed in CF in far less time.

On Wed, Aug 18, 2010 at 10:39 AM, Jerry Barnes <critic...@gmail.com> wrote:
>
> "Also, when I add a new record, again the name in the combo box does
> not change. It should be blank and allow me to add a new name. Do I need
> to make these separate?"
>
> To make the search combo synch you will have to put some code in the
> form_current event like so
>
>
> Private Sub Form_Current()
>    Me.cboSearch.Value =  user_id.Value
> End Sub
>
>
> "All of my data is on one table and there is not a record control
> source either. It is blank. And the search combo box is fed by a query
> that selects the ID and name from the table, so I guess it is not a
> separate entity."
>
> Either way is fine.  That is, as a dynamic query completely written in the
> source box or as a static query that is available via the query tab.  I tend
> towards the second choice because I like the control I get from it.  Anyway,
> if you are using the control source to type in the whole query, click the
> button beside it with "..." as the caption and you should be able to add
> sort order.
>
>
> "Also, when I add a new record, again the name in the combo box does
> not change. It should be blank and allow me to add a new name. Do I need
> to make these separate?"
>
> See if the first set of code using form_current helps.
>
>
>
> J
>
> -
>
> Experience hath shewn, that even under the best forms those entrusted with
> power have, in time, and by slow operations, perverted it into tyranny -
> Thomas Jefferson on government
>
>
>
> On Wed, Aug 18, 2010 at 10:04 AM, Bruce Sorge <sor...@gmail.com> wrote:
>
>>
>>  I'm getting closer. Navigation works well except that the name in the
>> combo box does not change.
>>
>> All of my data is on one table and there is not a record control source
>> either. It is blank. And the search combo box is fed by a query that
>> selects the ID and name from the table, so I guess it is not a separate
>> entity.
>>
>> Also, when I add a new record, again the name in the combo box does not
>> change. It should be blank and allow me to add a new name. Do I need to
>> make these separate?
>>
>> On 8/18/2010 7:36 AM, Jerry Barnes wrote:
>> > Before we go any further, is your search combo box a separate entity from
>> > the name field or name fields?
>> >
>> > The search combo box should not have a record "control source" behind it.
>> >   It should be completely blank.
>> >
>> > As for navigation, personally, I don't use the built in navigation
>> buttons
>> > at the bottom
>> >
>> > I create navigation buttons.  If you want to give this a try, open the
>> form
>> > in design view.  Then click on the menu item "view" on the menu bar.
>>  Check
>> > "Form Header/Footer".  This will add sections to the top and bottom.
>> >
>> > I usually put my search combo and navigation stuff in the header but the
>> > footer is fine.
>> >
>> > Next, make sure the "Toolbox" menubar is visible.
>> >
>> > If you drag a button to the header, you should get a wizard asking what
>> you
>> > would like to do.  Pick the navigation feature.
>> >
>> > I usually pick first, last, next, prev, and add new.  I never do delete.
>> >
>> > If those don't work, check your form properties and make sure that it
>> allows
>> > record creation.  There are some properties like "Allow Additions" and
>> such.
>> >
>> > What version of Access are you using?
>> >
>> >
>> >
>> >
>> > Here are the command buttons code sets in case the wizard isn't working.
>> >
>> > Private Sub cmdFirst_Click()
>> > On Error GoTo Err_cmdFirst_Click
>> >
>> >
>> >      DoCmd.GoToRecord , , acFirst
>> >
>> > Exit_cmdFirst_Click:
>> >      Exit Sub
>> >
>> > Err_cmdFirst_Click:
>> >      MsgBox Err.Description
>> >      Resume Exit_cmdFirst_Click
>> >
>> > End Sub
>> > Private Sub cmdPrev_Click()
>> > On Error GoTo Err_cmdPrev_Click
>> >
>> >
>> >      DoCmd.GoToRecord , , acPrevious
>> >
>> > Exit_cmdPrev_Click:
>> >      Exit Sub
>> >
>> > Err_cmdPrev_Click:
>> >      MsgBox Err.Description
>> >      Resume Exit_cmdPrev_Click
>> >
>> > End Sub
>> > Private Sub cmdNext_Click()
>> > On Error GoTo Err_cmdNext_Click
>> >
>> >
>> >      DoCmd.GoToRecord , , acNext
>> >
>> > Exit_cmdNext_Click:
>> >      Exit Sub
>> >
>> > Err_cmdNext_Click:
>> >      MsgBox Err.Description
>> >      Resume Exit_cmdNext_Click
>> >
>> > End Sub
>> > Private Sub cmdLast_Click()
>> > On Error GoTo Err_cmdLast_Click
>> >
>> >
>> >      DoCmd.GoToRecord , , acLast
>> >
>> > Exit_cmdLast_Click:
>> >      Exit Sub
>> >
>> > Err_cmdLast_Click:
>> >      MsgBox Err.Description
>> >      Resume Exit_cmdLast_Click
>> >
>> > End Sub
>> > Private Sub cmdAdd_Click()
>> > On Error GoTo Err_cmdAdd_Click
>> >
>> >
>> >      DoCmd.GoToRecord , , acNewRec
>> >
>> > Exit_cmdAdd_Click:
>> >      Exit Sub
>> >
>> > Err_cmdAdd_Click:
>> >      MsgBox Err.Description
>> >      Resume Exit_cmdAdd_Click
>> >
>> > End Sub
>> >
>> >
>> >
>> > J
>> >
>> > -
>> >
>> > Experience hath shewn, that even under the best forms those entrusted
>> with
>> > power have, in time, and by slow operations, perverted it into tyranny -
>> > Thomas Jefferson on government
>>
>>
>>
>
> 

~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~|
Order the Adobe Coldfusion Anthology now!
http://www.amazon.com/Adobe-Coldfusion-Anthology-Michael-Dinowitz/dp/1430272155/?tag=houseoffusion
Archive: 
http://www.houseoffusion.com/groups/cf-community/message.cfm/messageid:325419
Subscription: http://www.houseoffusion.com/groups/cf-community/subscribe.cfm
Unsubscribe: http://www.houseoffusion.com/groups/cf-community/unsubscribe.cfm

Reply via email to