tinggong.asp

来自「商务网络站点程序」· ASP 代码 · 共 27 行

<%
if session("username")="" or session("password")="" then
   session.timeout=5
   response.write "<script language='javascript'>"
   response.write "alert('账号或密码错误！');"
   response.write "history.go(-1);"
   response.write "</script>"
   response.end
end if
%>
<!--#include file="../conn.asp"-->
<%
   dim sql 
   dim rs
   set rs=server.createobject("adodb.recordset")
   sql="update admin set key='0' where id=2"
   conn.execute sql
   set rs=nothing  
   conn.close
   set conn=nothing
   response.write "<script language='javascript'>"
   response.write "alert('管理员已经停工了！');"
   response.write "history.go(-1);"
   response.write "</script>"
   response.end 
   
%>