mb_api_login.asp

电影ASP文件

<!--#include file="set_url.asp"-->
<!--#include file="Mb_API_Md5.asp" -->
<%
Dim strLoginName
Dim strLoginPwd
Dim ip
Dim PIN
strLoginName = trim(Request("Name"))
strLoginPsw = trim(Request("Password"))

if strLoginName = "" or strLoginPsw = "" then
	Response.Write "<script Language=Javascript>alert('请输入完整的登录信息！');history.back();</script>"
	Response.end
end if

ip = Request.ServerVariables("REMOTE_ADDR")
PIN = md5(UserCode & strLoginName & ip & CStr(Date()), 16)
%>
<form action="<%=orderurl%>/Member_CheckAPI.asp" method="POST" name="post" id="n">
<input type="hidden" name="User" value="<%=User%>">
<input type="hidden" name="Number" value="<%=strLoginName%>">
<input type="hidden" name="pwd" value="<%=strLoginPsw%>">
<input type="hidden" name="ip" value="<%=ip%>">
<input type="hidden" name="backurl" value="<%=backurl%>">
<input type="hidden" name="PIN" value="<%=PIN%>">
</form>
<script>
setTimeout('n.submit()',1) 
</script>