return recordser

[goobil]

Hi guys,
Can some one please tell me why this dont work.

I am trying to get some data from the table to check before update or save as new

Dim bankRs As DAO.Recordset
Dim employeeRS, emptypeRS, rst As DAO.Recordset
Dim xemployeetype, empID As String


Set Db = CurrentDb
Set rst = Db.OpenRecordset("Select * from employee_info where Me![employeeID] = '" & Me.employeeID & "'", dbOpenDynSet)

Kenneth
goobil@hotmail.com

 

[RiazKhanmohamed]

do you get an error message or is the data not being returned? your code looks correct, except for the fact that you aren't returning it.

 

[PeteJohnston]

I might be reading it wrong, but your SQL statment seems to be

Select * from employee_info where Me![employeeID] = '" & Me.employeeID & "'"

I think the WHERE clause should probably be

"WHERE employeeID = '" & Me.employeeID & "'"

The SQL needs to have the name of the column in the table and not the Me! part.

PeteJ
(Contract Code-monkey)

It's amazing how many ways there are to skin a cat
(apologies to the veggies)