<%@ LANGUAGE="VBSCRIPT" %>
<!--#include file="conn.asp" -->
<%
set rs_class_1=server.createobject("adodb.recordset")
sqltext2="select * from Class_1 "
rs_class_1.open sqltext2,conn,1,1
%>
<%
While not rs_class_1.EOF
set rs_class_2=server.createobject("adodb.recordset")
sqltext3="select * from Class_2 where Class_1_Name='" & rs_class_1("Class_1_Name") & "'"
rs_class_2.open sqltext3,conn,1,1
%>
<%=rs_class_1("Class_1_Name")%>
<%j=1%>
<%While Not rs_class_2.EOF%>
<a href="splb.asp?spdl=<%=rs_class_1("Class_1_Name")%>&spxl=<%=rs_class_2("Class_2_Name")%>"><font color="#000000"><%=rs_class_2("Class_2_Name")%></font></a>
<%if j mod 1 = 0 then %>
<%end if%>
<%
rs_class_2.MoveNext
j=j+1
Wend
rs_class_2.close
%>
<%
rs_class_1.MoveNext
Wend
rs_class_1.close
%>
如题，小弟不知道这几行起到什么作用<%j=1%>，<%if j mod 1 = 0 then %>， j=j+1 ，Wend
