asp转html问题

数据库有多条记录
下面语句为什么只能执行一次，要是记录有多条就会出错，请问要怎么解决
要根据时间生产时间目录下的多个文件
<%
sql="select * from c_news order by c_id desc"
Set rs= Server.CreateObject("ADODB.Recordset")
rs.open sql,conn,1,1
do while not rs.eof
'生成HTML文件名，建立文件夹，指定文件路径
datetime=FormatDateTime(rs("c_time"),2)&"/"
fname=makefilename(rs("c_time"))
filepath =datetime&fname
'生成HTML页面
Set fso = Server.CreateObject("Scripting.FileSystemObject")
fso.CreateFolder(Server.MapPath(datetime))'不存在则创建CityHtml文件夹
Set fout = fso.CreateTextFile(Server.MapPath(filepath))
fout.WriteLine mb_code
fout.close
Response.Write(""&datename&"")
Response.Write("<br />")
rs.MoveNext
Loop

rs.close
set rs=nothing
%>

asp生成html问题 asp生成html问题! ASP生成HTML的问题 Html和Asp的问题! asp生成html的 问题 asp搜索问题.search.asp? search.html? 寻找asp转html工具 关于ASP生成HTML模板问题 ASP中用html替换gif的问题 ASP生成静态HTML文件！问题呀~