<%@ Language=VBScript%> SPEEDWAY DIGITAL ARMY




<% 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 %> <% rs.MoveNext() next rs.Close() set rs = nothing %>

<%= day( rs( "newsDate" ) ) & "/" & month( rs( "newsDate" ) ) %> | "><%= rs( "header" ) %>