request.Form1 ==>  request.Form

这个不是指你的表单名称。

我的表单名就是Form1呀,
我改成Form也不行
????
数据库中还是没有数据.?

<%
set conn=server.createobject("adodb.connection")
conn.open "driver={microsoft access driver (*.mdb)};dbq="&server.mappath("admin.mdb")
name=request.form("name")
password=trim(request("password"))
question=request.form("question")
answer=trim(request("answer"))
email=request.form("email")
sfid=request.form("sfid")
telephone=request.form("telephone")
qq=request.form("qq")
address=request.form("address")
youbian=request.form("youbian")
set rs=server.CreateObject("adodb.recordset")
rs.open "select * from user where name='"&request.form("name")&"' or email='"&request.form("email")&"'",conn,1,1
if not rs.bof and not rs.eof then
response.Write "<script LANGUAGE='javascript'>alert('用户名或者邮件与其他会员相同!请重新输入!');history.go(-1);</script>"
rs.close
set rs = nothing
response.end
else
rs.close
set rs=server.CreateObject("adodb.recordset")
rs.open "select * from user",conn,1,3
rs.addnew
rs("name")=trim(request.form("name"))
rs("password")=trim(request.form("password"))
rs("email")=trim(request.form("email"))
rs("question")=trim(request.form("question"))
rs("answer")=trim(request.form("answer"))
rs("sfid")=trim(request.form("sfid"))
rs("telephone")=trim(request.form("telephone"))
rs("qq")=trim(request.form("qq"))
rs("realname")=trim(request.form("realname"))
rs("address")=trim(request.form("address"))
rs("adddate")=now()
rs("youbian")=trim(request.form("youbian"))
rs.update
session("name")=trim(request.form("name"))
response.Write "<script LANGUAGE='javascript'>alert('恭喜恭喜！您已经成为我们的会员了！');window.location.href='index.asp';</script>"
response.End
rs.close
set rs=nothing
end if
%>

修改就可以了！或者把你的注册页面给写出来！

注册已经调试好了,谢谢你们的帮忙
还有管理员和普通用户权限怎么样用代码实现和管理?

要用到Session对象吗？

怎么判断管理员和普通用户呢？

加分啊！想走人？你可以在表里加个字段区别啊？或者用判断语句！