<%@LANGUAGE="JAVASCRIPT" CODEPAGE="1252"%> <% var rs_test = Server.CreateObject("ADODB.Recordset"); rs_test.ActiveConnection = MM_cn_forum_STRING; rs_test.Source = "SELECT * FROM FORUM_CATEGORY"; rs_test.CursorType = 0; rs_test.CursorLocation = 2; rs_test.LockType = 1; rs_test.Open(); var rs_test_numRows = 0; %> <% // *** Recordset Stats, Move To Record, and Go To Record: declare stats variables // set the record count var rs_test_total = rs_test.RecordCount; // set the number of rows displayed on this page if (rs_test_numRows < 0) { // if repeat region set to all records rs_test_numRows = rs_test_total; } else if (rs_test_numRows == 0) { // if no repeat regions rs_test_numRows = 1; } // set the first and last displayed record var rs_test_first = 1; var rs_test_last = rs_test_first + rs_test_numRows - 1; // if we have the correct record count, check the other stats if (rs_test_total != -1) { rs_test_numRows = Math.min(rs_test_numRows, rs_test_total); rs_test_first = Math.min(rs_test_first, rs_test_total); rs_test_last = Math.min(rs_test_last, rs_test_total); } %> <% // *** Recordset Stats: if we don't know the record count, manually count them if (rs_test_total == -1) { // count the total records by iterating through the recordset for (rs_test_total=0; !rs_test.EOF; rs_test.MoveNext()) { rs_test_total++; } // reset the cursor to the beginning if (rs_test.CursorType > 0) { if (!rs_test.BOF) rs_test.MoveFirst(); } else { rs_test.Requery(); } // set the number of rows displayed on this page if (rs_test_numRows < 0 || rs_test_numRows > rs_test_total) { rs_test_numRows = rs_test_total; } // set the first and last displayed record rs_test_last = Math.min(rs_test_first + rs_test_numRows - 1, rs_test_total); rs_test_first = Math.min(rs_test_first, rs_test_total); } %> IMQS.ie
IMQS.ie home
home
public info
profile & objectives
the industry
environment
news, events, talks
schoolzone
photo gallery
careers + training
membership info
links + resources
contact us

member services

members only
> login <
articles archive
imqs.ie email
editors only
> login <
control panel
IMQS.ie
 Links + Resources
Other Websites
Athlone Institute of Technology Online
Dublin Institute of Technology, DIT
Engineers Ireland
IGI - Institute of Geologists of Ireland
The Irish Association for Economic Geology
Mining Heritage Trust of Ireland
National Roads Authority
Quarry Management Magazine
International Association of Hydrogeologists - Irish Group
Machinery Movers Magazine
irishconstruction.com
EUROPA - the European Union Online
European Environmental Agency
An Taisce
Goodquarry.com
Safequarry.com
Goodmarine.com
Virtualquarry.co.uk
Agg-Net - The Aggregates & Recycling Information Network NEW!
Quarry Products Association Northern Ireland
Institute of Quarrying Northern Ireland
UK-Rocks.net
Castlecomer Discovery Park
United Nations International Year of Planet Earth (IYPE)

related

IMQS sponsors
Index
1. Local Gov
2. National Gov
3. Miscellaneous

IMQS news
latest headlines
© Irish Mining and Quarrying Society 2002-2007 | developed by silvermoonmedia.com
IMQS.ie home <% rs_test.Close(); %>