<%
tsql="select top "&topicnum&" id,userid,topicinfo,bd,edittime,totable from topic where type<>3 order by edittime desc"
set topnew=conn.execute(tsql)
i=0
do while not topnew.eof
topicinfo=topnew("topicinfo")
topicinfo=split(topicinfo,"|")
i=i+1
response.write" | "
response.write" "&lefttrue(kbbs(topicinfo(1)),30)&" | "
topnew.movenext
if i=topicnum then exit do
loop
topnew.close
set topnew=nothing
%>
|
|