<% dim title title = "Kay Barnes for Congress - In the News" dim desc desc = "News clip about Kay Barnes and Kay4Congress.com" dim keywords keywords = "Kay Barnes, Congress, Sam Graves, press, release, media, advisory, news" %> News Room:
<% set conn=Server.CreateObject("ADODB.Connection") conn.Provider="Microsoft.Jet.OLEDB.4.0" conn.Open(Server.Mappath("/access_db/newsroom.mdb")) AID=Request.QueryString("ncID") set rs = Server.CreateObject("ADODB.recordset") sql="SELECT * FROM newsclips WHERE ncID="& AID &"" rs.Open sql, conn %>

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

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

<% Response.Write(rs("Publication").Value) %>
<% Response.Write(rs("Byline").Value) %>
<% Response.Write(rs("prDay").Value) %>, <% Response.Write(rs("MTHname").Value) %> <% Response.Write(rs("prDate").Value) %>, <% Response.Write(rs("prYear").Value) %>

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

<% if rs("Link1").Value <> "" then %>

  • "><% Response.Write(rs("Link1name").Value) %>

    <% end if %> <% if rs("Link2").Value <> "" then %>

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

    <% end if %> <% if rs("Link3").Value <> "" then %>

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

    <% end if %>