<%=xdate%>
 About the Foundation How to
Make a Gift FAQs
Contact UsHave a question? Address & Phone Directions Annual Report
|
|
News Releases |
|
<%
Set Connection=Server.CreateObject("ADODB.Connection")
Connection.Open "DSN=marketing"
S="SELECT * FROM news WHERE ((chfbg=true) AND (dtmdate <= Now())) ORDER BY [dtmDate] DESC"
set rs =Connection.Execute(S)
%>
<% x = 0 do while x < 3 if rs.eof then Exit Do end if x = x + 1 datestr = WeekDayName(WeekDay(rs("dtmDate")), True) + " " + MonthName(Month(rs("dtmDate")), True) + " " + CStr(Day(rs("dtmDate"))) + ", " + CStr(Year(rs("dtmDate"))) %> <% RS.movenext Loop %> |
|
Have a question? |
|
Our Mission |
|
To support the not-for-profit healthcare objectives of Commonwealth Health Corporation. |
|
Foundation Spotlight |
|
|
800 Park Street