These are picture galleries with all those pictures that have not made it into a Picture Book. Have a browse around. If you have any information on any of the pictures just fill in the form and we will add it to the page.
<%
Dim gallerycounter
gallerycounter = 1
Set galleryRS = Server.CreateObject("ADODB.RecordSet")
gallerySQL= "Select subjectname, SUM(counter) AS total FROM tblSailingPages GROUP BY subjectname ORDER BY total DESC;"
galleryRS.Open gallerySQL, whtConn, 1
galleryRS.MoveFirst
Do Until gallerycounter = 4
Response.Write " "
Response.Write gallerycounter & "..."
Response.Write galleryRS("subjectname") & " "
Response.Write galleryRS("total") & " page views"
Response.Write "
"
gallerycounter = gallerycounter + 1
galleryRS.MoveNext
Loop
'close connections,etc..
galleryRS.Close
Set galleryRS = Nothing
%>
Buying your Boat
Financing your Boat
Selling your Boat
Surveying your Boat
Family Sailing
Types of Yacht
Makes of Yacht
Insurance