<%@LANGUAGE="VBSCRIPT"%> <% Dim rsNews Dim rsNews_cmd Dim rsNews_numRows Set rsNews_cmd = Server.CreateObject ("ADODB.Command") rsNews_cmd.ActiveConnection = MM_connNews_STRING rsNews_cmd.CommandText = "{call spDisplayNews}" rsNews_cmd.Prepared = true Set rsNews = rsNews_cmd.Execute rsNews_numRows = 0 %> <% Dim Repeat1__numRows Dim Repeat1__index Repeat1__numRows = 10 Repeat1__index = 0 rsNews_numRows = rsNews_numRows + Repeat1__numRows %> Payne Marine
   
 

 
   
  Early Spring Hours
March 01 to Victoria Day: Monday to Saturday 8am to 5pm

Late Spring Hours
Victoria Day to June 20th: Monday to Saturday 8am to 5pm

Summer Hours
June 21 to Labour Day: Monday to Sunday 8am to 8pm

Fall Hours
Labour Day to November 30th: Monday to Friday 8am to 5pm

Winter Hours
Dec 01 to last day of February: By appointment only

 
     
   
  <% While ((Repeat1__numRows <> 0) AND (NOT rsNews.EOF)) %>
<%=(rsNews.Fields.Item("Title").Value)%>
<%= DoDateTime((rsNews.Fields.Item("nDate").Value), 1, 1033) %>
<%=(rsNews.Fields.Item("Content").Value)%>


<% if (rsNews.Fields.Item("Pdf").Value) <> "" Then %>
">Download PDF
<% end if%>
<% Repeat1__index=Repeat1__index+1 Repeat1__numRows=Repeat1__numRows-1 rsNews.MoveNext() Wend %> 		 
   
     


Marine Forecast



home | profile | services | sales | our team | news and info | locate us | contact
Copyright © 2006 Payne Marine. All Rights Reserved. Website Design by NRJ Design
<% rsNews.Close() Set rsNews = Nothing %>