<% Param = Request.QueryString("Param") Data = Request.QueryString("Data") %> <% If IsObject(Session("classifieds_conn")) Then Set conn = Session("classifieds_conn") Else Set conn = Server.CreateObject("ADODB.Connection") conn.open "classifieds","","" Set Session("classifieds_conn") = conn End If %> <% sql = "SELECT Classifieds.AdID, Classifieds.Name, Classifieds.Email, Classifieds.State, Classifieds.Phone, Classifieds.AdCopy, Classifieds.DateSubmitted, Classifieds.Under16, Classifieds.[16_18], Classifieds.[19_22], Classifieds.[23_30], Classifieds.[30plus], Classifieds.pwc, Classifieds.yacht, Classifieds.wanted FROM Classifieds WHERE (((Classifieds.pwc)=Yes) AND ((Classifieds.wanted)=No)) " If cstr(Param) <> "" And cstr(Data) <> "" Then sql = sql & " And [" & cstr(Param) & "] = " & cstr(Data) End If sql = sql & " ORDER BY Classifieds.DateSubmitted DESC " Set rs = Server.CreateObject("ADODB.Recordset") rs.Open sql, conn, 3, 3 %>

 

MastheadLeftNeon.gif (11809 bytes)MastheadRightNeon.gif (3284 bytes)


CLASSIFIEDS - PWC's
classified1.gif (6222 bytes) Search the Classifieds for
PWC's
Boats under 16 ft.
16-18 ft. boats
19-22 ft. boats
23-30 ft. boats
31+ ft. boats
Yachts
Sail boats
Canoes & Kayaks
Inflatables
Items wanted
PWC's & Parts Wanted		 FREE Classifieds, add your listing here.  Sell any watercraft from ocean going yachts to canoes to everything in between for FREE!

Your ad will run for 3 months. If you sell your boat please let us know so we can remove it from the classified.  Just send email to us here or use this handy Ad deletion form.

 FREE Classifieds
<% On Error Resume Next rs.MoveFirst do while Not rs.eof %> <% rs.MoveNext loop%>
 
  State COMING SOON Date