<% on error resume next uername=Request.Form("uername") password1=Request.Form("pwd1") password=Request.Form("pwd2") emailaddress=Request.Form("emailaddress") question=Request.Form("question") answer=Request.Form("answer") year=Request.Form("selectyear") month=Request.Form("selectmonth") day=Request.Form("selectday") birthday=year&"-"&month&"-"&day userlevel="0" set conn=nothing set rs=nothing set conn=server.CreateObject("adodb.connection") conn.Provider="Microsoft.Jet.OLEDB.4.0" conn.Open server.MapPath("/db/lzhome.mdb") set rs=server.CreateObject("ADODB.recordset") rs.Open "user",conn,adOpenKeyset,adLockOptimistic do while not rs.EOF if username=rs("username") then temp=1 exit else end if rs.MoveNext loop if password1=password and temp<>1 then rs.AddNew rs("username")=username rs("password")=password rs("question")=question rs("answer")=answer rs("emailaddress")=emailaddress rs("userlevel")=userlevel rs("birthday")=birthday rs.Update rs.Close if conn.Errors.count>0 then Response.Write "系统发生"&conn.Errors.count&"个错误!" else Response.Write "用户注册成功！" end if else Response.Write "请返回上个页面注册^_^重新注册" end if set conn=nothing set rs=nothing %>

你提交表单的目的地址有没有输错或者是空的
你这个界面注册成功后是看不到的啊