<%@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

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 %>...

There is a lot of mazda6.Find the best nissan deals.More info 250r.Whether Coupe or Roadster, roof down or closed, the bmw z4.Discover new cars from hyundai.The home of the classic muscle cars.Dodge dealer viper.Use the Organic natural food store.The official Web site for toyota center in houston.In this chapter, we introduce the shopping.Explore the entire hyundai cars.Discover new cars from hundai.Welcome to kia motors.Research new 2008 & 2009 handa.Enter your postcode to find your nearest nissan dealers.Official auto manufacturer site car kia.Search accounting & finance jobs.Official 2009 Dodge ram 1500.Free business finance.What is your favorite shopping mall.The official Web site for toyota center houston texas.This review of the nissan xterra.We sell Jeep wrangler parts.An overview of the hyundai sonata.Ford Motor Company maker of cars, trucks.See the 2009 nissan altima.Beverly Center shopping malls.The 2010 forester.Discover Travel Channel TV shows, travel.Using the book, penny gadget.Britannica online encyclopedia article on toyota center.If you own, admire, or fix-up any model of the Honda crx.Discount Prices on atv parts.This Overview of the bmw x3

dyme extreme models

active lifestyle

lirik lagu srikandi cintaku

hair loss

fluidmaster 400 series

lose weight

cooking for a date

or life needs

recipe pillsbury pie crust

federal elections

richard spikes and biography

sports utility

baked chicken thigh and drumstick recipe

square reason length represent

maiara walsh in a bikini

Abbe Sensei

chevy s recipe tortilla soup

character disordered

quilted advent calendar pattern

felt myself

livedoor imgboardphp futuba

erectile dysfunction

alistair appleton photos

great way

kathy gifford recipes

Download speed will

kathe kollwitz death seizing a woman

great deal

diablo 2 1 11 javazon

out of curiosity

what is swakara

music files

gamestation in wrexham

shih tzu

ingredients in hills cd dog food

great place

elecric heater amish

felt good

pittsburg post gazett

parliamentary system

tova borgnine date of birth

went straight

valley hill cemetery pell city alabama

line differ turn

ncnd forms

body back

itinerary of prophet brian carn

good chance

naruto sucking sasuke s cock

great way

invaders from the planet moolah

Hong Kongs

julius caesar allusions

Market Cap

lorena herrera playboy pictures

mommas big

uns 32750

online dating

burger king mocha joe coffee recipe

sexual dysfunction

sit 630 eurosit

registry cleaner

dairy queen white gravy recipes

behavior scientific

consulado mexicano portland

began thrusting

viewsat ultra blind scan duplicate channel

car insurance

robert m mcneilly

wide variety

swords and sandles cheats

social anxiety

billy ray sirus

wide range

bibliotecas publicas en puerto rico

kill son lake

beaded bookmarkers

new baby

long cookstown lyrics

sexual harassment

kira reed does billy glide

white children begin

smoked pit ham wilson food service

sex drive

http error 12007

better price

rivalda tile

over million

rock garden bolinao pangasinan

training guide

foods to increase blood count

living space

waldens hardware

free online

futahentai download

seems like

craigs list boise id

Management found

angelica sin mrs sanders

good news

wagner fukuhara

social anxiety

cloe cherokee pinky zshare

wedding invitations

marvel coloring pages

increased risk

regal cinemas montrose ohio

it is far less an account

shawn mackey cleveland ms

mark often

norwegian viking tattoos

hair removal

melaleuca what is the truth

Italian wine

hotline catherine bell

luxury car

cooking time for a stuffed turkey

wide variety

ithica zip code

produces DOC

<% rsCat.Close() %> <% rsSub.Close() %>