|
 |
 |
 |
<%set rs = server.CreateObject("adodb.recordset")
sql="Select * from news order by pdate desc"
rs.open sql,conn,3,3
if rs.recordcount >7 then
l=7
else
l=rs.recordcount
end if
if rs.recordcount<>0 then
for i=1 to l
if rs.eof then
exit for
end if
%>
" class="unnamed12"><%= Left(Trim(rs("title")),14)%>... |
<%rs.movenext
next
end if
%>
|
 |
 |
<%set rs = server.CreateObject("adodb.recordset")
sql="Select * from download order by pdate desc"
rs.open sql,conn,3,3
if rs.recordcount >8 then
l=8
else
l=rs.recordcount
end if
if rs.recordcount<>0 then
for i=1 to l
if rs.eof then
exit for
end if
%>
" class="unnamed12"><%= Left(Trim(rs("title")),9)%> |
<%=rs("pdate")%> |
<%rs.movenext
next
end if
%>
|
|
|
|