| |
<%
set rs=Server.CreateObject("ADODB.Recordset")
sql="select * from [news] order by [date] desc"
rs.open sql,conn,1,1
a=1
do while not rs.eof
%><%=a%>.<%=trim(rs("title"))%><%if a<3 then %> <%end if%>
<%rs.movenext
a=a+1
loop
rs.close
set rs=nothing
set conn=nothing%> |
|
|
 |
|
 |
|