Joe Hecht
jmhecht at earthlink.net
Wed Jan 11 18:22:12 CST 2006
This is the sql that controls Combo32 SELECT [20_tblAIMaster340].ACCIDENT, [20_tblAIMaster340].DRIV_NUM, [10_tbl_PersonelMasterData].LAST_NAME, [10_tbl_PersonelMasterData].FIRST_NAME, [10_tbl_PersonelMasterData].MIDDLE_Name, [Last_Name] & ", " & [First_Name] & " " & [Middle_Name] AS Fname FROM 10_tbl_PersonelMasterData INNER JOIN 20_tblAIMaster340 ON [10_tbl_PersonelMasterData].DRIV_NUM = [20_tblAIMaster340].DRIV_NUM; I want to put FNAME from above into txtEmployeeName Private Sub Combo32_AfterUpdate() ' Find the record that matches the control. Dim rs As Object Set rs = Me.Recordset.Clone rs.FindFirst "[ACCIDENT] = '" & Me![Combo32] & "'" If Not rs.EOF Then Me.Bookmark = rs.Bookmark me.txtEmployeeName.Text= me.Combo32.Column.(6) I can not trace syntax error I get when I added bottom line of code. The get the record code is good. Is it source = target or target = source About to put my head my ADH Thanks Joe Hecht jmhecht at earthlink.net