new.asp

购物系统(本版为正式商业版

<!-- #include file="conn.asp" -->
<!--#include file="../fuction.asp"-->
<%
'=========================================================

'<script src=new.asp?TopicCount=10&Count=25&showtime=1></script>
'---------------------------------------------------------

'---------------------------------------------------------
' url         论坛地址
' TopicCount: 显示多少条主题
' Count:      标题 长度
' showtime:   1=显示时间 0=不显示时间

'=========================================================
url="http://127.0.0.1/bbs/"
if Request("TopicCount")=empty then
TopicCount=10
else
TopicCount=nosql(int(Request("TopicCount")))
end if

if Request("Count")=empty then
Count=25
else
Count=nosql(int(Request("Count")))
end if

sql="select top "&TopicCount&" * from book  where type=0 order by id desc"
Set Rs=Conn.Execute(sql)
do while Not RS.Eof
if Request("showtime")=1 then 
showtime="["&rs("wdate")&"]"
response.write"document.write('<a href="&url&"Show.asp?id="&rs("id")&" target=_blank>"&left(rs("title"),Count)&"</a>"&showtime&"<br>');"
else
response.write"document.write('<a href="&url&"Show.asp?id="&rs("id")&" target=_blank>"&left(rs("title"),Count)&"</a><br>');"
end if
RS.MoveNext
Loop
set rs=nothing
%>