<%@LANGUAGE="VBSCRIPT"%> <% on error resume next %> <% Dim rsCAT Dim rsCAT_numRows Set rsCAT = Server.CreateObject("ADODB.Recordset") rsCAT.ActiveConnection = MM_connGODRUGFREE_STRING rsCAT.Source = "SELECT * FROM tblcat ORDER BY sNAME ASC" rsCAT.CursorType = 0 rsCAT.CursorLocation = 2 rsCAT.LockType = 1 rsCAT.Open() rsCAT_numRows = 0 %> <% Dim HLooper1__numRows HLooper1__numRows = -4 Dim HLooper1__index HLooper1__index = 0 rsCAT_numRows = rsCAT_numRows + HLooper1__numRows %> GoDrugFree.org | Drug Rehab, Addiction & Abuse Resources Directory

Search

 

 

Welcome to GoDrugFree.org, a website dedicated to bringing you the best drug rehabilitation resources, detox centers & treatment facilities from around the world, under one domain.

We encourage drug addiction treatment organizations and websites to contact us or submit their website information.

<% startrw = 0 endrw = HLooper1__index numberColumns = 4 numrows = -1 while((numrows <> 0) AND (Not rsCAT.EOF)) startrw = endrw + 1 endrw = endrw + numberColumns %> <% While ((startrw <= endrw) AND (Not rsCAT.EOF)) %> <% startrw = startrw + 1 rsCAT.MoveNext() Wend %> <% numrows=numrows-1 Wend %>
"><%=(rsCAT.Fields.Item("sNAME").Value)%>

 

We comply with the HONcode standard for trustworthy health
information:
verify here.

 

. All Rights Reserved. 2006-2008. GoDrugFree.org.