关于ASP的循环小问题

来源：百度知道 编辑：UC知道 时间：2024/06/17 02:52:29
dim i,j,fsostr
fsostr = ""
for i = 1 to Psize
if rs.eof then exit for
response.write "<tr>"
for j = 0 to rs.fields.count - 1
fsostr = fsostr &rs.fields(j)&"---"
response.write "<td>"&rs.fields(j)&"</td>"
next
f1.writeline(fsostr)
fsostr = ""
rs.movenext
response.write "</tr>"
next

这是我的部分代码，目的是想同时两个操作，一个是分页显示所有数据，一个是在RS读取完一行数据时能把这行数据写成一行字符串，再writeline写入到一个TXT中

现在得到的字符串出了问题，样子大概是
数据1.字段1---数据1.字段2---.....数据1字段N (第一行)
数据1.字段1---数据1.字段2---.....数据1字段N---数据2.字段1....数据2.字段N (第二行)

应该是循环的套套出题了,我自己看得头大,有人帮我改改么

这点小东东都也编写错误，以后复杂点的，你怎么办？呵呵。

1.你的内循环完全是多余的循环，没有记录的变化。第一行就这个结果了。至少这个循环体里应有movenext语句。

2.你的外循环，跟页的关系呢？在哪儿体现的？rs.movenext能体现吗？不能！当然，巧了，内循环加入后，此时刚巧进入下一页。呵呵。