W
Wind54Surfer
Hi all,
I get this error when added I specify the fields in this query (I had to do
this because it won't work replicated-field number difference):
----------------------------------------------------------------------
Function build_sql(Schedule_ID As Date, operation As String) As String
build_sql = "Insert Into tblJobScheduleAuditLog
============================================
(ScheduleID, Scheduled, Jobdate, Status, Action, Timestamp)
============================================
Values (#"
build_sql = build_sql & ScheduleID & "# , "
build_sql = build_sql & "'" & _
DLookup("Scheduled", "JobSchedule", "ScheduleID=#" & _
Schedule_ID & "#") & "', "
build_sql = build_sql & "'" & _
DLookup("JobDate", "JobSchedule", "ScheduleID=#" & _
Schedule_ID & "#") & "', "
build_sql = build_sql & "'" & _
DLookup("Status", "JobSchedule", "ScheduleID=#" & _
Schedule_ID & "#") & "', "
build_sql = build_sql & "'" & operation & "', "
build_sql = build_sql & "#" & Now() & "#)"
End Function
---------------------------------------------------------------------------
The fields are as follows:
ScheduleID is Date/Time
Scheduled is Text
JobDate is Text
Status is Text
Action is Text
Timestamp is Date/Time
Any help really appreciated,
Emilio
I get this error when added I specify the fields in this query (I had to do
this because it won't work replicated-field number difference):
----------------------------------------------------------------------
Function build_sql(Schedule_ID As Date, operation As String) As String
build_sql = "Insert Into tblJobScheduleAuditLog
============================================
(ScheduleID, Scheduled, Jobdate, Status, Action, Timestamp)
============================================
Values (#"
build_sql = build_sql & ScheduleID & "# , "
build_sql = build_sql & "'" & _
DLookup("Scheduled", "JobSchedule", "ScheduleID=#" & _
Schedule_ID & "#") & "', "
build_sql = build_sql & "'" & _
DLookup("JobDate", "JobSchedule", "ScheduleID=#" & _
Schedule_ID & "#") & "', "
build_sql = build_sql & "'" & _
DLookup("Status", "JobSchedule", "ScheduleID=#" & _
Schedule_ID & "#") & "', "
build_sql = build_sql & "'" & operation & "', "
build_sql = build_sql & "#" & Now() & "#)"
End Function
---------------------------------------------------------------------------
The fields are as follows:
ScheduleID is Date/Time
Scheduled is Text
JobDate is Text
Status is Text
Action is Text
Timestamp is Date/Time
Any help really appreciated,
Emilio