Parish Events

<% nof_rootDir="../" nof_scriptDir="scripts" nof_debug=false %> <% nof_sitePath = GetSitePath(nof_rootDir) function GetSitePath(RootDir) Dim relPath relPath = split(RootDir, "/") forwardSteps = UBound(relPath) - 1 if forwardSteps = 0 and relPath(0) = "." then forwardSteps = -1 GetSitePath = Server.MapPath(".") for idx=0 to forwardSteps GetSitePath = Left(GetSitePath, inStrRev(GetSitePath, "\") - 1) next GetSitePath = GetSitePath & "\" end function %> <% sub IncludeLib(ByVal lib, ByVal sitePath, ByVal scriptDir) dim fso, f, buf, filePath Set fso = Server.CreateObject("Scripting.FileSystemObject") filePath = sitePath & scriptDir & "\" & lib if fso.FileExists(filePath) then set f = fso.OpenTextFile(filePath, 1, false, -2) buf = f.ReadAll f.close() set f = nothing Dim regEx Set regEx = New RegExp regEx.Pattern = "^\s*<" & chr(37) & "\s*" regEx.IgnoreCase = True regEx.Global = True buf = regEx.Replace(buf,"") regEx.Pattern = "\s*" & chr(37) & ">\s*$" regEx.IgnoreCase = True regEx.Global = True buf = regEx.Replace(buf, "") set regEx = nothing ExecuteGlobal buf else if nof_debug then Response.Write "Could not include the file `" & filePath & "`." else Response.Write "

An error occured. Please contact the site administrator.

" Response.Write "

Error code: 103

" end if Response.End end if set fso = nothing end sub %> <% call IncludeLib("nof_util.asp", nof_sitePath, nof_scriptDir) call IncludeLib("nw_functions.asp", nof_sitePath, nof_scriptDir) %> <% call IncludeLib("nw_view.asp", nof_sitePath, nof_scriptDir) %> Parish Events

88 Beckenham Hill Road, London, SE6 3PU
Telephone: 020 8695 1092
A member of Churches Together in Bellingham

Parish Events

<% nof_componentId="1251512020312" nof_componentName="view" nof_scriptInterfaceFile="News1251512034296.xml.asp" nof_debug=false set nof_locale = nwLocaleToDictionary(nof_sitePath & nof_scriptDir, "News_en.properties") Call nwViewMain() %>


	[Welcome] [Mass Times] [Parish Team] [Sacraments] [Parish Groups] [Newsletter] [Mass Intentions] [Diary of Events] [Parish Events] [Deanery Events] [Archdiocese Events] [Local Area Events] [Parish School] [Our History] [Supporting Our Parish] [Our Church] [Photo Gallery] [Contact Us] [Useful Links] [Site Content]