News

<% dbFlavor = "Provider=Microsoft.Jet.OLEDB.4.0;Data Source=" & Server.MapPath("db/flavor.mdb") set rsNews = Server.CreateObject("ADODB.Recordset") rsNews.ActiveConnection = dbFlavor rsNews.Source = "SELECT datestamp,subject,message FROM news WHERE showonpage = True ORDER BY id DESC" rsNews.Open() %> <% rsNews.Close() %>
<% While Not rsNews.EOF Response.Write "" & FormatDateTime(rsNews("datestamp"),2) & " - " & rsNews("subject") & "
" & rsNews("message") & "

" rsNews.MoveNext Wend %>
     Ordering
     News
    Dealers and Distributors
   F.A.Q.'s
    About
Flavoreeds