set data in field from form 2

[Yardyy]

Hi, not sure how to do this, so here goes.. I have a form based on a jobns form, there is an employee_id field in there that has relationship to the employee table. On the jobs form what i want is when i press the save button that the fields Employee_Available_Time and date are set to null or 0, how do i do that with code ??

I have used the following code before

Me.company = DLookup("CompanyName", "Contacts", "ContactID=" & Nz(Me.ContactID, 0))

and thought that maybe i could tweak that to fit my purpose..

any help most appreciated.

Many Thanks
Yurov Ardyy

 

[Remou]

It may be possible to include the relevant field through a query that joins Jobs and Employees and update with a little code:

Me.CouldBeHidden_Employee_Available_Time=0

Alternatively, you could use an update query:

strSQL="Update Employees Set Employee_Available_Time=0 " _
& "Where EmployeeID=" & Me.EmployeeID
CurrentDB.Execute strSQL, dbFailOnError

http://lessthandot.com

 

[Yardyy]

Hi, thanks for the reply, tried the bottom code, and amended it slightly..

strSQL="Update Employee Set Employee_Available=0 " & "Where Employee_No=" & Me.Employee_No CurrentDB.Execute strSQL, dbFailOnError

but its coming up with a syntax error.. not sure why, all the spelling is right for the fields and tables.

Many Thanks
Yurov Ardyy

 

[PHV]

You must have TWO lines of code:

strSQL="Update Employee Set Employee_Available=0 Where Employee_No=" & Me.Employee_No
CurrentDB.Execute strSQL, dbFailOnError

Hope This Helps, PH.
FAQ219-2884
FAQ181-2886