Set addstuff=Server.CreateObject("adodb.connection")q1=request.form("q1")q2=request.form("q2")q3=request.form("q3")q4=request.form("q4")q5=request.form("q5")q6=request.form("q6")comments=request.form("comments")comments= Replace(comments, "'", "~") hours=request.form("hours")minutes=request.form("minutes")aname=request.form("aname")aname= Replace(aname, "'", "~") street=request.form("street")street= Replace(street, "'", "~") city=request.form("city")state=request.form("state")zip=request.form("zip")phone=request.form("phone")email=request.form("email")addstuff.open "PROVIDER=MICROSOFT.JET.OLEDB.4.0;DATA SOURCE=e:inetpubwwwrootsurveyspedssurveydbn395aeval.md b"sqladd="INSERT INTO main (q1,q2,q3,q4,q5,q6,comments,hours,minutes,aname,street,city, state,zip,phone,email) VALUES ('"&q1&"','"&q2&"','"&q3&"','"&q4&"','"&q5&"','"&q6&"','"&co mments&"','"&hours&"','"&minutes&"','"&aname&"','"&street&"' ,'"&city&"','"&state&"','"&zip&"','"&phone&"','"&email&"')" addstuff.execute(sqladd)addstuff.CloseSet addstuff= Nothing%>
