为什么我的商城在游戏里打不开。 怎么看商城参数是否与EB对应'登陆参数请高人解答我 QQ 251988468 知道的告诉我下谢谢了
action=trim(request("action"))
straccountid=trim(checkstr(request("straccountid")))
strpasswd=trim(checkstr(request("strpasswd")))
if action="login" then
if strpasswd<>"" and straccountid<>"" then
set rs=conn.execute("select strAccountID from TB_USER where strAccountID='"&strAccountID&"' and strpasswd='"&strpasswd&"'")
if not rs.eof then
set rs1=conn.execute("select strAccountID,strCharID1 from ACCOUNT_CHAR where strAccountID in (select strAccountID from TB_USER where strAccountID='"&strAccountID&"')")
if not rs1.eof then
strUserID=trim(rs1("strCharID1"))
session("points_login")=strUserID
response.redirect("cypoints.asp?straccountid="&straccountid)
else
rs1.close:closeconn()
response.write("<html><title></title><head><style>body{background:#110000;margin:50px;padding:0;font-size:15px;font-family:arial;color:#E7DBDB;}</style></head><body>找不到相应的角色！</body></html>")
response.end
end if
rs1.close:set rs1=nothing
else
rs.close:closeconn()
response.write("<html><title></title><head><style>body{background:#110000;margin:50px;padding:0;font-size:15px;font-family:arial;color:#E7DBDB;}</style></head><body>账号或密码不对！</body></html>")
response.end
end if
rs.close:set rs=nothing
else
response.write("<html><title></title><head><style>body{background:#110000;margin:50px;padding:0;font-size:15px;font-family:arial;color:#E7DBDB;}</style></head><body>请输入完整！</body></html>")
end if
end if
if session("points_login")="" then
loginFrm()
response.end
end if
if strAccountID<>"" then
strAccountID=left(strAccountID,13)
set rs=conn.execute("select strAccountID from TB_USER where strAccountID='"&strAccountID&"'")
if not rs.eof then
set rs1=conn.execute("select strAccountID,strCharID1 from ACCOUNT_CHAR where strAccountID in (select strAccountID from TB_USER where strAccountID='"&strAccountID&"')")
if not rs1.eof then
strUserID=trim(rs1("strCharID1"))
else
rs1.close:closeconn()
response.write("角色不存在！")
response.end
end if
rs1.close:set rs1=nothing
else
rs.close:closeconn()
response.write("账号不存在！")
response.end
end if
rs.close:set rs=nothing
else
closeconn()
loginFrm()
response.end
end if |
