%@ LANGUAGE="VBSCRIPT" %>
Thanks for your update
Please Note: if you receive any error messages when attempting to post your survey responses, please send an email message to reithel@bus.olemiss.edu with the message.<% fOriginalName=Replace(Request.Form("ORIGINALUNAME"),"'","''") fname=Replace(Request.Form("UNAME"),"'","''") femail=Replace(Request.Form("UEMAIL"),"'","''") UpdateSQL = "UPDATE students" _ & " SET name ='" & fname & "', " _ & " email= '" & femail & "' " _ & " WHERE name='" & fOriginalName & "';" Set SurveyDB=Server.CreateObject("ADODB.Connection") SurveyDB.Open sDSN, optimistic SurveyDB.Execute(UpdateSQL) SurveyDB.Close SurveyDB=Null %>
Designed By
Brian J. Reithel, Ph.D.