我删掉这个就出错

[端峰]

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%>
<%=rs_class_2("Class_2_Name")%>

<%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,<%j=1%><%if j mod 1 = 0 then %>
起到什么作用呢？请高手指教

[不学无术]

j = 1 初始化变量 j 的值为 1

j = j + 1 直接理解就是将 j 的值加一，在循环中，每次累加，用作“计数器”。

j Mod 1 = 0 这个不知道谁写的，一个大于等于 1 的整数整除 1 ，余数还能不是 0 ？

这些都是 VBScript 的内容。根据你最近的提问，强烈建议你学习 VBScript 中的内容，等你掌握了这个，以后你的问题会减少很多，当然，能力也就会提高很多。

[端峰]

多谢指教，我也明白这三行的意思，只是我觉得不要也行的呀，为什么我删去就提示错误，而且我明白他们的意思就是不明白起什么作用，按理说不用这个三行也可以运行的呀

[风狼©]

删去应该可以的。可能是你没删干净。在仔细查一下。多注意下出错提示

[Tameway]

整数j对1取模肯定是0,一个恒真的条件
不知道谁写的

但是代码中少了loop
movenext之后的操作应该是loop
而不是wend