<% dim title title = "MayorSlay.com - From the Mayor's Desk" dim desc desc = "Official Website of Mayor Francis Slay - From the Mayor's Desk" dim keywords keywords = "Mayor Slay, Francis Slay, St. Louis Mayor, St. Louis, Mayor Slay, City of St. Louis, Missouri, From the Mayor's Desk" dim section section = "From the Mayor's Desk" %> <% set conn=Server.CreateObject("ADODB.Connection") conn.Provider="Microsoft.Jet.OLEDB.4.0" conn.Open(Server.Mappath("/Data/desk.mdb")) set rs = Server.CreateObject("ADODB.recordset") DID=Request.QueryString("deskID") sql="SELECT * FROM deskitems WHERE deskID="& DID &" AND live='on'" rs.Open sql, conn %>

<% DO WHILE NOT rs.EOF %> <% RS.MoveNext Loop %>

<%Response.Write(rs("desk_day").Value) %>, <% Response.Write(rs("desk_month").Value) %> <% Response.Write(rs("desk_date").Value) %>, <% Response.Write(rs("desk_year").Value) %>

<% Response.Write(rs("headline").Value) %>

<% Response.Write(rs("item").Value) %>