cusBillingName = request.Form("cusBillingName")
cusBillingCompany = request.Form("cusBillingCompany")
cusBillingAddress = request.Form("cusBillingAddress")
cusBillingCity = request.Form("cusBillingCity")
cusBillingZip = request.Form("cusBillingZip")
cusBillingPhone = request.Form("cusBillingPhone")
cusBillingEmail = request.Form("cusBillingEmail")
'open a connection to the database so we can update the table...
set conn = server.createobject("adodb.connection")
DSNtemp="Driver={MySQL ODBC 3.51 Driver};"
DSNtemp=dsntemp & "SERVER=YOURSERVER;Database=ILOVE;Uid=HOMEMADE;Pwd=APPLEPIE"
conn.Open DSNtemp
'update string
dim updateCustomerInfo
updateCustomerInfo = "UPDATE cartID set invoiceName ='" & cusBillingName & "', invoiceStreet1 ='" & cusBillingAddress & "', invoiceCity ='" & cusBillingCity & "', invoiceState = '" & cusBillingState & "' WHERE ID= " & Session.SessionID
conn.Execute(updateCustomerInfo)
|