28,406
社区成员
发帖
与我相关
我的任务
分享
<%
shoucang = "|1|2|3||5| "
Set re = New RegExp
re.Global = True
re.Pattern = "\s+"
shoucang = re.Replace(shoucang, "")
re.Pattern = "^\|+|\|+$"
shoucang = re.Replace(shoucang, "")
re.Pattern = "\|+"
shoucang = re.Replace(shoucang, ",")
Set ors = conn.Execute("select id,userid,uname,content,huifu from ble_topic where id in (" & shoucang & ") order by updatetime desc")
do while not ors.eof
str=str&" <li> <a href='u.asp?uid=" & ors("userid") & "' title='" & ors("uname") & "' class='avatar'>"
ors.movenext
Loop
ors.close
set ors = nothing
response.write str
%>