accountshdo.asp

蓝芒3.0A最新所有功能完整破解版

<% ModuleCode="M0225" %>
<!--#include file="../../Include/Reference.asp"-->
<%
Call PrintPageHead
%>
<!--#include file="../../Include/connect.asp"-->
<%
if Request.QueryString("act")="1" then
	strSQL="exec sp_Account_Handle " & +_
		"'" & Session("UserID") & "'," & +_
		"'" & "审核" & "'," & +_
		"'" & Request.QueryString("UAID") & "'," & +_
		"'" & "" & "'," & +_
		"'" & "" & "'," & +_
		"'" & "" & "'," & +_
		"'" & "" & "'," & +_
		"'" & "" & "'," & +_
		"'" & "" & "'," & +_
		"'" & Request.ServerVariables("REMOTE_ADDR") & "'"
else
	strSQL="exec sp_Account_Handle " & +_
		"'" & Session("UserID") & "'," & +_
		"'" & "作废" & "'," & +_
		"'" & Request.QueryString("UAID") & "'," & +_
		"'" & "" & "'," & +_
		"'" & "" & "'," & +_
		"'" & "" & "'," & +_
		"'" & "" & "'," & +_
		"'" & "" & "'," & +_
		"'" & "" & "'," & +_
		"'" & Request.ServerVariables("REMOTE_ADDR") & "'"
end if
Set Rs= Cn.Execute(strSQL)
%>
<br><br>
<p align="center" class="titletext"><%=Rs("msg")%> [<a href="AccountSH.asp" class="a2">返回上一步</a>]</p>
<%
Call PrintPageBottom
Rs.Close
Cn.Close
%>