<%
if Instr(session("AdminPurview"),"|39,")=0 then
response.write ("
您没有管理该模块的权限!
")
response.end
end if
%>
<%dim Action
Action = Request("Action")
If Action="del" Then
Call Delip()
ElseIf Action="lock" Then
Call lockIP()
ElseIf Action="unlock" Then
Call UnLockip()
ElseIf Action="Logout" Then
Call Logout()
Else
Call Main()
End If
Sub Delip()
conn.execute("delete from NoHackSql where SqlIn_ID="&request("SqlIn_ID"))
Call Main()
End sub
Sub Lockip()
conn.execute("update NoHackSql set Kill_ip=true where SqlIn_ID="&request("SqlIn_ID"))
Call Main()
End sub
Sub UnLockip()
conn.execute("update NoHackSql set Kill_ip=False where SqlIn_ID="&request("SqlIn_ID"))
Call Main()
End sub
Sub Main()
%>