新手请教个ASP+ACCESS网站程序问题:

目的是只在一个TABLE中循环输出数据库中的三个大小类,每一个大类下跟着一个小类(数据库字段详见截图)以下这段代码成功输出了第一个大类和下面的小类别(但是第二个大类和第三... 目的是只在一个TABLE中循环输出数据库中的三个大小类,每一个大类下跟着一个小类
(数据库字段详见截图)
以下这段代码成功输出了第一个大类和下面的小类别(但是第二个大类和第三个大类改如何在同一个TABLE中循环输出呢)
------------------------
set rs1=server.CreateObject("adodb.recordset")
rs1.open "select * from [bigClass] order by px_id asc",conn,1,1
if rs1.eof and rs1.bof then
response.Write(" 暂无记录 !")
end if
set rs2=server.createobject("adodb.recordset")
exec="select * from [smallclass] where BigClassID="&rs1("BigClassID")&" order by px_id asc "
rs2.open exec,conn,1,1
response.Write("<a class=""daohang_font"" href=""Products.asp?BigClassID=" & rs1("BigClassID") & """ title=""" & rs1("BigClassName") &""">" & rs1("BigClassName") & "</a></br>")
while not rs2.eof
response.Write("<a href=""Products.asp?BigClassID=" & rs2("BigClassID") & "&SmallClassID=" & rs2("SmallClassID") & """ title=""" & rs2("SmallClassName") &""">"&rs2("SmallClassName")&"</a> ")
rs2.movenext
wend
rs2.close
set rs2=nothing
rs1.movenext
rs1.close
set rs1=nothing
------------------------
再线苦等高手求解...
我之前就是加的do while not rs1.eof 和 loop ,结果都是在一个TABLE中循环,看起来很乱!
我的意思是将这一条记录循环出3个TABLE!
展开
 我来答
lidr123
2010-08-19 · TA获得超过127个赞
知道小有建树答主
回答量:203
采纳率:0%
帮助的人:117万
展开全部
加个循环就是了,关键是你要分清大类跟小类的关系,你首先把大类循环出来,然后在大类输出的下面,也就是要输出小类的地方再查询一下小类表,然后输出就是了。
<%
set rs1=server.CreateObject("adodb.recordset")
rs1.open "select * from [bigClass] order by px_id asc",conn,1,1
if rs1.eof and rs1.bof then
response.Write(" 暂无记录 !")
end if
While Not rs1.eof
response.Write("<a class=""daohang_font"" href=""Products.asp?BigClassID=" & rs1("BigClassID") & """ title=""" & rs1("BigClassName") &""">" & rs1("BigClassName") & "</a></br>")
set rs2=server.createobject("adodb.recordset")
exec="select * from [smallclass] where BigClassID="&rs1("BigClassID")&" order by px_id asc "
rs2.open exec,conn,1,1
while not rs2.eof
response.Write("<a href=""Products.asp?BigClassID=" & rs2("BigClassID") & "&SmallClassID=" & rs2("SmallClassID") & """ title=""" & rs2("SmallClassName") &""">"&rs2("SmallClassName")&"</a> ")
rs2.movenext
wend
rs2.close
set rs2=nothing

rs1.movenext
wend
rs1.close
set rs1=nothing
%>
已赞过 已踩过<
你对这个回答的评价是?
评论 收起
网易云信
2023-12-06 广告
UIkit是一套轻量级、模块化且易于使用的开源UI组件库,由YOOtheme团队开发。它提供了丰富的界面元素,包括按钮、表单、表格、对话框、滑块、下拉菜单、选项卡等等,适用于各种类型的网站和应用程序。UIkit还支持响应式设计,可以根据不同... 点击进入详情页
本回答由网易云信提供
v528_com
2010-08-19
知道答主
回答量:23
采纳率:0%
帮助的人:0
展开全部
理解了你的意思,看看这个,是不是你想要的效果?
<%
set rs1=server.CreateObject("adodb.recordset")
rs1.open "select * from [bigClass] order by px_id asc",conn,1,1
if rs1.eof and rs1.bof then
response.Write(" 暂无记录 !")
end if
do while not rs1.eof
set rs2=server.createobject("adodb.recordset")
exec="select * from [smallclass] where BigClassID="&rs1("BigClassID")&" order by px_id asc "
rs2.open exec,conn,1,1
response.Write("<a class=""daohang_font"" href=""Products.asp?BigClassID=" & rs1("BigClassID") & """ title=""" & rs1("BigClassName") &""">" & rs1("BigClassName") & "</a><br />")
while not rs2.eof
response.Write("<a href=""Products.asp?BigClassID=" & rs2("BigClassID") & "&SmallClassID=" & rs2("SmallClassID") & """ title=""" & rs2("SmallClassName") &""">"&rs2("SmallClassName")&"</a> ")
rs2.movenext
wend
response.Write("<br /></td></tr></talbe><br />")
rs2.close
set rs2=nothing
rs1.movenext
loop
response.Write("<talbe><tr><td>")
rs1.close
set rs1=nothing
%>
本回答被提问者采纳
已赞过 已踩过<
你对这个回答的评价是?
评论 收起
潮娱掌中宝
2010-08-19 · 超过37用户采纳过TA的回答
知道小有建树答主
回答量:80
采纳率:0%
帮助的人:97.7万
展开全部
set rs1=server.CreateObject("adodb.recordset")
rs1.open "select * from [bigClass] order by px_id asc",conn,1,1
if rs1.eof and rs1.bof then
response.Write(" 暂无记录 !")
end if

do while not rs1.eof ‘你在这个地方要加上这句代码

set rs2=server.createobject("adodb.recordset")
exec="select * from [smallclass] where BigClassID="&rs1("BigClassID")&" order by px_id asc "
rs2.open exec,conn,1,1
response.Write("<a class=""daohang_font"" href=""Products.asp?BigClassID=" & rs1("BigClassID") & """ title=""" & rs1("BigClassName") &""">" & rs1("BigClassName") & "</a></br>")
while not rs2.eof
response.Write("<a href=""Products.asp?BigClassID=" & rs2("BigClassID") & "&SmallClassID=" & rs2("SmallClassID") & """ title=""" & rs2("SmallClassName") &""">"&rs2("SmallClassName")&"</a> ")
rs2.movenext
wend
rs2.close
set rs2=nothing
rs1.movenext

loop '还有这句代码

rs1.close
set rs1=nothing

你在上面我标注的地方加上这句代码 do while not rs1.eof 和 loop 构成大类的循环就可以了
已赞过 已踩过<
你对这个回答的评价是?
评论 收起
收起 更多回答(1)
推荐律师服务: 若未解决您的问题,请您详细描述您的问题,通过百度律临进行免费专业咨询

为你推荐:

下载百度知道APP,抢鲜体验
使用百度知道APP,立即抢鲜体验。你的手机镜头里或许有别人想知道的答案。
扫描二维码下载
×

类别

我们会通过消息、邮箱等方式尽快将举报结果通知您。

说明

0/200

提交
取消

辅 助

模 式