DanielTech
Programmer
Hi,
I am trying to populate a database with some data and it works the first time, then I went back to the page that contains the form (I refresh)and I try again and it gives me the HTTP 500.100 Error. Here is my code:
<%
Dim strSql
Dim objConn, objRS
Dim name
name = Request.Form("name")
Set objConn = Server.CreateObject("ADODB.Connection")
objConn.Open("DRIVER={Microsoft Access Driver (*.mdb)}; DBQ=" & Server.MapPath("mydatabase.mdb"))
strSql = "insert into Table1 (name) values ('" & name & "')"
objConn.Execute(strSql)
Response.Write "done!!!"
objConn.Close
Set objConn =Nothing
%>
Any idea why is not working properly?
thanks,
DanielTech
I am trying to populate a database with some data and it works the first time, then I went back to the page that contains the form (I refresh)and I try again and it gives me the HTTP 500.100 Error. Here is my code:
<%
Dim strSql
Dim objConn, objRS
Dim name
name = Request.Form("name")
Set objConn = Server.CreateObject("ADODB.Connection")
objConn.Open("DRIVER={Microsoft Access Driver (*.mdb)}; DBQ=" & Server.MapPath("mydatabase.mdb"))
strSql = "insert into Table1 (name) values ('" & name & "')"
objConn.Execute(strSql)
Response.Write "done!!!"
objConn.Close
Set objConn =Nothing
%>
Any idea why is not working properly?
thanks,
DanielTech