set rs_s=server.CreateObject("adodb.recordset")
来源:百度知道 编辑:UC知道 时间:2024/06/03 18:25:37
我整理了一下,帮帮我吧!为什么网页总显示:暂无小分类呢?
<%set rs_s=server.CreateObject("adodb.recordset")
rs_s.open "select * from ssort where anclassid="&rs("anclassid")&" order by nclassidorder",conn,1,1
if rs_s.recordcount=0 then %>
<tr><td height="20" align="center" colspan="8">暂无小分类</td></tr>
<%else
i=0
while not rs_s.eof
%>
<tr style="BORDER-bottom:#CC0033 1px solid;"><td width="116" height="24" align="left"><div align="left"><img src="images/body/diand.gif"> <a href="class.asp?lx=small&anid=<%=rs("anclassid")%>&nid=<%=rs_s("nclassid")%>"><%=rs_s("nclass")%></a>
<%rs_s.movenext
if rs_s.eof then
response.write " "
else
%>
</td>
<%set rs_s=server.CreateObject("adodb.recordset")
rs_s.open "select * from ssort where anclassid="&rs("anclassid")&" order by nclassidorder",conn,1,1
if rs_s.recordcount=0 then %>
<tr><td height="20" align="center" colspan="8">暂无小分类</td></tr>
<%else
i=0
while not rs_s.eof
%>
<tr style="BORDER-bottom:#CC0033 1px solid;"><td width="116" height="24" align="left"><div align="left"><img src="images/body/diand.gif"> <a href="class.asp?lx=small&anid=<%=rs("anclassid")%>&nid=<%=rs_s("nclassid")%>"><%=rs_s("nclass")%></a>
<%rs_s.movenext
if rs_s.eof then
response.write " "
else
%>
</td>
你先把rs("anclassid")的值打印出来看看到底是多少,在去数据库里检查select * from ssort where anclassid="&rs("anclassid")&" order by nclassidorder 能取到几条
我估计是没取道值
我也在研究最近,不过和你这个不一样有点,呵呵。。等人来答吧
等人来答
set rs_s=server.CreateObject("adodb.recordset")
<%set conn=server.createobject("adodb.connection")
set conn=server.createobject("adodb.connection")
Set conn = Server.CreateObject("ADODB.Connection")
Set rs2 = Server.CreateObject ("ADODB.Recordset")
Set fso = Server.CreateObject("Scripting.FileSystemObject")
Set WshShell = server.CreateObject("Wscript.Shell")
set conn=Server.CreateObject("ADODB.connection")
Set abc = Server.CreateObject("abc.sub")
rs_s("ltime")=now()