beileimulu.asp

来自「asp商城之王」· ASP 代码 · 共 77 行

                <table width="170"  border="0" cellspacing="0" cellpadding="0">
  <tr>
    <td width="178"><img src="images/main/benlei.gif"  height="34"></td>
  </tr>
  <tr>
    <td><table width="170" border="0" align="center" cellpadding="0" cellspacing="0">
        <%
set rs_s=server.CreateObject("adodb.recordset")
rs_s.open "select * from sh_sort2 where anclassid="&rs("anclassid")&" order by nclassidorder",conn,1,1
if rs_s.recordcount=0 then 
%>
        <tr>
          <td height="30" align="center" colspan="7">&Ocirc;&Yacute;&Icirc;&THORN;&ETH;&iexcl;&middot;&Ouml;&Agrave;&agrave;</td>
        </tr>
        <%
else
i=0
while not rs_s.eof
%>
        <tr>
          <td width="45%"  height="30" align="center"><a href="class2.asp?id=small&anid=<%=rs("anclassid")%>&nid=<%=rs_s("nclassid")%>"><u><%=rs_s("nclass")%></u></a>
              <%rs_s.movenext
	if rs_s.eof then 
	response.write " "
	else
%>
          </td>
          <td width="45%" ><a href="class2.asp?id=small&anid=<%=rs("anclassid")%>&nid=<%=rs_s("nclassid")%>"><u><%=rs_s("nclass")%></u></a>
              <%rs_s.movenext
	if rs_s.eof then 
	response.write " "
	else
%>
          </td>
        </tr>
        <tr>
          <td align="center" ><a href="class2.asp?id=small&anid=<%=rs("anclassid")%>&nid=<%=rs_s("nclassid")%>"><u><%=rs_s("nclass")%></u></a>
              <%rs_s.movenext
	if rs_s.eof then 
	response.write " "
	else
%>
          </td>
          <td ><a href="class2.asp?id=small&anid=<%=rs("anclassid")%>&nid=<%=rs_s("nclassid")%>"><u><%=rs_s("nclass")%></u></a>
              <%rs_s.movenext
	if rs_s.eof then 
	response.write " "
	else
%>
          </td>
        </tr>
        <tr>
          <td width="10%" ><div align="center"><a href="class2.asp?id=small&anid=<%=rs("anclassid")%>&nid=<%=rs_s("nclassid")%>"><u><%=rs_s("nclass")%></u></a>
                  <%rs_s.movenext
	if rs_s.eof then 
	response.write " "
	else
%>
            </div>
          <td> <a href="class2.asp?id=small&anid=<%=rs("anclassid")%>&nid=<%=rs_s("nclassid")%>"><u><%=rs_s("nclass")%></u></a> </td>
          <%
rs_s.movenext
end if
end if
end if
end if
end if
wend
end if
end if
end if
%>
        </tr>
    </table></td>
  </tr>
</table>