📄 viewip.asp
字号:
<!--#include file="conn.asp"-->
<!--#include file="const.asp"-->
<% ipcheck()
If Request("id")="" Then
Response.Write("<script language=javascript>window.close();</script>")
Response.End()
End If
If session("kenanbook")<>"" Then
Call viewip()
Else
If Request.Querystring("style")<>"chk" Then
Call login()
Else
user=Replace(Trim(Request.Form("user")),"'","''")
pass=Replace(Trim(Request.Form("pass")),"'","''")
chksql="select * from admin where admin='"&user&"' and password='"&pass&"'"
set chkrs=conn.execute(chksql)
If chkrs.bof Then
chkrs.close
set chkrs=nothing
connclose()
Response.Write("<center><br><br>管理员姓名和密码错误。<a href=javascript:history.back()>请重新输入！！！</a></center>")
Else
chkrs.close
set chkrs=nothing
session("kenanbook")=user
Call viewip()
End If
End If
End If
%>
<html>
<title>无标题文档</title>
<% If session("kenanbook")<>"" Then %>
<script language=javascript>
function rusure()
{ question = confirm("你 确 定 要 屏 蔽 IP 吗?")
if (question !="0")
{ parent.right.location = "loginout.asp" }
}
</script>
<% End If %>
</head>
<body>
<center>
<br>
</center>
</body>
</html>
<% sub login() %><br>
<form name="form1" method="post" action="viewip.asp?style=chk">
<table width="400" height="134" border="0" align="center" cellpadding="0" cellspacing="0" class="table002">
<tr>
<td width="170" align="center">管理员姓名:</td>
<td width="230"><input name="user" type="text" id="user" size="18"></td>
</tr>
<tr>
<td align="center">管理员密码:</td>
<td><input name="pass" type="password" id="pass" size="18"></td>
</tr>
<tr>
<td><input type="hidden" name="id" value="<%=Request("id")%>"></td>
<td><input type="submit" name="Submit" value="确认"> <input type="button" name="close" value="取消" onClick="javascript:window.close()"></td>
</tr>
</table>
</form>
<% end sub
sub viewip()
sql="select user,ip from content where ID="&Request("id")
set rs=conn.execute(sql)
%>
<br>
<table width="400" height="92" border="0" align="center" cellpadding="0" cellspacing="0" class="table002">
<tr>
<td width="126" align="center">管理操作：查看IP </td>
</tr>
<tr align="center">
<td align="center"> 访客<%=rs("user")%>的IP地址是:<%=rs("ip")%></td>
</tr>
<tr>
<td align="center"><a href=javascript:window.close()>关闭此窗口</a> <a href=lockip.asp?id=<%=Request("id")%> onClick="rusure(); return false;">屏蔽此IP</a></td>
</tr>
</table>
<%
connclose()
end sub %>
⌨️ 快捷键说明
复制代码
Ctrl + C
搜索代码
Ctrl + F
全屏模式
F11
切换主题
Ctrl + Shift + D
显示快捷键
?
增大字号
Ctrl + =
减小字号
Ctrl + -