%@LANGUAGE="VBSCRIPT"%>
<%
Dim DConn, sConnString
Set DConn = Server.CreateObject("ADODB.Connection")
sConnString = "PROVIDER=Microsoft.Jet.OLEDB.4.0;DATA SOURCE=" & Server.MapPath("\SC\DB\PWC.mdb")
DConn.Open(sConnString)
%>
<%
Dim vScrollText
'Set Default Text Here
vScrollText = ""
Set rsSettings = Server.CreateObject("ADODB.Recordset")
sql = "SELECT * FROM tblSettings"
rsSettings.Open sql, DConn, 3, 3
IF rsSettings.EOF Then
rsSettings.Close
DConn.Close
END IF
IF NOT rsSettings.EOF THEN
rsSettings.MoveFirst
END IF
Do While NOT rsSettings.EOF
IF rsSettings("SettingName") = "HomepageScrollText" THEN
vScrollText = rsSettings("SettingValue")
END IF
rsSettings.MoveNext
Loop
rsSettings.Close
DConn.Close
%>
Pregnant With Cancer Network
|
|
|
|
| |
|
|
| |
|
|
|
| |
|

Pregnant With Cancer Network
P.O. Box 1243
Buffalo, N.Y. 14220
1-800-743-4471
|
|
| |
The Pregnant with Cancer Network is a national non-profit organization for women diagnosed with cancer during pregnancy. Our mission is to connect women who are pregnant with cancer with other women who have been pregnant with the same type of cancer. These women are here to lend support, offer hope and share their experiences with one another through phone and e-mail conversation.
|
|
 |
Are you currently pregnant with cancer?
The Pregnant with Cancer Network offers free support for women diagnosed with cancer while pregnant.
Request Our Support
|
|
| |
|
|
 |
Do you want to become a support woman in our Network?
The Pregnant with Cancer Network matches new members with trained volunteers who have also experienced cancer while pregnant.
Be a Support Woman
|
|
| |
|
|
| |
|
|
Pregnant with Cancer Network
1-800-743-4471
info@pregnantwithcancer.org
|
|
| |
|
|
| |
|
|
|
|
 |