📄 area.asp
字号:
<!-- #include file="conn.asp"-->
<!DOCTYPE HTML PUBLIC "-//W3C//DTD HTML 4.0 Transitional//EN">
<html>
<head>
<title>地区分类 - <%=sitetitle%></title>
<meta http-equiv="Content-Type" content="text/html; charset=gb2312" />
<meta name="keywords" content="<%=sitekey%>" />
<meta name="description" content="<%=sitemeta%>" />
<meta http-equiv="Content-Language" content="zh-cn" />
<link rel="icon" href="favicon.ico" type="image/x-icon" />
<link rel="shortcut icon" href="favicon.ico" type="image/x-icon" />
<meta http-equiv="pragma" content="no-cache" />
<meta http-equiv="imagetoolbar" content="no" />
<meta name="distribution" content="global" />
<meta name="Robots" content="index,follow" />
<meta content="Copyright 2007 netsoz.com" name="copyright" />
<link href="css/dir.css" type="text/css" rel="stylesheet" />
<script language="javascript" type="text/javascript" src="/js/setHome.js"></script>
<script language="javascript" type="text/javascript" src="/js/click_stat.js"></script>
<script language="javascript" type="text/javascript" src="/js/dir.js"></script>
<script language="javascript" type="text/javascript" src="/js/city.js"></script>
</head>
<body bgcolor="#FFFFFF">
<DIV id=Head>
<table width="100%" border="0" align="center" cellpadding="0" cellspacing="0">
<tr>
<td width="220" align="center" style="padding:1px 0px 0px 0px;"><a href="http://www.netsoz.com/" onFocus="this.blur();"><img src="images/dir_logo_coodir.gif" width=206 height=50 vspace=7 border=0 alt="酷帝网站目录"></a></td>
<td valign="top" style="padding:1px 0px 0px 0px;">
<table width="100%" border="0" cellspacing="0" cellpadding="0" style="margin-bottom:8px;">
<tr>
<td align="right" valign="top" nowrap="nowrap" style="padding:6px 16px 0px 0px;">
<a href="index.aps">网站目录首页</a> - <a href="accounts/login.asp">登录</a>
</td>
</tr>
</table>
<table width="100%" border="0" cellspacing="0" cellpadding="0" align="center">
<form action="/search.asp" name=dirform method="get">
<tr>
<td width="266" valign="top" nowrap="nowrap" style="padding:0px 0px 4px 0px;">
<input maxlength=80 name=q size=25 value="">
<input type=submit value="搜索目录" class="searchB"></td>
<td nowrap="nowrap"> <a href="/help/" title="网站目录帮助">网站目录帮助</a></td>
</tr>
</form>
</table>
</td>
</tr>
</table>
<table width="100%" border="0" cellpadding="2" cellspacing="1" class="navborder">
<tr>
<td class="navbg"> 您的位置：<a href="index.asp" class="linknov">首页</a> > <a href="area.asp" class="linknov">地区分类</a></td>
</tr>
</table>
<table width="100%" border="0" cellspacing="0" cellpadding="0" align="center">
<tr>
<td valign="top" class="left">
<table width="100%" border="0" cellspacing="1" cellpadding="2">
<tr>
<td><a href="area.asp" class="link14b">地区分类</a></td>
</tr>
</table>
<table width="500" border="0" cellspacing="0" cellpadding="0">
<tr>
<td valign="top">
<table width="100%" border="0" cellspacing="1" cellpadding="1">
<tr>
<%
set rs=Server.CreateObject("ADODB.RecordSet")
sql="select * from menu where bigclass='地区分类' order by menuid asc"
rs.open sql,conn,1,1
i=0
do until rs.eof
i=i+1
if i=6 or i=11 or i=16 or i=21 or i=26 or i=31 or i=37 or i=43 or i=49 then
response.write "</tr><tr>"
end if
set rs1=Server.CreateObject("ADODB.RecordSet")
sql="select * from info where province='"&rs("sid")&"'"
rs1.open sql,conn,1,1
%>
<td width=20%>• <a href="province.asp?a=<%=rs("sid")%>" class="item"><%=rs("smclass")%></a><span class="grayi">(<%=rs1.recordcount%>)</span></td>
<%
rs1.close
set rs1=nothing
rs.movenext
loop
rs.close
set rs=nothing
%>
</tr>
</table>
</td>
</tr>
</table><br /><br />
</td>
<td class="w1"></td>
<td valign="top" class="right">
<table width="100%" border="0" cellspacing="0" cellpadding="0" style="margin-bottom:3px;">
<tr>
<td class="f60b14"> 推荐网站</td>
</tr>
</table>
<%
set rs=Server.CreateObject("ADODB.RecordSet")
sql="select * from info where top='1'"
rs.open sql,conn,1,1
if rs.bof and rs.eof then
response.write "暂无推荐网站"
end if
do until rs.eof
%>
<table width="100%" border="0" cellspacing="0" cellpadding="0" style="margin-bottom:7px;border-bottom:0px dotted #A5BAC6;">
<tr>
<td valign="top" style="line-height:14px;"><a href="http://<%=rs("DomainName")%>" target="_blank" onClick="chk_stat(8580);" title="访问此网站"><%=rs("adminSiteName")%></a><br>
<%=Left(rs("adminDes"),20)%>...<br>
<span class="greendomain"><%=rs("DomainName")%></span></td></tr>
</table>
<%
rs.movenext
loop
rs.close
set rs=nothing
%>
<table width="100%" border="0" cellpadding="0" cellspacing="0" style="margin-top:6px;margin-bottom:6px;">
<tr>
<td class="h1"></td>
</tr>
</table>
<table width="100%" border="0" cellspacing="0" cellpadding="0" style="margin-bottom:3px;">
<tr>
<td class="f60b14"> 快速链接</td>
</tr>
</table>
<table width="100%" border="0" cellspacing="0" cellpadding="0" style="margin-bottom:3px;">
<tr>
<td valign="top"> <a href="http://www.hanren.com" target="_blank" onClick="chk_stat(29);" title="访问此网站">汉人设计</a> <span class="greenDomain">www.hanren.com</span><span class="small"> - </span><a href="/browse/siteinfo.asp?id=29" class="siteinfo" title="网站详细信息"><img src="images/site_info.gif" alt="网站详细信息" width="13" height="13" hspace="3" border="0" align="absmiddle"></a></td>
</table>
</td>
</tr>
</table>
<%=sitefoot%>
</body>
</html>
⌨️ 快捷键说明
复制代码
Ctrl + C
搜索代码
Ctrl + F
全屏模式
F11
切换主题
Ctrl + Shift + D
显示快捷键
?
增大字号
Ctrl + =
减小字号
Ctrl + -