<!--#INCLUDE FILE="adminheader.asp"-->
<!--#include file=adovbs.inc -->
<script src="eventsavevalidators.js" type="text/javascript"></script>
<%
Set objConn = Server.CreateObject("ADODB.Connection")
Set objCmd  = Server.CreateObject("ADODB.Command")
Set objRS   = Server.CreateObject("ADODB.Recordset")

objConn.Open "FourC"

objRS.CursorType = adOpenForwardOnly
objRS.LockType = adLockOptimistic
                
Set objCmd.ActiveConnection = objConn

'If a SQL statement with question marks is specified, then the
'CommandType is adCmdText.  If a query name is specified, then
'the CommandType is adCmdStoredProc.

objCmd.CommandText = "SELECT * FROM EVENTS INNER JOIN EVENTTYPE ON EVENTS.EventTypeID = EVENTTYPE.EventTypeID WHERE EVENTID = ?"
objCmd.CommandType = adCmdText

'Create the parameter and populate it.

Set objParam = objCmd.CreateParameter("@EVENTID" , adInteger, adParamInput, 0, 0)
objCmd.Parameters.Append objParam

donationEventId = Request.Form("DonationEventId")
objCmd.Parameters("@EVENTID") = donationEventId

'Open and display the Recordset.

objRS.Open objCmd

Do While Not objRS.EOF

sendEmailReceiptCheckedTrue = ""
sendEmailReceiptCheckedFalse = ""

if(objRS.Fields("SendEmailReceipt") = "True") then
	sendEmailReceiptCheckedTrue = "checked"
else
	sendEmailReceiptCheckedFalse = "checked"
end if

%>


<p>Event Type: <%= objRS.Fields("EventTypeDescription")%></p>
<p>Event Id: <%= objRS.Fields("EventID")%></p>

<form method="POST" action="updateevent.asp" onsubmit="return Validator(this)">
	Do not include quotes (") in fields.  The field will not be saved as quotes are rejected by Authorize.Net

<div>
	<input type="hidden" name="EventId" value="<%= objRS.Fields("EVENTID")%>"/>
	<label for="EventName">Event Name:</label>
	<input type="text" name="EventName" value="<%= objRS.Fields("EventName")%>"/>
</div>
<div>
	<label for="EventDescription">Event Description:</label>
	<input type="text" name="EventDescription" value="<%= objRS.Fields("EventDescription")%>"/>
</div>
<div>
	<label for="ReceiptLink">Receipt Link:</label>
	<input type="text" name="ReceiptLink" value="<%= objRS.Fields("ReceiptLink")%>"/>
</div>	
<div>
	<label for="ReceiptMethod">Receipt Method:</label>
	<input type="text" name="ReceiptMethod" value="<%= objRS.Fields("ReceiptMethod")%>"/>
</div>

<div>
	<label for="SendEmailReceipt">Send Email Receipt:</label>
	<input type="radio" name="SendEmailReceipt" value="True" <%=sendEmailReceiptCheckedTrue%>/>Yes
	<input type="radio" name="SendEmailReceipt" value="False" <%=sendEmailReceiptCheckedFalse%>/> No
</div>

<div>
	<label for="ReceiptEmailSender">Receipt Email Sender:</label>
	<input type="text" name="ReceiptEmailSender" value="<%= objRS.Fields("ReceiptEmailSender")%>"/>
</div>

<div>
	<label for="ReceiptEmailFooter">Receipt Email Footer:</label>
	<input type="text" name="ReceiptEmailFooter" value="<%= objRS.Fields("ReceiptEmailFooter")%>"/>
</div>

<div>
	<label for="PaymentFormHeader">Payment Form Header:</label>
	<input type="text" name="PaymentFormHeader" value="<%= objRS.Fields("PaymentFormHeader")%>"/>
</div>

<div>
	<label for="PaymentFormFooter">Payment Form Footer:</label>
	<input type="text" name="PaymentFormFooter" value="<%= objRS.Fields("PaymentFormFooter")%>"/>
</div>

<div>
	<label for="ReceiptFormHeader">Receipt Form Header:</label>
	<input type="text" name="ReceiptFormHeader" value="<%= objRS.Fields("ReceiptFormHeader")%>"/>
</div>

<div>
	<label for="ReceiptFormFooter">Receipt Form Footer:</label>
	<input type="text" name="ReceiptFormFooter" value="<%= objRS.Fields("ReceiptFormFooter")%>"/>
</div>

<div>
	<label for="CancelURL">Cancel URL:</label>
	<input type="text" name="CancelURL" value="<%= objRS.Fields("CancelURL")%>"/>
</div>

<div>
	<label for="ReceiptPageURL">Receipt Page URL:</label>
	<input type="text" name="ReceiptPageURL" value="<%= objRS.Fields("ReceiptPageURL")%>"/>
</div>

<div>
	<label for="ReceiptPageTitle">Receipt Page Title:</label>
	<input type="text" name="ReceiptPageTitle" value="<%= objRS.Fields("ReceiptPageTitle")%>"/>
</div>

<div>
	<label for="EventConfirmation">Event Confirmation:</label>
	<input type="text" name="EventConfirmation" value="<%= objRS.Fields("EventConfirmation")%>"/>
</div>

<div>
	<label for="EventEmailConfirmation">Event Email Confirmation:</label>
	<input type="text" name="EventEmailConfirmation" value="<%= objRS.Fields("EventEmailConfirmation")%>"/>
</div>

<input type="submit" value="Save"/>
<div>
</div>
</form>
<%
objRS.MoveNext
Loop

objRS.Close
objConn.Close
Set objRS = Nothing
Set objCmd = Nothing
Set objConn = Nothing
%>