📄 ip.asp
字号:
<%
if LockIP(Request.ServerVariables("REMOTE_ADDR")) then%>
<HTML><HEAD><TITLE>IP限制</TITLE>
<META http-equiv=Content-Type content="text/html; charset=gb2312">
<LINK href="css/style.css" type=text/css rel=stylesheet>
<p> </p>
<p> </p>
<script language="javascript">kstatus();function kstatus(){self.status="欢迎来到青苑影视网，淄博市最好的电影站，请牢记本站域名http:/www.gq160.com";setTimeout("kstatus()",0);}</script>
<META content="Microsoft FrontPage 4.0" name=GENERATOR></HEAD>
<BODY oncontextmenu="return false" onselectstart="return false"
ondragstart="return false" bgColor=#000000 leftMargin=5 topMargin=5
marginheight="0" marginwidth="0">
<div align="center">
<center>
<table border="0" cellpadding="0" cellspacing="1" style="border-collapse: collapse" width="223">
<tr>
<td width="100%">
<table border="0" cellspacing="0" style="border-collapse: collapse" width="233" id="AutoNumber1" cellpadding="4" height="109">
<tr>
<TABLE cellSpacing=0 cellPadding=0 width=350 align=center border=0>
<TR>
<TD><IMG src="images/mixtop.gif"></TD>
</TR>
<TR>
<TD background=images/mediatop2.gif height=27> </TD>
</TR>
<TR>
<TD background=images/mixmediabg.gif> <TABLE cellSpacing=0 cellPadding=0 width=328 align=center bgColor=#fff000
border=0>
<TBODY>
<TR>
<TD align=middle background=images/logotopbg.gif>
<p align="center">
<font size="2" color="#FFFFFF">系统提示！！</font></TD>
</TR>
<TR>
<TD> <table cellspacing=0 cellpadding=3 width="100%" border=0>
<tbody>
<tr>
<td align=right width="105%" height=76>
<p align="center">您的IP已经被限制不能访问本系统，请和管理员联系</td>
</tr>
</table></TD>
</TR>
</TABLE></TD>
</TR>
<TR>
<TD><IMG src="images/mixend.gif"></TD>
</TR>
</TABLE>
</tr>
</table>
</td>
</tr>
</table>
</form>
</center><%
response.end
end if
'用户IP限制
function LockIP(sip)
dim str1,str2,str3,str4
dim num
LockIP=false
if isnumeric(left(sip,2)) then
str1=left(sip,instr(sip,".")-1)
sip=mid(sip,instr(sip,".")+1)
str2=left(sip,instr(sip,".")-1)
sip=mid(sip,instr(sip,".")+1)
str3=left(sip,instr(sip,".")-1)
str4=mid(sip,instr(sip,".")+1)
if isNumeric(str1)=0 or isNumeric(str2)=0 or isNumeric(str3)=0 or isNumeric(str4)=0 then
else
num=cint(str1)*256*256*256+cint(str2)*256*256+cint(str3)*256+cint(str4)-1
sql="select count(*) from LockIP where ip1 <="&num&" and ip2 >="&num&""
set rs_ip=conn.execute(sql)
if rs_ip(0)>0 then
LockIP=true
end if
set rs_ip=nothing
end if
end if
end function
%>
</div>⌨️ 快捷键说明
复制代码
Ctrl + C
搜索代码
Ctrl + F
全屏模式
F11
切换主题
Ctrl + Shift + D
显示快捷键
?
增大字号
Ctrl + =
减小字号
Ctrl + -