UC知道asp问题，前辈来指点指点！
来源：百度知道 编辑：UC知道 时间：2024/06/05 08:53:52
<%
Set Rs = Conn.Execute("Select * From Class Where lagID = 0 Order By Classorder")
IF Not (Rs.EOF AND Rs.BOF) Then
While not rs.eof
Response.Write "<a href=Class.asp?ID="& Rs("NumberID") &" Class=link1>"& Rs("Class") & "</a><BR>"
Response.Write("<hr size=1 noshade color=#FFcc99>")
Set Rs1 = Conn.Execute("Select * From Class Where LagID = 1 AND PartID = '"& Rs("NumberID") &"' Order By Classorder")
IF Not (Rs1.EOF AND Rs1.BOF) Then
While not Rs1.eof
Response.Write "<a href=Class.asp?ID="& Rs1("NumberID") &" Class=link2>"& Rs1("Class") & "</a><br>"
Rs1.MoveNext
Wend
End IF
Rs
Set Rs = Conn.Execute("Select * From Class Where lagID = 0 Order By Classorder")
IF Not (Rs.EOF AND Rs.BOF) Then
While not rs.eof
Response.Write "<a href=Class.asp?ID="& Rs("NumberID") &" Class=link1>"& Rs("Class") & "</a><BR>"
Response.Write("<hr size=1 noshade color=#FFcc99>")
Set Rs1 = Conn.Execute("Select * From Class Where LagID = 1 AND PartID = '"& Rs("NumberID") &"' Order By Classorder")
IF Not (Rs1.EOF AND Rs1.BOF) Then
While not Rs1.eof
Response.Write "<a href=Class.asp?ID="& Rs1("NumberID") &" Class=link2>"& Rs1("Class") & "</a><br>"
Rs1.MoveNext
Wend
End IF
Rs
能否说明一下
Set Rs = Conn.Execute("Select * From Class Where lagID = 0 Order By Classorder")
Set Rs1 = Conn.Execute("Select * From Class Where LagID = 1 AND PartID = '"& Rs("NumberID") &"' Order By Classorder")
查出来的结果在功能上有什么不同？
把你想要的结果说清楚一些，是大类的横向还是小类的
Set Rs = Conn.Execute("Select * From Class Where lagID = 0 Order By Classorder")
IF Not (Rs.EOF AND Rs.BOF) Then
While not rs.eof
Response.Write "<a href=Class.asp?ID="& Rs("NumberID") &" Class=link1>"& Rs("Class") & "</a> " '所有大类横着以空格为间隔现实
Rs.MoveNext
Wend
End IF
Rs.Close
Set Rs = Nothing