<%@LANGUAGE="VBSCRIPT" CODEPAGE="1252"%>
<%
Dim category
Dim category_numRows
Set category = Server.CreateObject("ADODB.Recordset")
category.ActiveConnection = MM_ccjdpdb_STRING
category.Source = "SELECT * FROM tbl_category ORDER BY category ASC"
category.CursorType = 0
category.CursorLocation = 2
category.LockType = 1
category.Open()
category_numRows = 0
%>
CCJDP - Catholic Commision for Justice, Development & Peace Melbourne: Human Rights Register: Quick Search by Category
