ASP Add database records

<form name= "Form1" method= "Post" action= "" >
<label>
<input name= "UID" type= "text" id= "UID" >
</label>
User name
<p>
<label>
<input name= "pwd" type= "text" id= "pwd" >
</label>
Password
<input type= "hidden" name= "action" value= "Add" >
</p>
<p>
<label>
<input type= "Submit" name= "Submit" value= "Add" >
</label>
</p>
</form>
<%
' ASP Add database records
Dpath = "Www.111cn.net/dbasemateydbweb_^%$#@.mdb"
Set conn=server.createobject ("Adodb.connection")

If request. QueryString ("action") = "Add" Then
Set Rs =server.createobject ("Adodb.recordset")
conn.connectionstring= "Provider=Microsoft.Jet.OLEDB.4.0;Data source=" &server.mappath (Dpath)
Conn.Open
Dim SQL

sql = "SELECT * FROM Test"
Rs.Open sql,conn,1,3
Rs.addnew
RS ("UID") =request ("UID")
RS ("pwd") =request ("pwd")
Rs.update
Response. Write ("Data saved successfully")
End If

%>
<p> This article is original in www.111cn.net reprint annotated source </p>