asp查询

[csdn长春]

下面代码是列出一级栏目的信息块，但我只想要其中的一个模块，比如说ID=85的模块，该怎么改下面的代码呢？




<table width="100%" border="0" align="center" cellpadding="0" cellspacing="0" class="MainTable">
<%
Sql="select ID,SortName,gotoURL from Ok3w_Class where ChannelID=" & ChannelID & " and ParentID=0 and gotoURL='' order by OrderID"
Set oRs = Conn.Execute(Sql)
Do While Not oRs.Eof
%>
<tr>
<%For i=1 To 2%>
<td valign="top"<%If i<>2 Then%> width="50%" style="padding-right:8px;"<%End If%>>
<%If Not oRs.Eof Then%>
<table border="0" cellspacing="0" cellpadding="0" class="dragTable" width="100%">
<tr>
<td class="head"><h3 class="L"></h3>
<span class="TAG"><a href="<%=Page_URL(ChannelID,oRs("ID"),"")%>" target="_blank"><%=oRs("SortName")%></a></span> <span class="more"><a href="<%=Page_URL(ChannelID,oRs("ID"),"")%>" target="_blank">更多...</a></span></td>
</tr>
<tr>
<td class="middle"><table width="100%" border="0" cellspacing="0" cellpadding="0" style="margin:5px 0px 5px 0px;">
<tr>
<td><%Call Ok3w_Article_List(oRs("ID"),8,1,17,False,False,False,"",False,"new")%></td>
</tr>
</table></td>
</tr>
</table>
<%
oRs.MoveNext
End If%> </td>
<%Next%>
</tr>
<%
Loop
oRs.Close
Set oRs = Nothing
%>
</table>

[csdn长春]

我自己会了！

[threenewbee]

接分。恭喜lz。

[wei_june]

[Quote=引用 2 楼 caozhy 的回复:]
接分。恭喜lz。
[/Quote]
多给点