Active Server Pages 错误 ✀ASP 0113✀ 脚本超时 ⼀index.asp 超过了脚本运行的最长时间。可以为 Serv

2025-02-21 17:21:25
推荐回答(1个)
回答1:

Sub TopicList
On Error Resume Next
set RS=server.CreateObject("adodb.recordset")
Rs.Open Sql,Conn
Do While Not Rs.Eof
Topic=ReplaceText(Rs("Topic"),".*>(.*)<.*","$1")
if Rs("isrenwu")=1 then
Response.Write "[¥"&Rs("money")&"]"&LeftStr(""&Topic,10)&"
"
else
Response.Write ""&LeftStr(""&Topic,13)&"
"
end if
Rs.MoveNext
Loop
Rs.Close
set Rs=nothing
End Sub

楼主试试这个看看怎么样?