<%@LANGUAGE="VBSCRIPT" CODEPAGE="65001"%> <% Dim rsEvents Dim rsEvents_cmd Dim rsEvents_numRows Set rsEvents_cmd = Server.CreateObject ("ADODB.Command") rsEvents_cmd.ActiveConnection = MM_CMS_STRING rsEvents_cmd.CommandText = "SELECT * FROM Events" rsEvents_cmd.Prepared = true Set rsEvents = rsEvents_cmd.Execute rsEvents_numRows = 0 %> Adaggios | Banquets | Conferences
   

Where we make your event
"One to Remember"

317-489-3333
 
   
   

<%=(rsEvents.Fields.Item("pageContent").Value)%>

 
   
   
copyright © Adaggios
    


<% rsEvents.Close() Set rsEvents = Nothing %>