-----------<%@LANGUAGE="VBSCRIPT" CODEPAGE="1252"%> <% Dim adoCon 'Holds the Database Connection Object Dim RS 'Holds the recordset for the records in the database Dim SQL 'Holds the SQL query for the database Set adoCon = Server.CreateObject("ADODB.Connection") adoCon.Open "DRIVER={Microsoft Access Driver (*.mdb)}; DBQ=" & Server.MapPath("data\mtmorris.mdb") Set RS = Server.CreateObject("ADODB.Recordset") %> Mount Morris, New York - Calendar of Events
Mount Morris, New York Calendar of Events  
Calendar of Events
<% 'Response.Write "" %>

Add New Event

Your contact information.
In case we need to contact you.
Your Name:
Your Email:
Your Phone:
Event Information
Event Title:
Start Date:    
End Date:    
Sponsor:
Location:
Location Address:
Contact Name:
Contact Phone:
Contact eMail:
Web Site:
Long Decription:
  Enter the code exactly as you see it in the image below
(Cookies must be enabled)
" 'If blnCAPTCHAcodeCorrect Then 'Response.Write("Correctly") 'Else 'Response.Write("Please Try Again!!") 'End If 'Response.Write "
TOP
Legends are made in Mount Morris.
Come share the greatness with us!