点击A栏目的内容，却出现C栏目的内容
点击A栏目的内容，却出现C栏目的内容,点击C栏目的内容，出现D栏目的内容。没有规律。请问这是怎么回事？就是点击供应求购信息推荐，出现的是招生培训信息推荐中的内容，就是点击评估房产信息推荐，出来的是家政搬家信息推荐的内容，反正都是乱的。点击招工招聘信息推荐，出来的是错误页面：
·
ADODB.Field 错误 '80020009'
BOF 或 EOF 中有一个是“真”，或者当前的记录已被删除，所需的操作要求一个当前的记录。
/company/sub_company.asp，行 0
不摘这样说是否讲清楚了。下面是这段代码。
<table width="615" border="0" cellspacing="0" cellpadding="0">
<tr align="left" valign="top">
<td width="309" valign="top" height="166" align="left"><table width="300" border="0" cellspacing="0" cellpadding="0" class="xu_kuan">
<tr>
<td bgcolor="#fff3b5" width="23" align="center" valign="middle" class="font" height="23"><font color="#FF6600"><img src="images/icon07.gif" width="14" height="13"></font></td>
<td bgcolor="#fff3b5" width="168" align="left" valign="middle" class="font" height="23"><font color="#FF6600">招工招聘信息推荐</font></td>
<td bgcolor="#fff3b5" width="118" align="left" valign="middle" class="font" height="23"><img src="images/index_r34_c20.gif" width="108" height="15"></td>
</tr>
</table>
<%
strSql="select top 5 * from company where type='1' order by id desc"
set rs=Server.CreateObject("ADODB.RecordSet")
rs.open strSql,conn,3,3
%>
<%do while not rs.eof%>
<font color="#FF6600">·</font><a href="company/sub_company.asp?id=<%=rs("id")%>&type=1" target="_blank" class="menu"><font color=<%=rs("color")%>><%=left(rs("company"),11)%> <%=rs("tel")%></font></a>
<%
rs.movenext
if not rs.eof then
response.write "<br>"
end if
loop%>
<table width="299" border="0">
<tr>
<td width="293"><div align="right"><img src="images/index_r20_c15.gif" width="131" height="3"><br>
<a href="sell1.asp" class="ffbyfont2">更多信息>>></a></div></td>
</tr>
</table></td>
<td width="306" height="147" align="left" valign="top"><table width="305" border="0" cellspacing="0" cellpadding="0" class="xu_kuan">
<tr>
<td bgcolor="#fff3b5" width="23" align="center" valign="middle" class="font" height="23"><font color="#FF6600"><img src="images/icon15.gif" width="12" height="12"></font></td>
<td bgcolor="#fff3b5" width="168" align="left" valign="middle" class="font" height="23"><font color="#FF6600">供应求购信息推荐</font></td>
<td bgcolor="#fff3b5" width="118" align="left" valign="middle" class="font" height="23"><img src="images/index_r34_c20.gif" width="108" height="15"></td>
</tr>
</table>
<%
strSql="select top 5 * from company where type='2' order by id desc"
set rs=Server.CreateObject("ADODB.RecordSet")
rs.open strSql,conn,3,3
%>
<%do while not rs.eof%>
<font color="#FF6600">·</font><a href="company/sub_company.asp?id=<%=rs("id")%>&type=2" target="_blank" class="menu"><font color=<%=rs("color")%>><%=left(rs("company"),11)%> <%=rs("tel")%></font></a>
<%
rs.movenext
if not rs.eof then
response.write "<br>"
end if
loop%>
<table width="299" border="0">
<tr>
<td width="293"><div align="right"><img src="images/index_r20_c15.gif" width="131" height="3"><br>
<a href="sell5.asp" class="ffbyfont2">更多信息>>></a></div></td>
</tr>
</table></td>
</tr>
</table></td>
</tr>
</table></td>
</tr>
</table>
<table width="615" border="0" cellspacing="0" cellpadding="0">
<tr align="left" valign="top">
<td width="309" valign="top" height="166" align="left">
<table width="300" border="0" cellspacing="0" cellpadding="0" class="xu_kuan">
<tr>
<td bgcolor="#fff3b5" width="23" align="center" valign="middle" class="font" height="23"><font color="#FF6600"><img src="images/icon09.gif" width="14" height="13"></font></td>
<td bgcolor="#fff3b5" width="168" align="left" valign="middle" class="font" height="23"><font color="#FF6600">装簧装饰信息推荐</font></td>
<td bgcolor="#fff3b5" width="118" align="left" valign="middle" class="font" height="23"><img src="images/index_r34_c20.gif" width="108" height="15"></td>
</tr>
</table>
<%
strSql="select top 5 * from company where type='3' order by id desc"
set rs=Server.CreateObject("ADODB.RecordSet")
rs.open strSql,conn,3,3
%>
<%do while not rs.eof%>
<font color="#FF6600">·</font><a href="company/sub_company.asp?id=<%=rs("id")%>&type=3" target="_blank" class="menu"><font color=<%=rs("color")%>><%=left(rs("company"),11)%> <%=rs("tel")%></font></a>
<%
rs.movenext
if not rs.eof then
response.write "<br>"
end if
loop%>
<table width="299" border="0">
<tr>
<td width="293"><div align="right"><img src="images/index_r20_c15.gif" width="131" height="3"><br>
<a href="sell6.asp" class="ffbyfont2">更多信息>>></a></div></td>
</tr>
</table></td>
<td width="306" height="147" align="left" valign="top"><table width="305" border="0" cellspacing="0" cellpadding="0" class="xu_kuan">
<tr>
<td bgcolor="#fff3b5" width="23" align="center" valign="middle" class="font" height="23"><font color="#FF6600"><img src="images/icon11.gif" width="12" height="12"></font></td>
<td bgcolor="#fff3b5" width="168" align="left" valign="middle" class="font" height="23"><font color="#FF6600">家政搬家信息推荐</font></td>
<td bgcolor="#fff3b5" width="118" align="left" valign="middle" class="font" height="23"><img src="images/index_r34_c20.gif" width="108" height="15"></td>
</tr>
</table>
<%
strSql="select top 5 * from company where type='4' order by id desc"
set rs=Server.CreateObject("ADODB.RecordSet")
rs.open strSql,conn,3,3
%>
<%do while not rs.eof%>
<font color="#FF6600">·</font><a href="company/sub_company.asp?id=<%=rs("id")%>&type=4" target="_blank" class="menu"><font color=<%=rs("color")%>><%=left(rs("company"),11)%> <%=rs("tel")%></font></a>
<%
rs.movenext
if not rs.eof then
response.write "<br>"
end if
loop%>
<table width="299" border="0">
<tr>
<td width="293"><div align="right"><img src="images/index_r20_c15.gif" width="131" height="3"><br>
<a href="sell7.asp" class="ffbyfont2">更多信息>>></a></div></td>
</tr>
</table></td>
</tr>
</table>
<table width="615" border="0" cellspacing="0" cellpadding="0">
<tr align="left" valign="top">
<td width="309" valign="top" height="166" align="left">
<table width="300" border="0" cellspacing="0" cellpadding="0" class="xu_kuan">
<tr>
<td bgcolor="#fff3b5" width="22" align="center" valign="middle" class="font" height="23"> <font color="#FF6600"><img src="images/icon03.gif" width="17" height="13"></font></td>
<td bgcolor="#fff3b5" width="164" align="left" valign="middle" class="font" height="23"><font color="#FF6600">评估房产信息推荐</font></td>
<td bgcolor="#fff3b5" width="114" align="left" valign="middle" class="font" height="23"><img src="images/index_r34_c20.gif" width="108" height="15"></td>
</tr>
</table>
<%
strSql="select top 5 * from company where type='5' order by id desc"
set rs=Server.CreateObject("ADODB.RecordSet")
rs.open strSql,conn,3,3
%>
<%do while not rs.eof%>
<font color="#FF6600">·</font><a href="company/sub_company.asp?id=<%=rs("id")%>&type=5" target="_blank" class="menu"><font color=<%=rs("color")%>><%=left(rs("company"),11)%> <%=rs("tel")%></font></a>
<%
rs.movenext
if not rs.eof then
response.write "<br>"
end if
loop%>
<table width="299" border="0">
<tr>
<td width="293"><div align="right"><img src="images/index_r20_c15.gif" width="131" height="3"><br>
<a href="sell8.asp" class="ffbyfont2">更多信息>>></a></div></td>
</tr>
</table></td>
<td width="306" height="147" align="left" valign="top"><table width="300" border="0" cellspacing="0" cellpadding="0" class="xu_kuan">
<tr>
<td bgcolor="#fff3b5" width="23" align="center" valign="middle" class="font" height="23"><font color="#FF6600"><img src="images/icon08.gif" width="17" height="14"></font></td>
<td bgcolor="#fff3b5" width="168" align="left" valign="middle" class="font" height="23"><font color="#FF6600"><font color="#FF6600">招生培训信息推荐</font></td>
<td bgcolor="#fff3b5" width="118" align="left" valign="middle" class="font" height="23"><img src="images/index_r34_c20.gif" width="108" height="15"></td>
</tr>
</table>
<%
strSql="select top 5 * from company where type='6' order by id desc"
set rs=Server.CreateObject("ADODB.RecordSet")
rs.open strSql,conn,3,3
%>
<%do while not rs.eof%>
<font color="#FF6600">·</font><a href="company/sub_company.asp?id=<%=rs("id")%>&type=6" target="_blank" class="menu"><font color=<%=rs("color")%>><%=left(rs("company"),11)%> <%=rs("tel")%></font></a>
<%
rs.movenext
if not rs.eof then
response.write "<br>"
end if
loop%>
<table width="299" border="0">
<tr>
<td width="293"><div align="right"><img src="images/index_r20_c15.gif" width="131" height="3"><br>
<a href="sell9.asp" class="ffbyfont2">更多信息>>></a></div></td>
</tr>
</table></td>
</tr>
</table></td>
</tr>
</table></td>
下面是sub_company.asp代码
<!--#include file=../system/include/config.asp-->
<!--#include file=../share/conn_system.asp-->
<!--#include file=../system/include/function.asp-->
<%
if request("id")="" then
response.write "对不起，参数出错了！请重新访问此页!"
response.end
end if
%>
<html>
<head>
<title>公司简介</title>
<meta http-equiv="Content-Type" content="text/html; charset=gb2312">
<link rel="stylesheet" href="../style.css" type="text/css">
</head>
<style>
body{ scrollbar-face-color:fd9035; scrollbar-shadow-color:ffffff; scrollbar-highlight-color:ffffff; scrollbar-3dlight-color:ffffff; scrollbar-darkshadow-color:ffffff; scrollbar-track-color:ffefd7; scrollbar-arrow-color:ffffff;}
.yellow_kuan { border: 3px solid #FFcF00; }</style>
<%
dim strSql,rs,i,PageNo
strSql="select * from [company] where id=" & request("id")
set rs=Server.CreateObject("ADODB.RecordSet")
rs.open strSql,conn,3,3
%>
<body bgcolor="#FFcF00" text="#000000" leftmargin="0" topmargin="0">
<table width="500" border="0" cellspacing="0" cellpadding="0" align="center" bgcolor="#FFFFFF">
<tr>
<td width="145"><img src="images/company_r1_c3.gif" width="142" height="28"></td>
<td width="355" align="right" valign="middle"><img src="images/company_r2_c11.gif" width="140" height="10"></td>
</tr>
</table>
<table width="500" border="0" cellspacing="0" cellpadding="0" align="center" bgcolor="#FFF5CE">
<tr>
<td background="images/company_r5_c2.gif" width="435"><img src="images/company_r5_c2.gif" width="3" height="1"></td>
<td background="images/company_r5_c2.gif" width="65"><img src="images/company_r5_c2.gif" width="3" height="1"></td>
</tr>
<tr>
<td height="188" colspan="2" align="left" valign="top">
<table width="480" border="0" cellspacing="0" cellpadding="0" align="center">
<tr>
<td align="left" height="33" valign="bottom"><B><font color="#FF0000">·</font><%=rs("company")%></b></td>
</tr>
<tr>
<td align="left" height="9" valign="top"><img src="images/company_line.gif" width="475" height="3"></td>
</tr>
</table>
<table width="480" border="0" cellspacing="0" cellpadding="0" align="center">
<tr>
<td width="61" class="font" align="center" valign="middle" height="20"><font color="#FF6600">公司地址：</font></td>
<td width="244" class="font" height="20"><%=rs("address")%></td>
<td rowspan="7" class="font" height="20" align="center" valign="middle" width="175">
<table width="166" border="0" cellspacing="0" cellpadding="0" height="136">
<tr>
<td bgcolor="#FFFFFF" align="center" valign="middle" class="yellow_kuan">
<%if rs("pic")<>"" then%>
<img src="<%=rs("pic")%>" width="166" height="136">
<%else%>
<span class="font"> 暂无图片</span>
<%end if%>
</td>
</tr>
</table>
</td>
</tr>
<tr>
<td width="61" class="font" align="center" valign="middle"><font color="#FF6600">联系电话：</font></td>
<td width="244" class="font"><%=rs("tel")%></td>
</tr>
<tr>
<td width="61" align="center" valign="middle" class="font"><font color="#FF6600">联
系 人：</font></td>
<td width="244" class="font"><%=rs("man")%></td>
</tr>
<tr>
<td width="61" align="center" valign="middle" class="font"><font color="#FF6600">传 真：</font></td>
<td width="244" class="font"><%=rs("fax")%></td>
</tr>
<tr>
<td width="61" align="center" valign="middle" class="font"><font color="#FF6600">邮 编：</font></td>
<td width="244" class="font"><%=rs("yb")%></td>
</tr>
<tr>
<td width="61" align="right" valign="middle" class="font"><font color="#FF6600">E-mail：</font></td>
<td width="244" class="font"><%=rs("email")%></td>
</tr>
<tr>
<td width="61" align="center" valign="middle" class="font"><font color="#FF6600">公司网址：</font></td>
<td width="244" class="font"><%=rs("http")%></td>
</tr>
</table>
<br>
</td>
</tr>
<tr>
<td background="images/company_r5_c2.gif" width="435"><img src="images/company_r5_c2.gif" width="3" height="1"></td>
<td background="images/company_r5_c2.gif" width="65"><img src="images/company_r5_c2.gif" width="3" height="1"></td>
</tr>
</table>
<table width="500" border="0" cellspacing="0" cellpadding="0" align="center" background="images/company_r11_c2.gif">
<tr>
<td height="271" width="5"> </td>
<td height="271" width="480" align="left" valign="top" class="font">
<table width="482" border="0" cellspacing="0" cellpadding="0">
<tr>
<td width="164"><img src="images/company_r7_c4.gif" width="164" height="25"></td>
<td width="318" background="images/company_r7_c8.gif" align="right" valign="middle"><img src="images/company_r8_c10.gif" width="192" height="18"></td>
</tr>
</table>
<%=rs("bz")%><br>
</td>
<td height="271" width="5"> </td>
</tr>
</table>
<table width="500" border="0" cellspacing="0" cellpadding="0" align="center">
<tr align="left" valign="top">
<td width="10"><img src="images/company_r12_c2.gif" width="13" height="19"></td>
<td width="490" background="images/company_r12_c5.gif" align="right"><img src="images/company_r12_c12.gif" width="12" height="19"></td>
</tr>
</table>
<br>
</body>
</html>
<!--#include file=../system/include/foot.asp-->
[ 本帖最后由 asbj 于 2009-10-21 10:00 编辑 ]
