Add Record Button isn't working

[tmcrouse]

I have a form that has combined comboboxes and textboxes. I used the combobox and coding to pre-populate the textboxes with the information. I used the wizard in Access 2000 to create an add record button that is to add what is on the screen to the table that is created but is blank but does have the columns already created. I am wondering if because the textboxes are bound to the combobox is this is why I am having the problem. I have attached the form picture so you can see but I can tell you for instance my userfirstname text is set to =userlastname.column(2) etc etc etc for everything I have. And then the query itself in the combobox has all the items I need. So I think the reason I am having issues might be that the other columns are bound now and combos are unbound.

Here is my add record code:

Private Sub Add_Record_Click()
On Error GoTo Err_Add_Record_Click

DoCmd.GoToRecord , , acNewRec

Exit_Add_Record_Click:
Exit Sub

Err_Add_Record_Click:
MsgBox Err.Description


Resume Exit_Add_Record_Click

[NTC]

an approach that will work is to do this:

1. change from an unbound form to a form bound on the table you wish to populate (make the table it's record source)

2. move all the vb code (i.e. =userlastname.column(2)) out of those textboxes - because they need to be bound to the underlying record source table; and instead put them in the AfterUpdate Event of the comboboxes i.e.
me.userfirstnametext = me.userlastname.column(2)

actually do item 2 before item 1.

hope this helps.

[tmcrouse]

Now my text boxes don't prefill.

I have:

private sub userlastname_afterupdate()
me.userid = me.userlastname.column(1)
me.userfirstname = me.userlastname.column(2)

end sub

so I tried:

private sub userlastname_afterupdate()
me.useridtext = me.userlastname.column(1)

etc etc etc and then ended it with

end sub

neither way worked.
I will try doing it like this and see if that works

me.[tri_adv].[userid] = me.[tri_adv].[userlastname].[column](1)

and see if it gives me an error or what.

[tmcrouse]

well that didn't work either

[tmcrouse]

I think because I am using access 2000 and this forum is everything related to access 2007 it looks like. I am losing my mind with this. does anyone out there know what the heck is going on with why i can't get this to work?

[NTC]

this advice is uniform for all versions of Access.

presuming no subforms are involved; and that userlastname is indeed a combobox....

[tmcrouse]

It is finally working. I had to play around with the me.userlastname coding stuff. I just kept trying different things til it worked. it was erroring out when it ran at me.managerlastname = me.userlastname.column(6)

The column choice was right and it said managerlastname but I noticed when typing the acutal code it kept changing to managerlast only. That was the only choice. So I said well that is not right. Text box isn't named that. Nor is label nor is the database column. It is managerlastname. But for some reason it was only seeing managerlast. Oh you know what, I didn't chk the length in the table. Maybe that is why it is only taking managerlast. Or maybe some length thing in the form. Will have to look. but using me.managerlast = me.userlastname.column(6) works and it all works now and autopopulates and adds record and does everything. thank you everyone. I will never forget this little tidbit of coding.