<% ' this indicates vb script dim conn dim rsdir dim ssql dim catid dim cat dim bid dim bus dim con dim state dim prod ' get the value of the category id sent in from either the directorylistingindex page or this page calling itself catid = request("n") if catid = "" then catid = "0" catid = clng(catid) cat = request("l") bid = request("bid") if bid = "" then bid = "0" state =request("state") bus = request("bus") con = request("con") prod = request("prod") ' open a connection to the database set conn = createobject("ADODB.CONNECTION") conn.ConnectionString = "Provider=SQLOLEDB; Data Source=; Initial Catalog=ehorsehotline; User Id=dba1814; Password=gpo943" conn.Open ' open a recordset which is used to get the data from the database set rsdir = createobject("ADODB.RECORDSET") %> Horse Products Horse Tack Equine Tack Products
Electronic Horse Network
receives over 2 million
hits a month!

(218) 743-6477
Email eHorseHotline.com

Directory Listings
Horse Products and Service Directory by Category

Sale Barns
& Auctions

Equine Tack
Horse Tack
Horse Tack
Horse Tack
Horse Tack
Equine Tack
Horse Products
Photographer specializing in horse events, rodeos, barrel races!

Legal & Finance
Horse Ranches and Training Stables
Equine Tack Rodeo Personell, Announcers, ...
Equine Shelters
Barrel Horses for Sale
Rodeo Stock Contractors Horse Trailer Service and Repair
Trailer Repair
Affiliate Network
Find what you need...