Drastically shorten your training time with WalkMe's advanced online training solution that Guides your trainees to action. Forget about retraining and skyrocket knowledge retention rates.
Private Sub clockout1_Click() If emp_id >= 1 And process_id >= 1 Then lngAnswr2 = MsgBox("Is your Entry Correct ?", vbOKCancel + vbQuestion) If lngAnswr2 = vbOK Then ' User chose Yes. CurrentDb.Execute "UPDATE dbo_timeclock SET clockout = Now() WHERE Emp_ID = " & Me.emp_id & " AND IsNull(clockout)" Me.Refresh Me.SetFocus DoCmd.Close ' update timeclock table with clockout time and close form Else ' User chose No. Me.Undo MsgBox "You have canceled your ClockIn!", _ vbExclamation, "ClockIn Canceled!" Set Me.Recordset = Nothing DoCmd.CancelEvent ' DoCmd.Close End If Else MsgBox "Please Make sure you have entered your Clock Number!", _ vbExclamation, "Did you forget your ClockIn #?" End If End Sub
Add your voice to the tech community where 5M+ people just like you are talking about what matters.
Join the community of 500,000 technology professionals and ask your questions.