%
IF Request("Submit2") <> "" Then
DIM E(28)
E(1)="bronwyn@drumcafe.com"
E(2)="bronwyn@drumcafe.com"
E(3)="bronwyn@drumcafe.com"
E(4)="bronwyn@drumcafe.com"
E(5)="bronwyn@drumcafe.com"
E(6)="info@drumcafe.com.tw"
E(7)="info@drumcafe.com.cn"
E(8)="info@drumcafe.com.tw"
E(9)="wendeen@drumcafe.com"
E(10)="aliya@drumcafe.com"
E(11)="naama@drumcafe.com"
E(12)="info@drumcafe.co.au"
E(13)="mandy@drumcafe.com"
E(14)="info@drumcafe.co.au"
E(15)="info@drumcafe.ca"
E(16)="bookings@drumcafe.com"
E(17)="info@drumcafe.ca"
E(18)="patrick@drumcafe.com"
E(19)="info@drumcafe.de"
E(20)="brett@drumcafe.com"
E(21)="aviva@drumcafe.com"
E(22)="warren@drumcafe.com"
E(23)="aviva@drumcafe.com"
E(24)="dan@drumcafe.com"
E(25)="jo-ann@drumcafe.com"
E(26)="dan@drumcafe.com"
'E(27)="bronwyn@drumcafe.com"
E(27)="larrylok@world-share.com"
Body = "First Name: " & Request("FrstName") & vbCrLf
Body = Body & "Last Name: " & Request("LastName") & vbCrLf
Body = Body & "Company Name: " & Request("CompanyName") & vbCrLf
Body = Body & "Phone number: " & Request("Phonenumber") & vbCrLf
Body = Body & "Email: " & Request("Email") & vbCrLf
Body = Body & "Approx number of people: " & Request("Approxnumber") & vbCrLf
Body = Body & "Probable Event date: " & Request("ProbableEvent") & vbCrLf
Body = Body & "Event objective: " & Request("Eventobjective") & vbCrLf
Body = Body & "Message: " & Request("Message") & vbCrLf
Body = Body & "Position: " & Request("Position") & vbCrLf
Body = Body & "Company Type: " & Request("CompanyType") & vbCrLf
Body = Body & "Event city: " & Request("Eventcity") & vbCrLf
Body = Body & "Event country: " & Request("Eventcountry") & vbCrLf
Body = Body & "Venue: " & Request("Venue") & vbCrLf
Body = Body & "Reason for event: " & Request("Reasonfor") & vbCrLf
Body = Body & "You need a: " & Request("Youneed") & vbCrLf
Body = Body & "Budget: " & Request("Budget") & vbCrLf
Body = Body & "Heard about us from: " & Request("Heardabout")
set Message = Server.CreateObject( "JMail.Message" )
Message.From = Request("Email")
Message.Subject = "Request a proposal"
Message.Body = Body
Message.AddRecipient "wendeen@drumcafe.com"
Message.AddRecipient "lingeorge.tw@gmail.com"
Message.AddRecipient "nathanchen@world-share.com"
if E(Request("select2")) <> "wendeen@drumcafe.com" Then
Message.AddRecipient E(Request("select2"))
End IF
Message.Send("www.drumcafe.com")
Response.Redirect("./request_proposal_thank_you.html")
Response.End
End IF
%>
Team Building & Interactive drumming entertainment and leadership Programs in USA and Canada
|
 |
 |
*Indicates a mandatory field |
|
|
|
|