This is the error I am receiving:
Microsoft OLE DB Provider for ODBC Drivers error '80040e14'
[Microsoft][ODBC Microsoft Access Driver] Syntax error (missing operator) in query expression ''Sesame Street Live’s Elmo's Health Heros', #09/24/10#, #11/24/10#, '', '11/23/10', '11/24/10', 2, 0, '', 'Performances are Tuesday')'.
Here is the code for the insert into the database, where I believe the problem lies:
If you need me to display more of my code let me know. Thanks for your time!!
Microsoft OLE DB Provider for ODBC Drivers error '80040e14'
[Microsoft][ODBC Microsoft Access Driver] Syntax error (missing operator) in query expression ''Sesame Street Live’s Elmo's Health Heros', #09/24/10#, #11/24/10#, '', '11/23/10', '11/24/10', 2, 0, '', 'Performances are Tuesday')'.
Here is the code for the insert into the database, where I believe the problem lies:
Code:
rs.open "update ticketcoupons set eventtitle='" & upload.form("eventtitle") & "', startdate=#" & upload.form("startdate") & "#, enddate=#" & upload.form("enddate") & "#," & _
"cost='"& upload.form("cost") & "', eventdate='" & upload.form("eventdate") & "', eventdateend='" & upload.form("eventdateend") & "'," & _
"TicketType=" & upload.form("tickettype") & ", numtickets=" & upload.form("numtickets") & ", image='" & filename & "'," & _
"description='" & replace(upload.form("description"), "'", "''") & "' where id=" & upload.form("id"), "dsn=intranet", 2
rt.open "update ticketcouponsnum set available=" & upload.form("numtickets") & ", EventTitle='" & upload.form("eventtitle") & "' where id=" & upload.form("id"), "dsn=intranet", 2
Else
soldnum=0
rs.open "insert into ticketcoupons (eventtitle, startdate, enddate, cost, eventdate, eventdateend, tickettype, numtickets, image, description) values " & _
"('" & upload.form("eventtitle") & "', #" & upload.form("startdate") & "#, #" & upload.form("enddate") & "#, '" & upload.form("cost") & "', " & _
"'" & upload.form("eventdate") & "', '" & upload.form("eventdateend") & "', " & upload.form("tickettype") & ", " & upload.form("numtickets") & ", " & _
"'" & filename & "', '" & replace(upload.form("description"), "'", "''") & "')", "dsn=intranet", 2
rt.open "insert into ticketcouponsnum (available, sold, eventtitle) values (" & upload.form("numtickets") & ", " & soldnum & ", '" & upload.form("eventtitle") & "')", "dsn=intranet", 2
End If
Comment