<% Dim sitepage_contents,sitepage_description,sitepage_id,sitepage_insertdate,sitepage_name If lcase(trim(Request.QueryString("pid"))) <> "" and IsNumeric(lcase(trim(Request.QueryString("pid")))) Then pid = lcase(trim(Request.QueryString("pid"))) Else pid = 1 End If sqlstr = "select * from SitePage" sqlstr = sqlstr & " where SitePage_id = " & pid GetConnection set p_adoRS = adoConn.Execute(SQLStr) If isrsok(p_adoRS) Then sitepage_contents = p_adoRS.fields("sitepage_contents") sitepage_Sidecontents = p_adoRS.fields("sitepage_Sidecontents") sitepage_description = p_adoRS.fields("sitepage_description") sitepage_id = p_adoRS.fields("sitepage_id") sitepage_insertdate = p_adoRS.fields("sitepage_insertdate") sitepage_name = p_adoRS.fields("sitepage_name") Else sitepage_contents = PageNotFound() sitepage_description = "Page Not Found" sitepage_id = "" sitepage_insertdate = "" sitepage_name = "Page Not Found - " End If %> Bethlehem Baptist Church - Photo Galleries

BBC PHOTO GALLERY
Copyright ©2009 Bethlehem Baptist Church | Site Design By MinistryMediaSoltuions.com