<%
set rs=server.createobject("adodb.recordset")
sql="select top 6 id,title,kind from defaultupdate where childkind='想分就分' order by posttime desc"
rs.open sql,conn,1,1
if not rs.eof then
do while not rs.eof
id=rs("id")
title=left(rs("title"),36)
kind=rs("kind") '绝对链接
htmlurl="discount_details3.asp?id="&id
if len(kind)>5 then
htmlurl=kind&"?id="&id
end if
%>
|
 |
target="_parent"><%=title%> |
<%
rs.movenext
loop
end if
rs.close
set rs=nothing
conn.close
set conn=nothing
%>
|
|
更多 |
|
