Question

ASP分类分页生成HTML的问题！

我有一个ASP站点想把产品分类弄成HTNL各式的，数据库中有10个分类，我现在的代码只能生成第一个，其他9个生成不了，我是菜鸟，请高手帮忙看下，代码如下：
<%
Dim big_id,html_url,rscount
rscount = 0
set rs = server.CreateObject("adodb.recordset")
rs.open "select * from fenlei ORDER BY paixu asc",conn,1,1
if not rs.eof then
for i = 0 to rs.recordcount - 1
if i = curpage then
fl_id=rs("fl_id")
html_url=rs("html_url")
end if
rs.movenext
next
end if
rs.close

PageSize = 12
rs.open "Select count(*) from product where fl_id="&fl_id,conn,1,1
if not rs.eof then
rscount = rs(0)
end if

If rscount mod PageSize > 0 then
pageCount = (rscount-(rscount mod PageSize)) / PageSize + 1
else
pageCount = rscount / PageSize
End If
If PageCount = 0 then
PageCount = 1
End If
for k = 1 to PageCount
filename=""&html_url&"_"&k&".html"
If k = 1 Then
filename=""&html_url&".html"
End If

do while not rs.eof
on error resume next
host="product.asp?fl_id="&fl_id&"&page="&k&""
folder="../product/"
Fso_info host,folder,filename
rs.movenext
loop
rs.close
set rs=nothing
next
response.write "全部生成&k&个页面!"
%>
说明：表fenlei, 是产品的打的分类，fl_id是表fenlei里面的，每个fl_id里面都有一个静态html_url地址。fl_id在product里面也存在的，就是区别分类用的。

host="product.asp?fl_id="&fl_id&"&page="&k&"" 这个是前台的动态的地址。

现在是只能生成fl_id=1的页面，其他的都生成不了。
请高手帮我看下，
谢谢

Answer 1

懒得一个一个看了,有简单方法干嘛不用
on error resume next
这个去掉,把出错代码发给我

追问

我把这行代码去掉了，
没有任何报错
还是只生成第一个行，
其他没有

Answer 2

生成html的部分应该是你在上面查询fenlei的时候循环
有几个分类就生成几次

追问

代码应该怎么写呢？
我现在晕了，不知道怎么写了
本人菜鸟一枚
能否麻烦你直接贴下代码，应该加在哪里？