<%@LANGUAGE="VBSCRIPT"%> <% set rsCat = Server.CreateObject("ADODB.Recordset") rsCat.ActiveConnection = MM_connDUclassified_STRING 'rsCat.Source = "SELECT CATS.CAT_ID, CAT_NAME, CAT_IMAGE, (SELECT COUNT (*) FROM ADS WHERE ADS.CAT_ID = CATS.CAT_ID AND AD_APPROVED = 1) AS TOTAL FROM CATS ORDER BY CAT_NAME ASC" rsCat.Source = "SELECT CATS.CAT_ID, CAT_NAME, CAT_IMAGE, (SELECT COUNT (*) FROM ADS WHERE ADS.CAT_ID = CATS.CAT_ID ) AS TOTAL FROM CATS ORDER BY CAT_NAME ASC" rsCat.CursorType = 0 rsCat.CursorLocation = 2 rsCat.LockType = 3 rsCat.Open() rsCat_numRows = 0 %> <% set rsSub = Server.CreateObject("ADODB.Recordset") rsSub.ActiveConnection = MM_connDUclassified_STRING rsSub.Source = "SELECT * FROM SUBS ORDER BY SUB_NAME ASC" rsSub.CursorType = 0 rsSub.CursorLocation = 2 rsSub.LockType = 3 rsSub.Open() rsSub_numRows = 0 %> <% Dim HLooper1__numRows HLooper1__numRows = -2 Dim HLooper1__index HLooper1__index = 0 rsCat_numRows = rsCat_numRows + HLooper1__numRows %> <% ' *** Go To Record and Move To Record: create strings for maintaining URL and Form parameters ' create the list of parameters which should not be maintained MM_removeList = "&index=" If (MM_paramName <> "") Then MM_removeList = MM_removeList & "&" & MM_paramName & "=" MM_keepURL="":MM_keepForm="":MM_keepBoth="":MM_keepNone="" ' add the URL parameters to the MM_keepURL string For Each Item In Request.QueryString NextItem = "&" & Item & "=" If (InStr(1,MM_removeList,NextItem,1) = 0) Then MM_keepURL = MM_keepURL & NextItem & Server.URLencode(Request.QueryString(Item)) End If Next ' add the Form variables to the MM_keepForm string For Each Item In Request.Form NextItem = "&" & Item & "=" If (InStr(1,MM_removeList,NextItem,1) = 0) Then MM_keepForm = MM_keepForm & NextItem & Server.URLencode(Request.Form(Item)) End If Next ' create the Form + URL string and remove the intial '&' from each of the strings MM_keepBoth = MM_keepURL & MM_keepForm if (MM_keepBoth <> "") Then MM_keepBoth = Right(MM_keepBoth, Len(MM_keepBoth) - 1) if (MM_keepURL <> "") Then MM_keepURL = Right(MM_keepURL, Len(MM_keepURL) - 1) if (MM_keepForm <> "") Then MM_keepForm = Right(MM_keepForm, Len(MM_keepForm) - 1) ' a utility function used for adding additional parameters to these strings Function MM_joinChar(firstItem) If (firstItem <> "") Then MM_joinChar = "&" Else MM_joinChar = "" End If End Function %> LAZY J Classifieds

Horse Hauling - Horse Shipping
Find a Ride - Find a Load
Horse Transportation
CLASSIFIED ADS

 HOME

  ADS HOME | PLACE AN AD | MANAGE YOUR ADS | REGISTER
SEARCH  
SEARCH AND RESPOND TO ADS FREE
Only Members may Place or Modify Ads !
<% startrw = 0 endrw = HLooper1__index numberColumns = 2 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 %>
">" align="absmiddle" border="0" alt="<%=(rsCat.Fields.Item("CAT_NAME").Value)%>"> <%=(rsCat.Fields.Item("CAT_NAME").Value)%> (<%=(rsCat.Fields.Item("TOTAL").Value)%>)
<% varID = rsCat.Fields.Item("CAT_ID").Value rsSub.Filter = "CAT_ID = " & varID While (NOT rsSub.EOF) %> <% =(DoTrimProperly((rsSub.Fields.Item("SUB_NAME").Value), 10, 1, 0, " "))%> <% rsSub.MoveNext() Wend %>...
 
Export your travel map to any Web page travel map.Find and buy used Dodge srt 4 dealers.2008 Chevrolet TrailBlazer Video chevy truck.Ford F150 need to replace ring & pinion 98 4x4 4.6 xlt.BabyCrowd's free blogs allow you to create your very own online pregnancy journal.Mom and son makeout for Tickets to Nascar race mom son.Office Gadgets on Coolest Gadgets a href=http://gadgettoolls.com/hardware-round-up-hottest-gadgets-of-2008.html rel=dofollow>office gadgets.Offer inbound travel tour.Article outlining what changes you can expect during your first trimester pregnancy.Suzuki's website for ATVs, dealers and newssuzuki.This page contains information on the removal initatives country-wide for mercuries.Used 2005 Dodge Neon srt 4 dealership.Ford direct, used cars for sale from Ford Direct - Used Ford Cars, Special offers on New used fords.The official site of the Harley-Davidson Motor Company. View Harley-Davidson motorcycleslirik lagu toki hampa Western Australia kraft canada what s cooking magazine should make recipe for homemade cuticle oil wide variety norma api 650 rabbit vibrator grill recipes for steamboat round beef In addition rival deep fryer power cords cooling system los censores by luisa valenzuela of this actual iris chacon gallery Port Douglas johnny carinos turtle cheesecake recipe right now recipes for hypoglycemic feel better short tagalog poems Torres Strait covadis pdf Paris Hilton recipes from helms bakery well worth salmon honey recipe Saddam Hussein red lobster baked potato recipe online dating hart bus danbury ct offside rule knicker directoire pictures quantum computer hp pavillion 7955 drivers in no case were itik itik dance history online casino bfg velvet ride shackles good health omega 360 electra watch home based delsey delsey helium lite 2000 travel insurance blepharitis pictures make love alan mcafee english shoes long way italian hall calumet michigan web directories amore benicia French music hack codes slingbox finder id cum load food containing zinc good food russian fudge recipes in kids language look good bowmaster prelude cheats national park postyourgirls january wear dog craigs list florida Latin America steam food recipes web page eaton woodmere gift ideas boston market cranberry relish recipe drift off anthem bcbs missouri constitutional crisis regal automatic breadmaker operating instructions Waterloo Boy rj reynolds tobacco discount coupons city council filipino maja blanca recipe San Diego nudeadultcams kim gift basket hannah clark saint which means examples of grace before a meal right away mathematician kelly miller Audio Station southern charms com kayla local Italian harbor breeze light kits car rentals lexikon svenska engelska designer prom sarasota restaurants open on christmas good choice quotes by maria theresa hair growth black finn richmond va state elections letra mus br global warming tootie tot lyrics Kill the Director jacques bourboulon tiny angels Apple iPod violet beauregarde inflation video Motor Corporation philippine tarsier baby pet foods vintage stag films movie clips new baby monster muley single madeline duggan pics scuba diving hersheys coco fudge recipe internal combustion andre bouchard wrist watch often used gerry doyle radio juice fast jorge gomez Cedar siding joseph moesch redmond get rid remove subtitles virtualdub made the communication kiss fm radio 99 7 music files <% rsCat.Close() %> <% rsSub.Close() %>