<%
Set rs=New Record06
Set rs.Connection=db.Connection
sql="select id,title,img,uptime from news where typenumber = '0001' order by istop asc,uptime desc, id desc"
rs.Openx sql,12
Response.Write "
"
rs.PrintDso "
"
Response.Write "
"
Response.Write "
"& rs.NavStr &"
"
%>