用asp制作一个注册页面,怎么把用户的注册信息提交到数据库中。
2个回答
展开全部
数据库user.mdb内表user有字段user、pass
<html>
<head>
<meta http-equiv="Content-Type" content="text/html; charset=utf-8" />
<title>简单注册</title>
</head>
<body>
<form id="form1" name="form1" method="post" action="?action="add"">
<label for="user">用户</label>
<input type="text" name="user" id="user" />
<br />
<label for="pass">密码</label>
<input type="text" name="pass" id="pass" />
<input name="注册" type="submit" id="注册" value="提交" />
</form>
</body>
</html>
<%
if request("action")="add" then
Set conn = Server.CreateObject("ADODB.Connection")
conn.Open "DRIVER={Microsoft Access Driver (*.mdb)}; DBQ=" & Server.MapPath("user.mdb")
set rs=server.CreateObject("adodb.recordset")'(建立recordset对象)
sqlstr="select * from [user]" '(message为数据库中的一个数据表,即你要显示的数据所存放的数据表)
rs.open sqlstr,conn,1,3
rs.addnew '在数据库中新增一条空数据
rs("user")=request("user")
rs("pass")=request("pass")
rs.Update
rs.close
conn.close'这几句是用来关闭数据库
set rs=nothing
set conn=nothing
end if
%>
<html>
<head>
<meta http-equiv="Content-Type" content="text/html; charset=utf-8" />
<title>简单注册</title>
</head>
<body>
<form id="form1" name="form1" method="post" action="?action="add"">
<label for="user">用户</label>
<input type="text" name="user" id="user" />
<br />
<label for="pass">密码</label>
<input type="text" name="pass" id="pass" />
<input name="注册" type="submit" id="注册" value="提交" />
</form>
</body>
</html>
<%
if request("action")="add" then
Set conn = Server.CreateObject("ADODB.Connection")
conn.Open "DRIVER={Microsoft Access Driver (*.mdb)}; DBQ=" & Server.MapPath("user.mdb")
set rs=server.CreateObject("adodb.recordset")'(建立recordset对象)
sqlstr="select * from [user]" '(message为数据库中的一个数据表,即你要显示的数据所存放的数据表)
rs.open sqlstr,conn,1,3
rs.addnew '在数据库中新增一条空数据
rs("user")=request("user")
rs("pass")=request("pass")
rs.Update
rs.close
conn.close'这几句是用来关闭数据库
set rs=nothing
set conn=nothing
end if
%>
展开全部
<%
set rs=server.CreateObject("adodb.recordset")
sql="select * from lxq_user"
rs.open sql,conn,1,3
rs.addnew
rs("username")=trim(request("uname"))
rs("userage")=trim(request("uage"))
rs.update
rs.close
set rs=nothing
response.Write("会员注册成功")
%>
lxq_user为会员表
username,userage分另为会员表中的两个字段。
set rs=server.CreateObject("adodb.recordset")
sql="select * from lxq_user"
rs.open sql,conn,1,3
rs.addnew
rs("username")=trim(request("uname"))
rs("userage")=trim(request("uage"))
rs.update
rs.close
set rs=nothing
response.Write("会员注册成功")
%>
lxq_user为会员表
username,userage分另为会员表中的两个字段。
本回答被提问者采纳
已赞过
已踩过<
评论
收起
你对这个回答的评价是?
推荐律师服务:
若未解决您的问题,请您详细描述您的问题,通过百度律临进行免费专业咨询