usercheckdo.asp

来自「蓝芒3.0A最新所有功能完整破解版」· ASP 代码 · 共 36 行

<% ModuleCode="M0815" %>
<!--#include file="../../Include/Reference.asp"-->
<%
Call PrintPageHead
%>
<!--#include file="../../Include/connect.asp"-->
<%

act=Request.QueryString("act")
UserID=Request.QueryString("UserID")
InIP=Request.ServerVariables("REMOTE_ADDR")

strSQL="SP_UserHandle '" & act & "'," & UserID & ",'"&Session("UserID")&"','"&UserPSW2&"','"&UserName&"','"&EUserName&"','"&EMail&"','"&Country&"','"&ECountry&"','"&Province&"','"&EProvince&"','"&City&"','"&ECity&"','"&Addr&"','"&EAddr&"','"&PostCode&"','"&Tel&"','"&Fax&"','"&Web&"','"&Status&"','"&Vocation&"','"&Employee&"','"&Trade&"',0,'"&Range&"','"&Introduce&"','"&InIP&"','"&QQ&"','"&MSN&"','"&CorpUser&"'"	
'Response.Write strSQL
'Response.End
Set Rs= Cn.Execute(strSQL)
%>                          
<br><br>
<p align="center" class="titletext"><%=Rs("msg")%> 
<%
if Rs("result")="SECCESS" then
%>
[<a href="UserCheck.asp" class="a2">返回</a>]
<%
else
%>
[<a href="#" onclick="javascript:history.go(-1)" class="a2">返回上一步</a>]
<%
end if
%>
</p>
<%
Call PrintPageBottom
Rs.Close
Cn.Close
%>