im trying to add form data in to my local sql 2005 database but having a lot of trouble. I have searched the web but im coming across misleading information time and time again.
below is my code
can some one help please?
below is my code
Code:
<!DOCTYPE html PUBLIC "-//W3C//DTD XHTML 1.0 Transitional//EN" "http://www.w3.org/TR/xhtml1/DTD/xhtml1-transitional.dtd">
<html xmlns="http://www.w3.org/1999/xhtml">
<head>
<meta http-equiv="Content-Type" content="text/html; charset=utf-8" />
<title>Submit Document</title>
</head>
<body>
<%
Set conn = Server.CreateObject("ADODB.Connection")
objConn.ConnectionString = "Provider=Microsoft.Jet.OLEDB.4.0;Data Source=" & _
Server.MapPath ("laptop\omar.mdb") & ";"
objConn.Open
sql="INSERT INTO webform (txtAmount,txtPurpose,"
sql=sql & "txtResidentialStatus,txtTitle,txtFirstName,txtSurname,txtContactNumber,txtEveningNumber,txtEmailAddress)"
sql=sql & " VALUES "
sql=sql & "('" & Request.Form("txtAmount") & "',"
sql=sql & "'" & Request.Form("txtPurpose") & "',"
sql=sql & "'" & Request.Form("txtResidentialStatus") & "',"
sql=sql & "'" & Request.Form("txtTitle") & "',"
sql=sql & "'" & Request.Form("txtFirstName") & "',"
sql=sql & "'" & Request.Form("txtSurname") & "',"
sql=sql & "'" & Request.Form("txtContactNumber") & "')"
sql=sql & "'" & Request.Form("txtEveningNumber") & "')"
sql=sql & "'" & Request.Form("txtEmailAddress") & "')"
on error resume next
conn.Execute sql,recaffected
if err<>0 then
Response.Write("No update permissions!")
else
Response.Write("<h3>" & recaffected & " record added</h3>")
end if
conn.close
%>
</body>
</html>
Comment