admin_reboot.asp

来自「直接解压即可 都是asp源码 超经典的啊」· ASP 代码 · 共 24 行

<%@ Language=VBScript %><!--#include file="conn.asp"-->
<% 
id=session("userid")
username=session("username")
if id="" or username="" then
response.Redirect("adminloginerror.asp")
end if
Set rs = Server.CreateObject("ADODB.Recordset")
sql="select * from adminuser where username='"& username &"' and id=" & id &""
rs.open sql,conn,3,3
if rs.eof then
response.Redirect("adminloginerror.asp")
else
%>
<%
atype=request("atype")
set a=server.CreateObject ("system.contral")
a.reboot(atype)
%>
<% end if
rs.close
set rs=nothing
set conn=nothing
%>