%@ Language=VBScript %> <% '*************************************************************************** ' FILENAME: $Workfile: confirm.asp $ ' DESCRIPTION: This ASP page is the confirm page in event registration. ' CREATION DATE: Jan 18, 2001 ' INITIAL AUTHOR: Frank Chang ' LAST MODIFIED DATE: $Date: 5/28/04 10:35a $ ' LAST MODIFIED BY: $Author: Nyepca1 $ ' Copyright (C) 2001 TVisions Inc. ' Tvisions, Inc. Confidential '*************************************************************************** %> <% Option Explicit %> <% 'Lets server know which security level we need http or https setServerProtocol(SECURE) Response.Buffer = True Dim myRegistrant Dim myOrder Dim myOrderItem Dim myEventMgr Dim eventStatus 'Set myEvent = Server.CreateObject("NYeCommerce.Panel") Set myRegistrant = Server.CreateObject("NYeCommerce.Registrant") Set myEventMgr = Server.CreateObject("NYeCommerce.PanelManager") Set myOrder = Server.CreateObject("NYeCommerce.Order") Set myOrderItem = Server.CreateObject("NYeCommerce.orderItem") 'Retrieve the order, event and registrant info from session myRegistrant.retrieveRegistrant "registerEvent" 'myEvent.retrievePanel "registerEvent" myOrder.retrieveOrder "registerEvent" 'Set the processing payment session variables Session("processing_payment") = False Session("paymentStatus") = "NO_STATUS" Session("number_payment_checks") = 0 %>