<%@LANGUAGE="VBSCRIPT"%> <% Dim rs_links Dim rs_links_numRows Set rs_links = Server.CreateObject("ADODB.Recordset") rs_links.ActiveConnection = MM_boc_con_STRING rs_links.Source = "SELECT lnk_title, lnk_link, lnk_desc FROM links ORDER BY lnk_title ASC" rs_links.CursorType = 0 rs_links.CursorLocation = 2 rs_links.LockType = 1 rs_links.Open() rs_links_numRows = 0 %> <% Dim Repeat1__numRows Dim Repeat1__index Repeat1__numRows = -1 Repeat1__index = 0 rs_links_numRows = rs_links_numRows + Repeat1__numRows %>

A history of the Brothers of Charity will be appearing on this page shortly

<% rs_links.Close() Set rs_links = Nothing %>