ASP问题:Microsoft VBScript 编译器错误 (0x800A03F6)
发布网友
发布时间:2024-10-18 09:55
我来回答
共3个回答
热心网友
时间:1天前
在最后少了一个end if
<!--#include file="conn.asp"-->
<!--#include file="../inc/md5.asp"-->
<%dim admin,password,verifycode
admin=replace(trim(request("admin")),"'","")
password=md5(replace(trim(request("password")),"'",""))
verifycode=replace(trim(request("verifycode")),"'","")
if admin="" or password="" then
response.Write "<script LANGUAGE='javascript'>alert('您的管理ID或密码有误!');history.go(-1);</script>"
response.end
end if
if cstr(session("getcode"))<>cstr(trim(request("verifycode"))) then
response.Write "<script LANGUAGE='javascript'>alert('请输入正确的验证码!');history.go(-1);</script>"
response.end
end if
set rs=server.CreateObject("adodb.recordset")
rs.Open "select * from SW_admin where SMT_nick='"&admin&"' and SMT_password='"&password&"' " ,conn,1,1
if not(rs.bof and rs.eof) then
if password=rs("SMT_password") then
session("admin")=rs("SMT_nick")
session.Timeout=100
rs.Close
set rs=nothing
response.Redirect "manage.asp"
end if
end if
%>
热心网友
时间:1天前
如果密码输入错误要返回的话就用
if not(rs.bof and rs.eof) then
if password=rs("SMT_password") then
session("admin")=rs("SMT_nick")
session.Timeout=100
response.Redirect "manage.asp"
else
response.Write "<script LANGUAGE='javascript'>alert('您的管理密码有误!');history.go(-1);</script>"
end if
rs.Close
set rs=nothing
如果密码输入错误或正确都跳转到manage.asp这个页面的话
if not(rs.bof and rs.eof) then
if password=rs("SMT_password") then
session("admin")=rs("SMT_nick")
session.Timeout=100
end if
end if
response.Redirect "manage.asp"
rs.Close
set rs=nothing
热心网友
时间:1天前
set rs=server.CreateObject("adodb.recordset")
rs.Open "select * from SW_admin where SMT_nick='"&admin&"' and SMT_password='"&password&"' " ,conn,1,1
if not(rs.bof and rs.eof) then
if password=rs("SMT_password") then
session("admin")=rs("SMT_nick")
session.Timeout=100
else
session("admin")=""
end if
else
session("admin")=""
end if
rs.Close
set rs=nothing
conn.Close
set conn=nothing
if session("admin")="" then
response.Redirect "login.asp"
else
response.Redirect "manage.asp"
end if
看你的程序后部分是少了一个end if
通常是如果判断登录不成功时可以使session("admin")=""
然后判断是返回登录页还是管理页面
conn和rs使用完都要关闭