高手请指教

2006-09-07 03:36:44 66 阅读 AI 写同款 · GEO 优化AI 选题数据监测一键分发 ›

【低轨】Starlink星链-Ku波段OFDM信号同步机制与PNT应用潜力本文深入解析了Starlink星链Ku波段OFDM信号的同步机制及其在定位、导航与授时（PNT）领域的应用潜力。研究发现，其信号帧内嵌的同步序列具有相位恒定特性，支持超长相干积分，可在极低信噪比下实现高精度伪距测量，为利用低轨卫星通信信号实现高精度PNT服务提供了新的技术路径。阅读详情

我想把数据库数据调成2个部分，请问循环语句该怎么写啊？？
<table width="590" height="179" border="0" align="center" cellpadding="3" >
<%RecCount = objRS.RecordCount
if RecCount < 1 then Response.Write("暂无分类<br>")
%>
<%do while RecCount > 0%>
<%for i = 0 to 2 : tmpid(i) = NULL : next%>
<tr>
<td width="33%" valign="top"><p align="left"><b><a href="fenlei.asp?sortid=<%=objRS("ID")%>" title="<%=objRS("description")%>"><%=objRS("sortName")%></a></b></p></td>
<%tmpid(0) = objRS("ID") : objRS.MoveNext() : RecCount = RecCount - 1%>
<td width="33%" valign="top"><%if RecCount > 0 then%>
<p align="left"><b><a href="fenlei.asp?sortid=<%=objRS("ID")%>" title="<%=objRS("description")%>"><%=objRS("sortName")%></a></b></p>
<%tmpid(1) = objRS("ID") : objRS.MoveNext() : RecCount = RecCount - 1%>
<%end if%></td>
<td width="34%" valign="top"><%if RecCount > 0 then%>
<p align="left"><b><a href="fenlei.asp?sortid=<%=objRS("ID")%>" title="<%=objRS("description")%>"><%=objRS("sortName")%></a></b></p>
<%tmpid(2) = objRS("ID") : objRS.MoveNext() : RecCount = RecCount - 1%>
<%end if%></td>
</tr>
<tr>
<td width="33%" class="0" valign="top"><%
sql = "select * from shortcut where rootID = " & tmpid(0)
Set objShortCut = objConn.Execute(sql)
do while not objShortCut.EOF
%>
<a href="fenlei.asp?sortid=<%=objShortCut("sortID")%>" title="<%=objShortCut("description")%>"><%=objShortCut("sortName")%></a>
<%objShortCut.MoveNext%>
<%loop%>
</td>
<td width="33%" class="0" valign="top"><%
if not IsNull(tmpid(1)) then
sql = "select * from shortcut where rootID = " & tmpid(1)
Set objShortCut = objConn.Execute(sql)
do while not objShortCut.EOF
%>
<a href="fenlei.asp?sortid=<%=objShortCut("sortID")%>" title="<%=objShortCut("description")%>"><%=objShortCut("sortName")%></a>
<%objShortCut.MoveNext%>
<%loop%>
<%end if%>
</td>
<td width="34%" class="0" valign="top"><%
if not IsNull(tmpid(2)) then
sql = "select * from shortcut where rootID = " & tmpid(2)
Set objShortCut = objConn.Execute(sql)
do while not objShortCut.EOF
%>
<a href="fenlei.asp?sortid=<%=objShortCut("sortID")%>" title="<%=objShortCut("description")%>"><%=objShortCut("sortName")%></a>
<%objShortCut.MoveNext%>
<%loop%>
<%end if%>
</td>
</tr>
<tr>
<td width="33%" height="10" colspan="3"><table width="100%" border="0" align="center" cellpadding="0" cellspacing="0">
<tr>
<td height="4"></td>
</tr>
</table></td>
</tr>
<%loop%>
</table>

...全文