分类显示问题？
根据下拉框的内容在同一个页面显示，第一类和第三类可以显示出来，可第二类显示不出来！同样的啊，为什么？难道分类显示还有限制数量，真是郁闷！
各位高手给俺提示提示！多谢！
代码贴一下
2005-12-20 17:27
2005-12-20 22:59
<%@LANGUAGE="VBSCRIPT" CODEPAGE="936"%>
<<%
dim conn
set conn=server.createobject("ADODB.connection")
conn.open "Provider=Microsoft.Jet.OLEDB.4.0;Data Source=" & server.MapPath("data/crm.mdb ") & ";Mode=ReadWrite|Share Deny None;Persist Security Info=False"
Set rs=Server.CreateObject("ADODB.RecordSet")
sql="select * from server"
rs.Open sql,conn,3,2
%>
<!DOCTYPE HTML PUBLIC "-//W3C//DTD HTML 4.01 Transitional//EN" "http://www.w3.org/TR/html4/loose.dtd">
<html>
<head>
<meta http-equiv="Content-Type" content="text/html; charset=gb2312">
<title>无标题文档</title>
</head>
<body>
<table width="775" border="0" align="center" style="table-layout:fixed;word-break:break-all">
<tr>
<td align="left">服务中心</td>
<td align="right">东恩客户关系关系管理系统</td>
</tr>
<tr><td height="1" colspan="2" width="600" bgcolor="#999999"></td>
</tr>
<tr>
<td colspan="2">
<table width="775" border="0" style="table-layout:fixed;word-break:break-all">
<% set rs=server.createobject("adodb.recordset")
rs.open "select top 7 * from server where fenlei='销售问答' order by id desc ",conn,3,3 %>
<tr>
<td width="100" align="right">销售问答</td>
<td > </td>
<td > </td>
<td > </td>
</tr>
<% while not rs.eof %>
<tr>
<td> </td>
<td align="left"><%=left(trim(rs("title")),20)%></td>
<td > </td>
<td > </td>
</tr>
<tr>
<td > </td>
<td colspan="3" align="center"> <%
memo = rs("content")
memo = Replace(memo, vbCrLf, "<br>")
Response.Write memo
%></td>
</tr>
<%
rs.movenext
wend
%>
<tr>
<td> </td>
<td> </td>
<td></td>
<td><a href="moresaleanswer.asp">more</a></td>
</tr>
</table></td>
</tr>
<tr>
<td height="18" colspan="2">
********************************问题就在这中间这块***************************
<table width="775" border="0" style="table-layout:fixed;word-break:break-all">
<% set rs=server.createobject("adodb.recordset")
rs.open "select top 7 * from server where fenlei='技术问答' order by id desc ",conn,3,3 %>
<tr>
<td width="100" align="right">技术问答</td>
<td > </td>
<td > </td>
<td > </td>
</tr>
<% while not rs.eof %>
<tr>
<td> </td>
<td width="200" align="left"><%=left(trim(rs("title")),20)%></td>
<td > </td>
<td > </td>
</tr>
<tr>
<td > </td>
<td colspan="3" align="center" width="600" > <%
memo = rs("content")
memo = Replace(memo, vbCrLf, "<br>")
Response.Write memo
%></td>
</tr>
<%
rs.movenext
wend
%>
<tr>
<td> </td>
<td> </td>
<td></td>
<td><a href="morejishuanswer.asp">more</a></td>
</tr>
</table>
*****************问题就在这中间这块*************************************************
</td>
</tr>
<tr>
<td colspan="2"><table width="775" border="0" style="table-layout:fixed;word-break:break-all">
<% set rs=server.createobject("adodb.recordset")
rs.open "select top 7 * from server where fenlei='客户服务' order by id desc ",conn,3,3 %>
<tr>
<td width="100" align="right">客户服务</td>
<td > </td>
<td > </td>
<td > </td>
</tr>
<% while not rs.eof %>
<tr>
<td> </td>
<td ><%=left(trim(rs("title")),26)%></td>
<td > </td>
<td > </td>
</tr>
<tr>
<td > </td>
<td colspan="3" align="center" width="600"> <%
memo = rs("content")
memo = Replace(memo, vbCrLf, "<br>")
Response.Write memo
%></td>
</tr>
<%
rs.movenext
wend
%>
<tr>
<td> </td>
<td> </td>
<td></td>
<td><a href="moresaleanswer.asp">more</a></td>
</tr>
</table></td>
</tr>
<tr>
<td colspan="2" align="center">
</td>
</tr>
</table>
</body>
</html>
2005-12-21 09:53
2005-12-21 10:05