|
|
<%
connStr = f_getConnString( server.MapPath( "databas/db1.mdb" ) )
set rs = server.CreateObject( "ADODB.recordset" )
rs.Open "select newsDate,newsID,header from news order by newsDate desc", connStr
for i = 1 to 3
%>
<%= day( rs( "newsDate" ) ) & "/" & month( rs( "newsDate" ) ) %> |
|
"><%= rs( "header" ) %>
|
<%
rs.MoveNext()
next
rs.Close()
set rs = nothing
%>
|