Inserting into a database
I'm trying to insert a bunch of data into a database. I'm not sure why, but it's not updating (writing). Any help is truly appreciated.
Set rsInsertRequest = Server.CreateObject("ADODB.Recordset")
objRS.ActiveConnection = MM_spgsconn_STRING
sql = "INSERT INTO PaymentHistory (" & _
"ClientID, UserID, ClientName, Name, Address, City, State, Zip, TimeStamp, Receipt, " & _
"CreditCardType, CreditCardNumber, ExpirationDate, Comment, Reference, Reference2, " & _
"Reference3, Reference4, Reference5, Amount, Fee, GrandTotal, OrderNumber, Type) " & _
"value(" & lngClientID & ", " & lngUserID & ", '" & strShortName & "', '" & varcardname & "', '" & _
varaddress1 & "', '" & varcityname & "', '" & varpostalcd & "', '" & varstatecd & "', '" & _
Now() & "', '" & strResponseReferenceNum & "', '" & varcardtype & ", '" & varcardlastfour & _
"', '" & varexpdate & "', '" & varclientref2 & " for " & varclientref3 & "', " & _
varclientref1 & "', '" & varclientref2 & "', '" & "', '" & varclientref3 & "', '" & _
varclientref4 & "', '" & varclientref5 & "') "
objrs.Open
sql=""
|