<% @LANGUAGE = VBScript %>
<%
Option Explicit
Response.Expires = 0
%>
New York Healthcare, home health care, New York Health Care will develop custom-tailored home care services to meet the needs of our clients.
<%
Dim objConn, objRS, strQ
Dim strConnection
Set objConn = Server.CreateObject("ADODB.Connection")
strConnection = "Data Source=" & Server.Mappath("database/nyhc.mdb") & ";Provider=Microsoft.Jet.OLEDB.4.0;"
objConn.Open strConnection
Set objRS = Server.CreateObject("ADODB.Recordset")
Set objRS.ActiveConnection = objConn
strQ = "SELECT tblPress.press_id, tblPress.press_date, tblPress.press_title, tblPress.press_report "
strQ = strQ & "FROM tblPress ORDER BY tblPress.press_date DESC;"
objRS.Open strQ
%>
