这是我的源码,帮我看看还有没有别的什么问题?
<%
if Request.ServerVariables("REQUEST_METHOD") = "POST" then request.form()
dim name1
dim psw
dim yonghushenfen
dim sql
yonghushenfen=request.Form("yonghushenfen")
name1=request.Form("name1")
psw=request.Form("psw")
if name1="" or psw="" or yonghushenfen="" then
response.write ("<script language=javascript>alert'用户名和密码及用户身份都不能为空!';history.go(-1);</script>")
else
set rs=server.createobject("adodb.recordset")
sql="select 用户名,密码,用户身份 from 注册数据 where 用户名='"& name1 & "' and 密码='"&psw&"' and 用户身份='"&yonghushenfen&"'"
'response.write sql
'rs.open sql conn,1,3
set rs = conn.Execute(sql)
if name1=rs("用户名") and psw=rs("密码") and yonghushenfen=rs("用户身份") then
response.write("<script language='javascript'>")
response.write("alert('注册成功');")
response.write("this.location.href='dengluchenggong.asp';")
response.write("</script>")
else
response.write ("<script language=javascript>alert'用户名或密码或用户身份输入错误,请确认!';history.go(-1);</script>")
%>
<%end if
%>
<%end if%>
<%
set conn=nothing
%>
如果用户密码输入正确的话能正确执行。如果输错了的话会出错:错误类型:
(0x80020009)
发生意外。
/主页左框架.asp, 第 74 行
shanhwa,我照你的代码写,可是windows自动执行了,我一打开页面就提示不能为空,我还没输入没提交呢