mycotropic
Technical User
HI;
OK I don't know why I am stymied here but;
I want to use a combo box on a form to select an id from one table(A), if that record exists in the forms' table(B) then go to that record. if it is NOT(and here is why I am writing), then create that record in table (B).
I can find the record I want alright - I cannot get it passed into a new record...
THanks for the help, I am currently using;
Sub visitnumberlookup_AfterUpdate()
Me.RecordSource = "SELECT TTobaccoAlcoholHX.* FROM TTobaccoAlcoholHX ORDER BY TTobaccoAlcoholHX.visitnumber;"
Me.RecordsetClone.FindFirst "[visitnumber]='" & Me![visitnumberlookup] & " '"
Me.Bookmark = Me.RecordsetClone.Bookmark
'Me!visitnumberlookup.Value = Null
DoCmd.
End Sub
to go to the chosen record...
greg kinney "Man is the cheapest computer we can put into a spacecraft and the only one we can mass-produce with unskilled labor." Werner von Braun
OK I don't know why I am stymied here but;
I want to use a combo box on a form to select an id from one table(A), if that record exists in the forms' table(B) then go to that record. if it is NOT(and here is why I am writing), then create that record in table (B).
I can find the record I want alright - I cannot get it passed into a new record...
THanks for the help, I am currently using;
Sub visitnumberlookup_AfterUpdate()
Me.RecordSource = "SELECT TTobaccoAlcoholHX.* FROM TTobaccoAlcoholHX ORDER BY TTobaccoAlcoholHX.visitnumber;"
Me.RecordsetClone.FindFirst "[visitnumber]='" & Me![visitnumberlookup] & " '"
Me.Bookmark = Me.RecordsetClone.Bookmark
'Me!visitnumberlookup.Value = Null
DoCmd.
End Sub
to go to the chosen record...
greg kinney "Man is the cheapest computer we can put into a spacecraft and the only one we can mass-produce with unskilled labor." Werner von Braun