出错了　ＨＥＬＰ

  错误类型：
ADODB.Fields (0x800A0CC1)
在对应所需名称或序数的集合中，未找到项目。
/page/111.asp, 第 85 行
For j=0 To rs.recordcount -1
  For f=1 To CInt(rs.recordcount/rs.fields.count+1)

If j=rs.fields.count*1 Then
  response.write"</tr><tr>"
Else

response.write "<td>"&rs.fields.item(j)&"</td>"

End If
Next
Next

错了吧！
If [color=red]f[/color]=rs.fields.count*1 Then
response.write"</tr><tr>"
Else

response.write "<td>"&rs.fields.item([color=crimson]f[/color])&"</td>"

另外，不知道你CInt(rs.recordcount/rs.fields.count+1) 这一步有什么意义？

循环到最后一行出问题了？
if rs.eof then
  .............................
end if

总记录数/字段数+1---------------------------------？
没有搞国防破坏吧~~~
偶也不明白哦~~