<% Dim adoCon Dim rs Set adoCon = Server.CreateObject("ADODB.Connection") adoCon.Open = "DRIVER={Microsoft Access Driver (*.mdb)}; DBQ=d:\webs\hells1\fpdb\HAMC_Anniv_Dates.mdb" set rs = adoCon.Execute ("SELECT DateDiff('yyyy',[newdate],Date()) AS Years, tblAnniv_Dates.Charter FROM tblAnniv_Dates WHERE (DatePart('m',[newdate]))=(Datepart('m',date())) ORDER BY DateDiff('yyyy',[newdate],Date());") %>

{PROSPECT CHARTER}

" STATELINE"

 

The Hells Angels Nomads Connecticut want to wish all our Brothers, Friends & Supporters Safe And Happy Holidays  
           
 

<%= date()%>