Intern who needs a little help,
All I want to do is have the user enter their name then click on the submit button and it will update a database. I am stuck.
Help would be greatly appreciated
Thanks
<html>
<head>
<title>New Page 1</title>
</head>
<body>
<%
Dim Name, data_source, con, sql_insert, database_type
Name=Request.Form("Name"![Wink ;) ;)](data:image/gif;base64,R0lGODlhAQABAIAAAAAAAP///yH5BAEAAAAALAAAAAABAAEAAAIBRAA7)
data_source = "Provider=Microsoft.Jet.OLEDB.4.0;" & _
"Data Source=a:Completed.mdb;" & _
"Persist Security Info=False"
sql_insert = "insert into Users (Name)"
Set con = Server.CreateObject("ADODB.Connection"![Wink ;) ;)](data:image/gif;base64,R0lGODlhAQABAIAAAAAAAP///yH5BAEAAAAALAAAAAABAAEAAAIBRAA7)
con.Open data_source
con.Execute sql_insert
con.Close
set con = Nothing
Response.Write "You entered: " & Name
%>
</body>
</html>
All I want to do is have the user enter their name then click on the submit button and it will update a database. I am stuck.
Help would be greatly appreciated
Thanks
<html>
<head>
<title>New Page 1</title>
</head>
<body>
<%
Dim Name, data_source, con, sql_insert, database_type
Name=Request.Form("Name"
data_source = "Provider=Microsoft.Jet.OLEDB.4.0;" & _
"Data Source=a:Completed.mdb;" & _
"Persist Security Info=False"
sql_insert = "insert into Users (Name)"
Set con = Server.CreateObject("ADODB.Connection"
con.Open data_source
con.Execute sql_insert
con.Close
set con = Nothing
Response.Write "You entered: " & Name
%>
</body>
</html>