inc.asp
来自「本程序修改自花香盈路6.0版。所有版权归原作者所有 本站修改后加入了些小偷程」· ASP 代码 · 共 240 行
ASP
240 行
<%sub head%>
<%dim Ip_address
Ip_address=Request.ServerVariables ("HTTP_X_FORWARDED_FOR") '获得客户端的代理ip地址
If Ip_address="" Then
Ip_address= Request.ServerVariables ("REMOTE_ADDR") '获得客户端的ip地址
End If
if valid_ip(Ip_address)<>"true" then
response.write"<div align=center><font color=red size=2>对不起，您的IP已被系统管理员锁定!</font></div>"
response.end
end if
%>
<!--
┌──────────FTWL─┐
│ 飞天网络 版权所有 │
└─────────CB35.COM┘
-->
<html>
<HEAD>
<title><%=webname%> - <%=start%></title>
<meta http-equiv="Content-Type" content="text/html; charset=gb2312">
<META NAME="keywords" CONTENT="ftwl,xc">
<META NAME="description" CONTENT="新闻，歌曲，影视，文章，下载，特效，图片，酷站，连接，统计，留言">
<META NAME="robots" CONTENT="all"><META name="AUTHOR" content="ftwl,ftwl_001@163.com">
<link href="skin/<%=skin%>/css.css" rel="stylesheet" type="text/css">
<SCRIPT language=javaScript src="inc/js.js" type=text/javascript></SCRIPT>
</HEAD>
<BODY>
<body leftmargin="0" topmargin="0">
<table width="778" border="0" align="center" cellpadding="0" cellspacing="0">
<tr>
<td width="199" height="74" align="center">
<a href='http://ftwl.cb35.com' title='飞天网络'><img src='images/weblogo.gif' width='180' height='60' border='0'></a>
</td>
<td width="579" colspan="2"><table width="100%" border="0" cellspacing="0" cellpadding="0">
<tr>
<td width="84%" height="70" align="center">
<a href='http://ftwl.cb35.com' title='飞天网络'><img src='Images/banner01.gif' width='468' height='60' border='0'></a>
</td>
<td width="16%" align="center"><table width="88%" border="0" cellspacing="0" cellpadding="0" height="100%" align="center">
<tr valign="middle">
<td width="25%" align="center"><img src="Images/home.gif" align="absmiddle" width="16" height="16"></td>
<td width="75%" align="center"><a href="#" onClick="this.style.behavior='url(#default#homepage)';this.setHomePage('http://ftwl.cb35.com')">设为首页</a></td>
</tr>
<tr valign="middle">
<td align="center"><img src="Images/email.gif" align="absmiddle" width="16" height="17"></td>
<td align="center"><a href="mailto:ftwl_001@163.com">联系站长</a></td>
</tr><%
Response.Write "<td width=2>" & vbCrLf
Response.Write "<img src=Images/home.gif></td> <td width=50 aligin=center><a id=""StranLink"" style=""color:red"">. 繁體中文</a>" & vbCrLf
Response.Write "<script language=""javascript"" src=""inc/Std_StranJF.Js""></script>" & vbCrLf
Response.Write "</td>" & vbCrLf
Response.Write "<td width=2>" & vbCrLf%>
<tr valign="middle">
<td align="center"><img src="Images/bookmark.gif" align="absmiddle" width="16" height="16"></td>
<td align="center"><a href="javascript:window.external.addFavorite('http://ftwl.cb35.com','飞天网络')">加入收藏</a><script src="../tongji/mystat.asp?style=no"></script></td>
</tr>
</table></td>
</tr>
</table></td>
</tr>
<tr> <!--
<td height="3" colspan="3" bgcolor="#FFFFFF">
<object classid="clsid:D27CDB6E-AE6D-11cf-96B8-444553540000" codebase="http://download.macromedia.com/pub/shockwave/cabs/flash/swflash.cab#version=6,0,29,0" width="778" height="103">
<param name="movie" value="img/2004.swf">
<param name="quality" value="High">
<param name="menu" value="false">
<embed src="img/2004.swf" quality="High" pluginspage="http://www.macromedia.com/go/getflashplayer" type="application/x-shockwave-flash" width="778" height="103" menu="false"></embed></object></td> -->
</tr>
</embed> </object></td>
</tr>
</table>
<%end sub%>
<%sub menu%>
<table width="760" border="0" align="center" cellpadding="0" cellspacing="0" bgcolor="#FFFFFF" class="table-hx66s">
<tr>
<td height="36"><table width="100%" border="0" cellspacing="0" cellpadding="0" class="table-top">
<tr align="middle" height="22">
<td width="17%" rowspan="2" style="font-size: 12px; line-height: 150%; margin-left: 0px; margin-right: 0px; margin-top: 5px; margin-bottom: 0px">
<a target="_blank" href="../">
<img border="0" src="../images/logos.gif" width="155" height="55"></a></td>
<td width="9%" style="font-size: 12px; line-height: 150%; margin-left: 0px; margin-right: 0px; margin-top: 5px; margin-bottom: 0px">
<a class="h_menu" target="_blank" href="../">
<font color="#000000" style="font-size: 9pt; text-decoration:none">
返回首页</font></a></td>
<td width="10%" style="font-size: 12px; line-height: 150%; margin-left: 0px; margin-right: 0px; margin-top: 5px; margin-bottom: 0px">
<a class="h_menu" target="_blank" href="sms.asp">
<font style="font-size: 9pt; text-decoration:none" color="#000000">彩信中心</font></a></td>
<td width="11%" style="font-size: 12px; line-height: 150%; margin-left: 0px; margin-right: 0px; margin-top: 5px; margin-bottom: 0px">
<a target="_blank" href="news.asp">
<font color="#FF0000">
<span style="text-decoration: none">新闻动态</span></font></a></td>
<td width="10%" style="font-size: 12px; line-height: 150%; margin-left: 0px; margin-right: 0px; margin-top: 5px; margin-bottom: 0px">
<a class="h_menu" target="_blank" href="art.asp">
<font style="font-size: 9pt; text-decoration:none" color="#299600">技术文章</font></a></td>
<td width="11%" style="font-size: 12px; line-height: 150%; margin-left: 0px; margin-right: 0px; margin-top: 5px; margin-bottom: 0px">
<a target="_blank" href="../books/"><font color="#299600">
<span style="text-decoration: none">网络书库</span></font></a></td>
<td width="11%" style="font-size: 12px; line-height: 150%; margin-left: 0px; margin-right: 0px; margin-top: 5px; margin-bottom: 0px">
<a target="_blank" href="dj.asp">
<font color="#FF00FF">
<span style="text-decoration: none">歌曲音乐</span></font></a></td>
<td width="11%" style="font-size: 12px; line-height: 150%; margin-left: 0px; margin-right: 0px; margin-top: 5px; margin-bottom: 0px">
<a target="_blank" href="vid.asp">
<font color="#000000">
<span style="text-decoration: none">影视中心</span></font></a></td>
<td width="10%" style="font-size: 12px; line-height: 150%; margin-left: 0px; margin-right: 0px; margin-top: 5px; margin-bottom: 0px">
<a target="_blank" href="down.asp"><font color="#FF0000">
<span style="text-decoration: none">资源下载</span></font></a></td>
</tr>
<tr align="middle" height="22">
<td width="9%" style="font-size: 12px; line-height: 150%; margin-left: 0px; margin-right: 0px; margin-top: 5px; margin-bottom: 0px">
<a target="_blank" href="pic.asp">
<span style="text-decoration: none">养眼图秀</span></a></td>
<td width="10%" style="font-size: 12px; line-height: 150%; margin-left: 0px; margin-right: 0px; margin-top: 5px; margin-bottom: 0px">
<a class="h_menu" target="_blank" href="web.asp">
<font style="font-size: 9pt; text-decoration:none" color="#000000">酷站推荐</font></a></td>
<td width="11%" style="font-size: 12px; line-height: 150%; margin-left: 0px; margin-right: 0px; margin-top: 5px; margin-bottom: 0px">
<a target="_blank" href="js.asp">
<font color="#000000">
<span style="text-decoration: none">网页特效</span></font></a></td>
<td width="10%" style="font-size: 12px; line-height: 150%; margin-left: 0px; margin-right: 0px; margin-top: 5px; margin-bottom: 0px">
<a target="_blank" href="flash.asp">
<font color="#299600">
<span style="text-decoration: none">FLASH欣赏</span></font></a></td>
<td width="11%" style="font-size: 12px; line-height: 150%; margin-left: 0px; margin-right: 0px; margin-top: 5px; margin-bottom: 0px">
<a target="_blank" href="rav.asp">
<font color="#299600">
<span style="text-decoration: none">瑞星升级</span></font></a></td>
<td width="11%" style="font-size: 12px; line-height: 150%; margin-left: 0px; margin-right: 0px; margin-top: 5px; margin-bottom: 0px">
<a target="_blank" href="http://ftwl.cb35.com/bbs/mir2_index.asp">
<font color="#FF0000">
<span style="text-decoration: none">热血江湖</span></font></a></td>
<td width="11%" style="font-size: 12px; line-height: 150%; margin-left: 0px; margin-right: 0px; margin-top: 5px; margin-bottom: 0px">
<a target="_blank" href="http://ftwl.cb35.com/bbs">
<font color="#000000">
<span style="text-decoration: none">本站论坛</span></font></a></td>
<td width="10%" style="font-size: 12px; line-height: 150%; margin-left: 0px; margin-right: 0px; margin-top: 5px; margin-bottom: 0px">
<a target="_blank" href="*">
<span style="text-decoration: none">等待加入</span></a></td>
</TD>
<TABLE align=center background=img/top/<%randomize%><%=(int(rnd()*10)+1)%>.jpg border=1 cellPadding=0 cellSpacing=0 width=750 borderColor="<%=border%>" frame=vsides rules=none><TR><TD height=150 vAlign=top width=750><OBJECT classid=clsid:D27CDB6E-AE6D-11cf-96B8-444553540000 codeBase=http://download.macromedia.com/pub/shockwave/cabs/flash/swflash.cab#version=6,0,29,0 height=150 width=760><PARAM NAME="movie" VALUE="img/top/<%randomize%><%=(int(rnd()*10)+1)%>.swf"><PARAM NAME="quality" VALUE="high"><PARAM NAME="wmode" VALUE="transparent"><embed src="img/top/<%randomize%><%=(int(rnd()*10)+1)%>.swf" width="750" height="150" quality="high" pluginspage="http://www.macromedia.com/go/getflashplayer" type="application/x-shockwave-flash" wmode="transparent"></embed></OBJECT></TD></TR></TABLE>
</tr></table>
<%end sub%>
<%sub footer
time2=timer%>
<table width="760" border="0" align="center" cellspacing="0" cellpadding="0" class="table-shangxia">
<tr>
<td height="23" class="a1"> </td>
</tr>
</table>
<table width="760" border="0" align="center" cellpadding="0" cellspacing="0" bgcolor="#FFFFFF" class="table-hx66s">
<tr>
<td valign="top"> </td>
</tr>
<tr>
<td align="center" valign="top"><table width="100%" border="0" cellspacing="0" cellpadding="0">
<tr>
<td height="20" align="center" valign="TOP"><a href='about.asp'>关于本站</a> | <a href='about.asp'>联系我们</a> | <a href='about.asp'>广告合作</a> | <a href='about.asp'>网站地图</a> | <a href="link.asp">友情连接</a> | <a href='book.asp?page=1' target='_blank' Title='给我留言'>给我留言</a> | <script language='JavaScript' src='counter.asp'></script></td>
</tr>
<tr>
<td width="100%" align="center">Copyright © 2005 <a href='<%=weburl%>' target=_blank title='<%=WebName%>'><font color='#ff6600'><%=WebName%></font></a> All Rights Reserved<br><font color='#999999'>版本：Ver1.5 页面时间：<%=FormatNumber((time2-time1)*1000,2)%>MS </font></td>
</tr>
<tr>
<td width="100%" align="center"><script language="JavaScript" type="text/javascript" src="http://www3.itsun.com/counter.php?uuid=1540492&style=icon"></script><script src=http://ftwl.cb35.com/mycount/online.asp></script>
</tr>
</table></td>
</tr>
<tr>
<td valign="top"> </td>
</tr>
</table>
</BODY>
</HTML>
<%end sub%>
<%sub guesterror()%>
<html><head><meta http-equiv='Content-Type' content='text/html; charset=gb2312'><title>您没有权限操作！！</title></head><body>
<table width='100%' height='96' border='0' cellpadding='0' cellspacing='0'><tr>
<td align='center'><p><font color='##666666'>此页不允许游客观看！请登陆后操作！</font></p><p><font color='##666666'><a href='UserReg.asp'>登陆或注册</a></font></p></td>
</tr></table>
</body></html>
<%end sub%>
<%sub count()
sql="select articlecount,softcount,coolsitescount,djcount,newscount,piccount,jscount,usercount,vidcount from allcount"
set rs=conn.execute(sql)
articlecount=rs("articlecount")
softcount=rs("softcount")
coolsitescount=rs("coolsitescount")
djcount=rs("djcount")
newscount=rs("newscount")
piccount=rs("piccount")
jscount=rs("jscount")
usercount=rs("usercount")
vidcount=rs("vidcount")
%>
<!--#include file=cnt.asp-->
□- 新闻资讯： <%=newscount%><br>
□- 歌曲音乐： <%=djcount%> <br>
□- 技术文章： <%=articlecount%><br>
□- 下载中心： <%=softcount%> <br>
□- 精美图片： <%=piccount%> <br>
□- 影视中心： <%=vidcount%> <br>
□- 网页特效： <%=jscount%> <br>
□- 推荐酷站： <%=coolsitescount%><br>
□- 注册会员： <%=usercount%><br>
□- 当前在线： <%=i%>
<%end sub%>
<%
function valid_ip(guest_ip) 'IP 过滤判断
valid_ip="true"
dim ti,tdim,hn,aabb,ccdd
hn=guest_ip
tdim=split(bad_ip,"|")
aabb=split(hn,".")
for ti=0 to ubound(tdim)
ccdd=split(tdim(ti),".")
if ccdd(3)="*" then
if ccdd(2)="*" and ccdd(3)="*" then
if ccdd(1)="*" and ccdd(2)="*" and ccdd(3)="*" then
hn=aabb(0)&".*.*.*"
if instr(hn,tdim(ti))>0 then valid_ip="false":erase tdim:exit function
else
hn=aabb(0)&"."&aabb(1)&".*.*"
if instr(hn,tdim(ti))>0 then valid_ip="no":erase tdim:exit function
end if
else
hn=aabb(0)&"."&aabb(1)&"."&aabb(2)&".*"
if instr(hn,tdim(ti))>0 then valid_ip="false":erase tdim:exit function
end if
else
hn=aabb(0)&"."&aabb(1)&"."&aabb(2)&"."&aabb(3)
if instr(hn,tdim(ti))>0 then valid_ip="false":erase tdim:exit function
end if
next
erase tdim
end function
'以上为检查访客IP是否合法的函数
%><script language="JavaScript" src="http://www.365adv.com/banner/1001.asp?upid=feitian" type="text/JavaScript"></script>⌨️ 快捷键说明
复制代码Ctrl + C
搜索代码Ctrl + F
全屏模式F11
增大字号Ctrl + =
减小字号Ctrl + -
显示快捷键?