|
|
|
           <% '=========== contest icon placement dim intPage intpage=159 set dbContest=Server.CreateObject("ADODB.Connection") dbContest.Open "rehoboth" sql="select * from contesticon where page="& intPage set GetPage=dbContest.Execute (sql) if not GetPage.EOF then %><% end if dbContest.Close set dbContest=nothing %> |
<%
'============= save this space for rotating banner asp code ==============
'============= display banner ad
%>
Rehoboth Beach Riding & Stables
|
Today
is <% =WeekDayName(WeekDay(Date())) %> <% =MonthName(Month(Date())) &" " %><% =Day(Date()) %> , <% =Year(Date()) %> |
|
places to stay | things to do | where to eat | where
to shop | local business the community | news & weather | real estate | how to find us | nightlife contact us | home |