Can some one help me with finding the error is this statement?
strSQL_Update = "UPDATE tblWJS_SuperInp ut SET JobNumber= '"&
strJobNumber &"', " _
& "Weekending Date = '"& strWeekEndingDa te &"', "_
& "CurrentHou rs = '"& strCurrentHours &"', "_
& "CurrentHoursTa ping = '"& strCurrentHours Taping &"', "_
& "ReportRequired _01 = '"& strReportRequir ed_01 &"', " _
& "ReportRequired _02 = '"& strReportRequir ed_02 &"', " _
& "ReportRequired _03 = '"& strReportRequir ed_03 &"', " _
& "ReportRequired _04 = '"& strReportRequir ed_04 &"', " _
& "ReportRequired _05 = '"& strReportRequir ed_05 &"', " _
& "ReportRequired _06 = '"& strReportRequir ed_06 &"', " _
& "ReportRequired _07 = '"& strReportRequir ed_07 &"', " _
& "WHERE JobNumber ="&strJobNumber &" AND WeekEndingDate ="&
strWeekEndingDa te &""
strConnect = "Driver={Micros oft Access Driver (*.mdb)}; DBQ=\
\CALSJ1\xxxx.md b"
Set conn = Server.CreateOb ject("ADODB.Con nection")
conn.Open strConnect
Set objRecordSet = conn.Execute(st rSQL_Update)
strSQL_Update = "UPDATE tblWJS_SuperInp ut SET JobNumber= '"&
strJobNumber &"', " _
& "Weekending Date = '"& strWeekEndingDa te &"', "_
& "CurrentHou rs = '"& strCurrentHours &"', "_
& "CurrentHoursTa ping = '"& strCurrentHours Taping &"', "_
& "ReportRequired _01 = '"& strReportRequir ed_01 &"', " _
& "ReportRequired _02 = '"& strReportRequir ed_02 &"', " _
& "ReportRequired _03 = '"& strReportRequir ed_03 &"', " _
& "ReportRequired _04 = '"& strReportRequir ed_04 &"', " _
& "ReportRequired _05 = '"& strReportRequir ed_05 &"', " _
& "ReportRequired _06 = '"& strReportRequir ed_06 &"', " _
& "ReportRequired _07 = '"& strReportRequir ed_07 &"', " _
& "WHERE JobNumber ="&strJobNumber &" AND WeekEndingDate ="&
strWeekEndingDa te &""
strConnect = "Driver={Micros oft Access Driver (*.mdb)}; DBQ=\
\CALSJ1\xxxx.md b"
Set conn = Server.CreateOb ject("ADODB.Con nection")
conn.Open strConnect
Set objRecordSet = conn.Execute(st rSQL_Update)
Comment