Yacht Dealers & Brokers

<% Param = Request.QueryString("Param") Data = Request.QueryString("Data") %> <% If IsObject(Session("watercraft_conn")) Then Set conn = Session("watercraft_conn") Else Set conn = Server.CreateObject("ADODB.Connection") conn.open "watercraft","","" Set Session("watercraft_conn") = conn End If %> <% sql = "SELECT Dealers.CustomerID, Dealers.CompanyName, Dealers.Address, Dealers.City, Dealers.State, Dealers.Zip, Dealers.Country, Dealers.PhoneNumber, Dealers.FaxNumber, Dealers.TollFree, Dealers.EmailAddress, Dealers.Description, Dealers.Brands, Dealers.WebAddress, Dealers.BoatDealer, Dealers.PWCDealer, Dealers.Accessories, Dealers.BoatBuilder, Dealers.CanoeDealer, Dealers.InflatableDealer, Dealers.OutboardMotor, Dealers.PWCRental, Dealers.HBRental, Dealers.Tour, Dealers.YachtDealer, Dealers.Repair FROM Dealers WHERE (((Dealers.YachtDealer)=Yes)) " If cstr(Param) <> "" And cstr(Data) <> "" Then sql = sql & " And [" & cstr(Param) & "] = " & cstr(Data) End If sql = sql & " ORDER BY Dealers.City " Set rs = Server.CreateObject("ADODB.Recordset") rs.Open sql, conn, 3, 3 %>

USAWatercraft your one stop recource for all your boating and water sport recreation needs.

NEW River Cam Check it out today. Live pictures from the Colorado River!
Yacht Dealers & Brokers

PWC Rental
California, Arizona, Nevada, New Mexico, Texas

PWC Dealers
(personal watercraft)
California, Arizona, Nevada, New Mexico, Texas, Classifieds, PWC Quote

Boat Dealers
California, Arizona, Nevada, New Mexico, Texas, International

Recreation Rivers, Lakes, Ocean, Camping, Tips, Locations, Adventures, Humor. Up to date information on all the hot spots.

U.S.C.G. Auxiliary, Rules, Regulations and Safety Information for Recreational Boaters.

WaterCAM Live video from around the world. See the water before you get there.

USAWatercraft Display Ads, ther're sure to make a splash!

Check out our newest service. Dealers, get the details and signup now for PWC QuoteŽ, don't miss your next sale!

<% On Error Resume Next rs.MoveFirst do while Not rs.eof %> <% rs.MoveNext loop%>

	<%=Server.HTMLEncode(rs.Fields("Description").Value)%>To expand your Dealer Listing Click Here for complete details.	<%=Server.HTMLEncode(rs.Fields("Brands").Value)%>

Looking for a little excitement on or off the road. Check out our USAMotorcycle site for great bikes and information.