<%
response.buffer = True
response.addheader "Pragma", "No-Cache"
response.expires = 0 

dim strErr

'declare session variables
'validation section
Session("Client") = Request.Form("Client")
Session("Referred") = Request.Form("Referred")
Session("ClientAddress") = Request.Form("ClientAddress")
Session("city") = Request.Form("city")
Session("state") = Request.Form("state")
Session("zip") = Request.Form("zip")
Session("HomePhone") = Request.Form("HomePhone")
Session("WorkPhone") = Request.Form("WorkPhone")
Session("OtherPhone") = Request.Form("OtherPhone")
Session("Email") = Request.Form("Email")
Session("EventType") = Request.Form("EventType")
Session("EventDate") = Request.Form("EventDate")
Session("EventStart") = Request.Form("EventStart")
Session("EventStop") = Request.Form("EventStop")
Session("EventLocation") = Request.Form("EventLocation")
Session("EventAddress") = Request.Form("EventAddress")
Session("OnSiteContact") = Request.Form("OnSiteContact")
Session("OnSiteContactPhone") = Request.Form("OnSiteContactPhone")
Session("ReceptionAddress") = Request.Form("ReceptionAddress")

'non-validation section
Session("GuestNum") = Request.Form("GuestNum")
Session("AgeRange") = Request.Form("AgeRange")

If Request.Form("AdditionalTime") = "yes" Then
	Session("AdditionalTimeYes") = "Checked"
End If
If Request.Form("AdditionalTime") = "no" Then
	Session("AdditionalTimeNo") = "Checked"
End If
If Request.Form("AdditionalTime") = "not sure" Then
	Session("AdditionalTimeNotSure") = "Checked"
End If

If Request.Form("DiningMusic") = "yes" Then
	Session("DiningMusicYes") = "Checked"
End If
If Request.Form("DiningMusic") = "no" Then
	Session("DiningMusicNo") = "Checked"
End If

If Request.Form("RandB") = "yes" Then
	Session("RandB") = "Checked"
End If
If Request.Form("Rock") = "yes" Then
	Session("Rock") = "Checked"
End If
If Request.Form("Classical") = "yes" Then
	Session("Classical") = "Checked"
End If
If Request.Form("ShowTunes") = "yes" Then
	Session("ShowTunes") = "Checked"
End If
If Request.Form("JazzContemp") = "yes" Then
	Session("JazzContemp") = "Checked"
End If
If Request.Form("JazzClassic") = "yes" Then
	Session("JazzClassic") = "Checked"
End If
If Request.Form("OtherDiningMusic") = "yes" Then
	Session("OtherDiningMusic") = "Checked"
End If

Session("OtherDiningMusicText") = Request.Form("OtherDiningMusicText")

If Request.Form("DanceMusic") = "yes" Then
	Session("DanceMusicYes") = "Checked"
End If
If Request.Form("DanceMusic") = "no" Then
	Session("DanceMusicNo") = "Checked"
End If

If Request.Form("50RandB") = "yes" Then
	Session("50RandB") = "Checked"
End If
If Request.Form("50RandR") = "yes" Then
	Session("50RandR") = "Checked"
End If
If Request.Form("60PartyRock") = "yes" Then
	Session("60PartyRock") = "Checked"
End If
If Request.Form("60Motown") = "yes" Then
	Session("60Motown") = "Checked"
End If
If Request.Form("70ClassicRock") = "yes" Then
	Session("70ClassicRock") = "Checked"
End If
If Request.Form("70RandB") = "yes" Then
	Session("70RandB") = "Checked"
End If
If Request.Form("80RandB") = "yes" Then
	Session("80RandB") = "Checked"
End If
If Request.Form("80Rock") = "yes" Then
	Session("80Rock") = "Checked"
End If
If Request.Form("90RandB") = "yes" Then
	Session("90RandB") = "Checked"
End If
If Request.Form("90Rock") = "yes" Then
	Session("90Rock") = "Checked"
End If
If Request.Form("DiscoFunk") = "yes" Then
	Session("DiscoFunk") = "Checked"
End If
If Request.Form("Pop") = "yes" Then
	Session("Pop") = "Checked"
End If
If Request.Form("BigBand") = "yes" Then
	Session("BigBand") = "Checked"
End If
If Request.Form("Country") = "yes" Then
	Session("Country") = "Checked"
End If
If Request.Form("Latin") = "yes" Then
	Session("Latin") = "Checked"
End If
If Request.Form("Reggae") = "yes" Then
	Session("Reggae") = "Checked"
End If
If Request.Form("OtherDanceMusic") = "yes" Then
	Session("OtherDanceMusic") = "Checked"
End If

Session("OtherDanceMusicText") = Request.Form("OtherDanceMusicText")
Session("MusicPreferrence") = Request.Form("MusicPreferrence")
Session("DontPlay") = Request.Form("DontPlay")

If Request.Form("DJAttire") = "formal" Then
	Session("DJAttireFormal") = "Checked"
End If
If Request.Form("DJAttire") = "semi-formal" Then
	Session("DJAttireSemiFormal") = "Checked"
End If
If Request.Form("DJAttire") = "business casual" Then
	Session("DJAttireBC") = "Checked"
End If
If Request.Form("DJAttire") = "comfortable" Then
	Session("DJAttireComfortable") = "Checked"
End If
If Request.Form("DJAttire") = "other" Then
	Session("DJAttireOther") = "Checked"
End If

Session("DJAttireOtherText") = Request.Form("DJAttireOther")

If Request.Form("DJPersonality") = "quite" Then
	Session("DJPersonalityQuite") = "Checked"
End If
If Request.Form("DJPersonality") = "quiet-medium" Then
	Session("DJPersonalityQM") = "Checked"
End If
If Request.Form("DJPersonality") = "medium" Then
	Session("DJPersonalityMedium") = "Checked"
End If
If Request.Form("DJPersonality") = "medium-lively" Then
	Session("DJPersonalityML") = "Checked"
End If
If Request.Form("DJPersonality") = "lively" Then
	Session("DJPersonalityLively") = "Checked"
End If

Session("EventTime1") = Request.Form("EventTime1")
Session("Event1") = Request.Form("Event1")
Session("EventTime2") = Request.Form("EventTime2")
Session("Event2") = Request.Form("Event2")
Session("EventTime3") = Request.Form("EventTime3")
Session("Event3") = Request.Form("Event3")
Session("EventTime4") = Request.Form("EventTime4")
Session("Event4") = Request.Form("Event4")
Session("EventTime5") = Request.Form("EventTime5")
Session("Event5") = Request.Form("Event5")
Session("EventTime6") = Request.Form("EventTime6")
Session("Event6") = Request.Form("Event6")
Session("EventTime7") = Request.Form("EventTime7")
Session("Event7") = Request.Form("Event7")
Session("EventTime8") = Request.Form("EventTime8")
Session("Event8") = Request.Form("Event8")
Session("Instructions") = Request.Form("Instructions")

strErr = ""

'validate form
If Request.Form("Client") = "" Then
	Session("ErrClient") = "You must enter the Client(s) name:"
	strErr = 1
End If

if request.form("Referred") = "" then
	Session("ErrReferred") = "You must enter the person's name who referred you:"
	'strErr = 1
end if

If Request.Form("ClientAddress") = "" Then
	Session("ErrClientAddress") = "You must enter the Client's Address:"
	'strErr = 1
End If

If Request.Form("city") = "" Then
	Session("errcity") = "You must enter the Client's City:"
	'strErr = 1
End If

If Request.Form("state") = "" Then
	Session("errstate") = "You must enter the Client's State:"
	'strErr = 1
End If

If Request.Form("zip") = "" Then
	Session("errzip") = "You must enter the Client's Postal (Zip) Code:"
	'strErr = 1
End If

If Request.Form("HomePhone") = "" AND Request.Form("WorkPhone") = "" AND Request.Form("OtherPhone") = "" Then
	Session("ErrPhone") = "You must enter at least one Phone Number:"
	'strErr = 1
End If

If Request.Form("Email") = "" Then
	Session("ErrEmail") = "You must enter your E-mail Address:"
	strErr = 1
End If

If Request.Form("EventType") = "" Then
	Session("ErrEventType") = "You must enter the Type of Event/Occasion:"
	'strErr = 1
End If

If Request.Form("EventDate") = "" Then
	Session("ErrEventDate") = "You must enter the Date of your event:"
	'strErr = 1
End If

If Request.Form("EventStart") = "" Then
	Session("ErrEventStart") = "You must enter the Start Time of your event:"
	'strErr = 1
End If

If Request.Form("EventStop") = "" Then
	Session("ErrEventStop") = "You must enter the Ending Time of your event:"
	'strErr = 1
End If

If Request.Form("EventLocation") = "" Then
	Session("ErrEventLocation") = "You must enter the Location of your event:"
	'strErr = 1
End If

If Request.Form("EventAddress") = "" Then
	Session("ErrEventAddress") = "You must enter the Address of your event:"
	'strErr = 1
End If

If Request.Form("OnSiteContact") = "" Then
	Session("ErrOnSiteContact") = "You must enter an On-site Contact for your event:"
	'strErr = 1
End If

If Request.Form("OnSiteContactPhone") = "" Then
	Session("ErrOnSiteContactPhone") = "You must enter the On-Site Contact's Phone Number:"
	'strErr = 1
End If

If Not strErr = "" Then
	Response.Redirect("../partyform.asp")
Else
'clear validation
Session("ErrClient") = ""
Session("ErrReferred") = ""
Session("ErrClientAddress") = ""
Session("errcity") = ""
Session("errstate") = ""
Session("errzip") = ""
Session("ErrPhone") = ""
Session("ErrEmail") = ""
Session("ErrEventType") = ""
Session("ErrEventDate") = ""
Session("ErrEventStart") = ""
Session("ErrEventStop") = ""
Session("ErrEventLocation") = ""
Session("ErrEventAddress") = ""
Session("ErrOnSiteContact") = ""
Session("ErrOnSiteContactPhone") = ""

'clear session variables
Session("Client") = ""
Session("Referred") = ""
Session("ClientAddress") = ""
Session("city") = ""
Session("state") = ""
Session("zip") = ""
Session("HomePhone") = ""
Session("WorkPhone") = ""
Session("OtherPhone") = ""
Session("Email") = ""
Session("EventType") = ""
Session("EventDate") = ""
Session("EventStart") = ""
Session("EventStop") = ""
Session("EventLocation") = ""
Session("EventAddress") = ""
Session("OnSiteContact") = ""
Session("OnSiteContactPhone") = ""
Session("ReceptionAddress") = ""
Session("GuestNum") = ""
Session("AgeRange") = ""
Session("AdditionalTimeYes") = ""
Session("AdditionalTimeNo") = ""
Session("AdditionalTimeNotSure") = ""
Session("DiningMusicYes") = ""
Session("DiningMusicNo") = ""
Session("RandB") = ""
Session("Rock") = ""
Session("Classical") = ""
Session("ShowTunes") = ""
Session("JazzContemp") = ""
Session("JazzClassic") = ""
Session("OtherDiningMusic") = ""
Session("OtherDiningMusicText") = ""
Session("DanceMusicYes") = ""
Session("DanceMusicNo") = ""
Session("50RandB") = ""
Session("50RandR") = ""
Session("60PartyRock") = ""
Session("60Motown") = ""
Session("70ClassicRock") = ""
Session("70RandB") = ""
Session("80RandB") = ""
Session("80Rock") = ""
Session("90RandB") = ""
Session("90Rock") = ""
Session("DiscoFunk") = ""
Session("Pop") = ""
Session("BigBand") = ""
Session("Country") = ""
Session("Latin") = ""
Session("Reggae") = ""
Session("OtherDanceMusic") = ""
Session("OtherDanceMusicText") = ""
Session("MusicPreferrence") = ""
Session("DontPlay") = ""
Session("DJAttireFormal") = ""
Session("DJAttireSemiFormal") = ""
Session("DJAttireBC") = ""
Session("DJAttireComfortable") = ""
Session("DJAttireOther") = ""
Session("DJAttireOtherText") = ""
Session("DJPersonalityQuite") = ""
Session("DJPersonalityQM") = ""
Session("DJPersonalityMedium") = ""
Session("DJPersonalityML") = ""
Session("DJPersonalityLively") = ""
Session("EventTime1") = ""
Session("Event1") = ""
Session("EventTime2") = ""
Session("Event2") = ""
Session("EventTime3") = ""
Session("Event3") = ""
Session("EventTime4") = ""
Session("Event4") = ""
Session("EventTime5") = ""
Session("Event5") = ""
Session("EventTime6") = ""
Session("Event6") = ""
Session("EventTime7") = ""
Session("Event7") = ""
Session("EventTime8") = ""
Session("Event8") = ""
Session("Instructions") = ""
End If
'end validation

dim SenderEmail, SenderName
dim oMail, Bdy

SenderEmail = request.form("Email")
SenderName = request.form("Client")

Bdy = "<html><head></head><body bgcolor= #FFFFFF>" & _
"<table width=470 border=0 cellspacing=1 cellpadding=0><tr><td><font size=2>New request from your web site, hosted by <a href=http://www.kansas.net>KansasNet Internet Services</a>.</font></td" & chr(13) & chr(10) & "</tr>" & _
"<tr><td><font size=2>Submission originated at <a href=http://www.megawattinc.com/party.asp>http://www.megawattinc.com/party.asp</a></font></td>" & chr(13) & chr(10) & "</tr>" & _
"<tr align=center><td><font size =2>Submitted by " & SenderName & " on " & Now() & "</font></td>" & chr(13) & chr(10) & "</tr>" & _
"<tr align=center><td><font size =2>________________________________________________________________</font></td></tr>" & chr(13) & chr(10) & "</table>" & _
"" & chr(13) & chr(10) & chr(13) & chr(10) & "" & _





"<table width=450 border=0 cellspacing=1 cellpadding=0><tr align=center><td><font size=2>******************** Party Form Info **********************</font></td></tr>" & chr(13) & chr(10) & "</table>" & _
"<table width=439 border=0 cellspacing=1 cellpadding=0>" & _
"<tr><td width=123 align=right><font size=2><b>Client(s) : </b></font></td><td width=315><font size=2> " & request.form("Client") & "</font></td>" & chr(13) & chr(10) & "</tr>" & _
"<tr><td width=123 align=right><font size=2><b>Referred by : </b></font></td><td width=315><font size=2> " & request.form("Referred") & "</font></td>" & chr(13) & chr(10) & "</tr>" & _
"<tr><td width=123 align=right><font size=2><b>Address : </b></font></td><td width=315><font size=2> " & request.form("ClientAddress") & "</font></td>" & chr(13) & chr(10) & "</tr>" & _
"<tr><td width=123 align=right>&nbsp;</td><td width=315><font size=2> " & request.form("city") & ", " & request.form("state") & " " & request.form("zip") & "</font></td>" & chr(13) & chr(10) & "</tr>" & _
"<tr><td width=123 align=right><font size=2><b>Home Phone : </b></font></td><td width=315><font size=2> " & request.form("HomePhone") & "</font></td>" & chr(13) & chr(10) & "</tr>" & _
"<tr><td width=123 align=right><font size=2><b>Work Phone : </b></font></td><td width=315><font size=2> " & request.form("WorkPhone") & "</font></td>" & chr(13) & chr(10) & "</tr>" & _
"<tr><td width=123 align=right><font size=2><b>Other Phone : </b></font></td><td width=315><font size=2> " & request.form("OtherPhone") & "</font></td>" & chr(13) & chr(10) & "</tr>" & _
"<tr><td width=123 align=right><font size=2><b>Email Address : </b></font></td><td width=315><font size=2> " & request.form("Email") & "</font></td>" & chr(13) & chr(10) & "</tr>" & _
"<tr><td width=123 align=right><font size=2><b>Event Type/Occasion : </b></font></td><td width=315><font size=2> " & request.form("EventType") & "</font></td>" & chr(13) & chr(10) & "</tr>" & _
"<tr><td width=123 align=right><font size=2><b>Date : </b></font></td><td width=315><font size=2> " & request.form("EventDate") & "</font></td>" & chr(13) & chr(10) & "</tr>" & _
"<tr><td width=123 align=right><font size=2><b>Time : </b></font></td><td width=315><font size=2> " & request.form("EventStart") & " to " & request.form("EventStop") & "</font></td>" & chr(13) & chr(10) & "</tr>" & _
"<tr><td width=123 align=right><font size=2><b>Location : </b></font></td><td width=315><font size=2> " & request.form("EventLocation") & "</font></td>" & chr(13) & chr(10) & "</tr>" & _
"<tr><td width=123 align=right><font size=2><b>Address : </b></font></td><td width=315><font size=2> " & request.form("EventAddress") & "</font></td>" & chr(13) & chr(10) & "</tr>" & _
"<tr><td width=123 align=right><font size=2><b>On-site Contact : </b></font></td><td width=315><font size=2> " & request.form("OnSiteContact") & "</font></td>" & chr(13) & chr(10) & "</tr>" & _
"<tr><td width=123 align=right><font size=2><b>Phone Number : </b></font></td><td width=315><font size=2> " & request.form("OnSiteContactPhone") & "</font></td>" & chr(13) & chr(10) & "</tr>" & _
"<tr><td width=123 align=right><font size=2><b># of Guests : </b></font></td><td width=315><font size=2> " & request.form("GuestNum") & "</font></td>" & chr(13) & chr(10) & "</tr>" & _
"<tr><td width=123 align=right><font size=2><b>Guest Age Range : </b></font></td><td width=315><font size=2> " & request.form("AgeRange") & "</font></td>" & chr(13) & chr(10) & "</tr>" & _
"<tr><td width=123 align=right><font size=2><b>Rent extra time : </b></font></td><td width=315><font size=2> " & request.form("AdditionalTime") & "</font></td>" & chr(13) & chr(10) & "</tr>" & _
"<tr><td width=123 align=right><font size=2><b>Dining/Cocktail Music : </b></font></td><td width=315><font size=2> " & request.form("DiningMusic") & "</font></td>" & chr(13) & chr(10) & "</tr>" & _
"<tr><td width=123 align=right><font size=2><b>Adult Contemporary R&B : </b></font></td><td width=315><font size=2> " & request.form("RandB") & "</font></td>" & chr(13) & chr(10) & "</tr>" & _
"<tr><td width=123 align=right><font size=2><b>Adult Contemporary Rock : </b></font></td><td width=315><font size=2> " & request.form("Rock") & "</font></td>" & chr(13) & chr(10) & "</tr>" & _
"<tr><td width=123 align=right><font size=2><b>Classical : </b></font></td><td width=315><font size=2> " & request.form("Classical") & "</font></td>" & chr(13) & chr(10) & "</tr>" & _
"<tr><td width=123 align=right><font size=2><b>Show Tunes : </b></font></td><td width=315><font size=2> " & request.form("ShowTunes") & "</font></td>" & chr(13) & chr(10) & "</tr>" & _
"<tr><td width=123 align=right><font size=2><b>Contemporary Jazz : </b></font></td><td width=315><font size=2> " & request.form("JazzContemp") & "</font></td>" & chr(13) & chr(10) & "</tr>" & _
"<tr><td width=123 align=right><font size=2><b>Classic Jazz : </b></font></td><td width=315><font size=2> " & request.form("JazzClassic") & "</font></td>" & chr(13) & chr(10) & "</tr>" & _
"<tr><td width=123 align=right><font size=2><b>Other : </b></font></td><td width=315><font size=2> " & request.form("OtherDiningMusic") & "</font></td>" & chr(13) & chr(10) & "</tr>" & _
"<tr><td width=123 align=right><font size=2><b>If Other : </b></font></td><td width=315><font size=2> " & request.form("OtherDiningMusicText") & "</font></td>" & chr(13) & chr(10) & "</tr>" & _
"<tr><td width=123 align=right><font size=2><b>Dancing Music : </b></font></td><td width=315><font size=2> " & request.form("DancingMusic") & "</font></td>" & chr(13) & chr(10) & "</tr>" & _
"<tr><td width=123 align=right><font size=2><b>50�s R&B : </b></font></td><td width=315><font size=2> " & request.form("50RandB") & "</font></td>" & chr(13) & chr(10) & "</tr>" & _
"<tr><td width=123 align=right><font size=2><b>50�s Rock & Roll : </b></font></td><td width=315><font size=2> " & request.form("50RandR") & "</font></td>" & chr(13) & chr(10) & "</tr>" & _
"<tr><td width=123 align=right><font size=2><b>60�s Party Rock : </b></font></td><td width=315><font size=2> " & request.form("60PartyRock") & "</font></td>" & chr(13) & chr(10) & "</tr>" & _
"<tr><td width=123 align=right><font size=2><b>60�s R&B (Motown) : </b></font></td><td width=315><font size=2> " & request.form("60Motown") & "</font></td>" & chr(13) & chr(10) & "</tr>" & _
"<tr><td width=123 align=right><font size=2><b>70�s Classic Rock : </b></font></td><td width=315><font size=2> " & request.form("70ClassicRock") & "</font></td>" & chr(13) & chr(10) & "</tr>" & _
"<tr><td width=123 align=right><font size=2><b>70�s R&B : </b></font></td><td width=315><font size=2> " & request.form("70RandB") & "</font></td>" & chr(13) & chr(10) & "</tr>" & _
"<tr><td width=123 align=right><font size=2><b>80�s R&B(Dance) : </b></font></td><td width=315><font size=2> " & request.form("80RandB") & "</font></td>" & chr(13) & chr(10) & "</tr>" & _
"<tr><td width=123 align=right><font size=2><b>80�s Rock : </b></font></td><td width=315><font size=2> " & request.form("80Rock") & "</font></td>" & chr(13) & chr(10) & "</tr>" & _
"<tr><td width=123 align=right><font size=2><b>90�s R&B(Dance) : </b></font></td><td width=315><font size=2> " & request.form("90RandB") & "</font></td>" & chr(13) & chr(10) & "</tr>" & _
"<tr><td width=123 align=right><font size=2><b>90�s Rock : </b></font></td><td width=315><font size=2> " & request.form("90Rock") & "</font></td>" & chr(13) & chr(10) & "</tr>" & _
"<tr><td width=123 align=right><font size=2><b>Disco/Funk : </b></font></td><td width=315><font size=2> " & request.form("DiscoFunk") & "</font></td>" & chr(13) & chr(10) & "</tr>" & _
"<tr><td width=123 align=right><font size=2><b>Top 40/Pop : </b></font></td><td width=315><font size=2> " & request.form("Pop") & "</font></td>" & chr(13) & chr(10) & "</tr>" & _
"<tr><td width=123 align=right><font size=2><b>Big Band/Hit Parade : </b></font></td><td width=315><font size=2> " & request.form("BigBand") & "</font></td>" & chr(13) & chr(10) & "</tr>" & _
"<tr><td width=123 align=right><font size=2><b>Country : </b></font></td><td width=315><font size=2> " & request.form("Country") & "</font></td>" & chr(13) & chr(10) & "</tr>" & _
"<tr><td width=123 align=right><font size=2><b>Latin : </b></font></td><td width=315><font size=2> " & request.form("Latin") & "</font></td>" & chr(13) & chr(10) & "</tr>" & _
"<tr><td width=123 align=right><font size=2><b>Reggae : </b></font></td><td width=315><font size=2> " & request.form("Reggae") & "</font></td>" & chr(13) & chr(10) & "</tr>" & _
"<tr><td width=123 align=right><font size=2><b>Other : </b></font></td><td width=315><font size=2> " & request.form("OtherDanceMusic") & "</font></td>" & chr(13) & chr(10) & "</tr>" & _
"<tr><td width=123 align=right><font size=2><b>If Other : </b></font></td><td width=315><font size=2> " & request.form("OtherDanceMusicText") & "</font></td>" & chr(13) & chr(10) & "</tr>" & _
"<tr><td width=123 align=right><font size=2><b>Music Preference : </b></font></td><td width=315><font size=2> " & request.form("MusicPreferrence") & "</font></td>" & chr(13) & chr(10) & "</tr>" & _
"<tr><td width=123 align=right><font size=2><b>Don't Play : </b></font></td><td width=315><font size=2> " & request.form("DontPlay") & "</font></td>" & chr(13) & chr(10) & "</tr>" & _
"<tr><td width=123 align=right><font size=2><b>DJ Attire : </b></font></td><td width=315><font size=2> " & request.form("DJAttire") & "</font></td>" & chr(13) & chr(10) & "</tr>" & _
"<tr><td width=123 align=right><font size=2><b>Attire(if other) : </b></font></td><td width=315><font size=2> " & request.form("DJAttireOther") & "</font></td>" & chr(13) & chr(10) & "</tr>" & _
"<tr><td width=123 align=right><font size=2><b>DJ Personality : </b></font></td><td width=315><font size=2> " & request.form("DJPersonality") & "</font></td>" & chr(13) & chr(10) & "</tr>" & _
"<tr><td width=123 align=right><font size=2><b>Scheduled Events & Time : </b></font></td><td width=315><font size=2>&nbsp;</font></td>" & chr(13) & chr(10) & "</tr>" & _
"<tr><td width=123 align=right><font size=2><b>Event1 : </b></font></td><td width=315><font size=2> " & request.form("EventTime1") & " and " & request.form("Event1") & "</font></td>" & chr(13) & chr(10) & "</tr>" & _
"<tr><td width=123 align=right><font size=2><b>Event2 : </b></font></td><td width=315><font size=2> " & request.form("EventTime2") & " and " & request.form("Event2") & "</font></td>" & chr(13) & chr(10) & "</tr>" & _
"<tr><td width=123 align=right><font size=2><b>Event3 : </b></font></td><td width=315><font size=2> " & request.form("EventTime3") & " and " & request.form("Event3") & "</font></td>" & chr(13) & chr(10) & "</tr>" & _
"<tr><td width=123 align=right><font size=2><b>Event4 : </b></font></td><td width=315><font size=2> " & request.form("EventTime4") & " and " & request.form("Event4") & "</font></td>" & chr(13) & chr(10) & "</tr>" & _
"<tr><td width=123 align=right><font size=2><b>Event5 : </b></font></td><td width=315><font size=2> " & request.form("EventTime5") & " and " & request.form("Event5") & "</font></td>" & chr(13) & chr(10) & "</tr>" & _
"<tr><td width=123 align=right><font size=2><b>Event6 : </b></font></td><td width=315><font size=2> " & request.form("EventTime6") & " and " & request.form("Event6") & "</font></td>" & chr(13) & chr(10) & "</tr>" & _
"<tr><td width=123 align=right><font size=2><b>Event7 : </b></font></td><td width=315><font size=2> " & request.form("EventTime7") & " and " & request.form("Event7") & "</font></td>" & chr(13) & chr(10) & "</tr>" & _
"<tr><td width=123 align=right><font size=2><b>Event8 : </b></font></td><td width=315><font size=2> " & request.form("EventTime8") & " and " & request.form("Event8") & "</font></td>" & chr(13) & chr(10) & "</tr>" & _
"<tr><td width=123 align=right><font size=2><b>Instructions : </b></font></td><td width=315><font size=2> " & request.form("Instructions") & "</font></td></tr>" & chr(13) & chr(10) & "</table>" & _
"" & chr(13) & chr(10) & chr(13) & chr(10) &"" & _






"<table width=450 border=0 cellspacing=1 cellpadding=0><tr>" & chr(13) & chr(10) & "<td><font size=2>________________________________________________________________</font></td>" & chr(13) & chr(10) & "</tr>" & _
"<tr align=center><td><font size=2>Need Assistance?  Please Email Us!!  -  <a href=Mailto:support@kansas.net>support@kansas.net</a></font></td></tr>" & chr(13) & chr(10) & "</table>" & _
"</body>" & chr(13) & chr(10) & "</html>"


	Set oMail = Server.CreateObject("Persits.MailSender")
	oMail.Host = ""
	oMail.IsHTML = True
		if not request.form("Email") = "" then
			oMail.From = request.form("Email")
		else
			oMail.From = ""
		end if
		if not Request.Form("Client") = "" then
			oMail.FromName = Request.Form("Client")
		else
			oMail.FromName = "KansasNet"
		end if
	oMail.AddAddress  "jon@megawattusa.com"
    oMail.Subject = "Party Information Request"
	oMail.Username = ""
	oMail.Password = "" 
	oMail.Body = Bdy
	oMail.Send

Response.Redirect("../../confirm.asp")
  oMail.Reset
  oMail="Nothing"
%>