[AccessD] Push code help please

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

 




More information about the AccessD mailing list