<%@ LANGUAGE = VBScript%> <%Response.Buffer = True%> <% '=============================================================================== ' CONTACTS LEVITATOR - POWERED BY LEVITY(TM) TECHNOLOGIES '=============================================================================== Set objContacts = Server.CreateObject("S1_ContactsWebServer.ContactsWebServer") ' LoadContactsList requires 1 parameter that specifies the form you want to ' load. Choose one of the following values as your parameter: ' 1 = Generic Contact ' 2 = Request for Information ' 3 = Request for Service ' 4 = Event Signup ' 5 = Job Application objContacts.LoadContactsList 1 objContacts.PrintContacts "thankyou.html", "error.html" %>