<%
conn.open strconnection
myChareSet="gb2312"
conn.execute("set names '" & myChareSet & "'")
sql="SELECT * FROM dede_archives where typeid= 15 order by id desc LIMIT 30 "
set rs = conn.execute(sql)
if rs.eof then
response.write"暂无条目"
else
do while not rs.eof
cont="
"&rs("title")&""
%>
<%
i = i +1
rs.movenext
loop
end if
rs.close
%>