大家帮我看看"生成静态文件"的问题

[bashi1]

大家帮我看看这段代码，它生成的静态文件里面的内容都是第一条信息的，看了一天也没整明白问题出在哪，请各位大侠帮帮忙吧，谢谢！

<!--#include file="session.asp"-->
<!--#include file="conn.asp"-->
<%
set rs=server.createobject("adodb.recordset")
sql="select * from news order by id desc"
rs.open sql,conn,1,1
if rs.eof then
response.write"数据库里面没有新闻!"
response.end
else
total1=rs.recordcount
set rs1=server.createobject("adodb.recordset")
sql1="select top 1 * from mb order by id desc"
rs1.open sql1,conn,1,1
mb1=rs1("newsmb")
rs1.close
set rs1=nothing
set fso=server.createobject("scripting.filesystemobject")
i=0
do while not rs.eof
i=i+1
filename1="../news/"&rs("filename")&".htm"
set ffile=fso.createtextfile(server.mappath(""&filename1&""))
title=rs("title")
addman=rs("pname")
content=rs("body")
adddate=rs("date")
mb1=replace(mb1,"[title]", title)
mb1=replace(mb1,"[pname]", addman)
mb1=replace(mb1,"[body]", content)
mb1=replace(mb1,"[date]", adddate)
ffile.write""&mb1&""
ffile.close
set ffile=nothing
response.write"<br>已生成"&i&"/"&total1&"条<br>"
rs.movenext
loop
set fso=nothing
end if
rs.close
set rs=nothing
response.write"<script language=javascript>alert('新闻生成成功');this.location.href='newsmb.asp';</script>"
%>

[明珠佩佩]

response.write"<br>已生成"&i&"/"&total1&"条<br>"

这句话没有任何意义

[bashi1]

我已经想明白了，原来是在第一遍mb1替换后，已经没有可赋对象了，只要在循环内把原始mb1再覆盖下就OK了!

[flyingsnowy]

和和

[pzhuyy]

....

[ATHENA112]

你这样生成太不好了，如果新闻条数上万估计IIS会死掉，而且中间只要有一次错误就必须全部重来，建议你分开来生成。