Question

请问这段asp代码如何修改才可以运行?

<%
dim content
sql="select * from news order by id"
set rs=conn.execute(sql)
while not rs.eof
content=ubb2html(server.htmlencode(rs("news_content")))
conn.execute("update news set news_content='"&content&"' where id="&rs("id"))
rs.movenext
wend
rs.close
response.write"替换完成"
%>
我写这段代码目的是把以前用ubb发的文章批量转换成html的,并且存进数据库,程序应该没问题,但是运行一会iis就100%,锁死了,请问高手有没有办法修改一下,让程序可以正常执行?

Answer 1

程序优化一下：
<%
dim rs,sql
Set Rs = Server.CreateObject("ADODB.Recordset")
sql="select news_content from news order by id"
rs.open conn,sql,1,3
while not rs.eof
rs("news_content")=ubb2html(server.htmlencode(rs("news_content")))
rs.update
rs.movenext
wend
rs.close
set rs=nothing
response.write"替换完成"
%>
记录多的话，运行时间会比较长，建议在本地升级数据库，而且最好在最前面加一句：
Server.ScriptTimeout = 999999999

Answer 2

while not rs.eof
content=ubb2html(server.htmlencode(rs("news_content")))
conn.execute("update news set news_content='"&content&"' where id="&rs("id"))
rs.movenext
wend

记录多的时候就卡呀，你能不能将它变成想看哪个id时候再update或存在一个asp像里操作呀

如：

while not rs.eof
content=content&" ,"&ubb2html(server.htmlencode(rs("news_content")))
rs.movenext
wend

不要在while里update,这样好点的，