📄 check.asp
字号:
<!--#include file="conn.asp" -->
<!--#include file="Mb_API_Md5.asp" -->
<%
dim number,pwd,unionid,ip
number = trim(Request("name"))
unionid = trim(Request("unionid"))
pwd = trim(Request("password"))
ip = Request.ServerVariables("REMOTE_ADDR")
set rs=server.createobject("adodb.recordset")
sql="select * from [mobile] where Usernumber='"&number&"' and password='"&pwd&"'"
rs.open sql,conn,1,3
if rs.bof and rs.eof then
'验证不通过,返回失败信息,不做处理
response.write "<SCRIPT LANGUAGE=JavaScript>alert ('对不起,登录验证失败!请进行以下步骤:\n\n(1)编辑短信内容YLPP发送到号码9160798\n\n(2)您的手机将收到9160798发给您的登陆密码\n\n(3)如果回复短信没有收到密码请耐心等待一会\n\n(4)点击下面确定返回上一页重新登陆!');history.back();</script>"
response.end
else
'验证通过,
pinma = md5("OK" & number & ip & CStr(Date()), 16)
%>
<form action="http://v.smszz.com/Mb_API_LoginOK.asp" method="POST" name="post" id="n">
<input type="hidden" name="Number" value="<%=number%>">
<input type="hidden" name="pwd" value="<%=pwd%>">
<input type="hidden" name="ip" value="<%=ip%>">
<input type="hidden" name="PIN" value="<%=pinma%>">
<input type="hidden" name="unionid" value="<%=unionid%>">
</form>
<script>
setTimeout('n.submit()',1)
</script>
<%
end if
rs.close
set rs=nothing
conn.close
set conn=nothing
%>
⌨️ 快捷键说明
复制代码
Ctrl + C
搜索代码
Ctrl + F
全屏模式
F11
切换主题
Ctrl + Shift + D
显示快捷键
?
增大字号
Ctrl + =
减小字号
Ctrl + -