form1.asp

三鸟个人网站源码。

<!--#include file="conn.asp"-->
<!--#include file="session.asp"-->
<%dim pass,pass2,pass3
pass=trim(request("pass"))
pass2=trim(request("pass2"))
pass3=trim(request("pass3"))
name1=request(session("d_webname"))
time1=now()

Set rs = Server.CreateObject("ADODB.Recordset")
sql="select * from control1" 
rs.open sql,conn,1,3

rs.AddNew
rs("pass")=pass
rs("pass2")=pass2
rs("pass3")=pass3
rs("name1")=session("d_webname")
rs("time1")=now()
rs.Update
rs.Close
set rs=nothing
conn.Close
set conn=nothing

Response.write "提交成功！！"
Response.write"<a href=control.asp>返回</a>"
%>