jerrydigital
10-20-2008, 02:20 PM
I am having trouble getting data the user inputs into my form from my website to arrive in my email box. Currently, I receive an email with just the titles....Airline: Confirmation Number: Airline2:..etc,etc. but no input information such as what airline(in a drop down menu on my form) and confirmation #
I have posted my asp form below. can you see any reason why my form doesn't work? thanks alot for any guidance.
_________________________________________________________________
thisisit.asp
<%
Dim EmailFrom
Dim EmailTo
Dim Subject
Dim airline
Dim confirmflight
Dim airline2
Dim confirmflight2
Dim carrental
Dim confirmcar
Dim carrental2
Dim confirmcar2
Dim hotel
Dim confirmhotel
Dim hotel2
Dim confirmhotel2
Dim train
Dim confirmtrain
Dim train2
Dim confirmtrain2
EmailFrom = "marci@travelco.com"
EmailTo = "matt@travelco.com"
Subject = "Itinerary"
airline = Trim(Request.Form("airline"))
confirmflight = Trim(Request.Form("confirmflight"))
airline2 = Trim(Request.Form("airline2"))
confirmflight2 = Trim(Request.Form("confirmflight2"))
carrental = Trim(Request.Form("carrental"))
confirmcar = Trim(Request.Form("confirmcar"))
carrental2 = Trim(Request.Form("carrental2"))
confirmcar2 = Trim(Request.Form("confirmcar2"))
hotel = Trim(Request.Form("hotel"))
confirmhotel = Trim(Request.Form("confirmhotel"))
hotel2 = Trim(Request.Form("hotel2"))
confirmhotel2 = Trim(Request.Form("confirmhotel2"))
train = Trim(Request.Form("train"))
confirmtrain = Trim(Request.Form("confirmtrain"))
train2 = Trim(Request.Form("train2"))
confirmtrain2 = Trim(Request.Form("confirmtrain2"))
Dim validationOK
validationOK=true
If (validationOK=false) Then Response.Redirect("itineraryfailed.html")
Dim Body
Body = Body & "airline: " & airline & VbCrLf
Body = Body & "confirmflight: " & confirmflight & VbCrLf
Body = Body & "airline2: " & airline2 & VbCrLf
Body = Body & "confirmflight2: " & confirmflight2 & VbCrLf
Body = Body & "carrental: " & carrental & VbCrLf
Body = Body & "confirmcar: " & confirmcar & VbCrLf
Body = Body & "carrental2: " & carrental2 & VbCrLf
Body = Body & "confirmcar2: " & confirmcar2 & VbCrLf
Body = Body & "hotel: " & hotel & VbCrLf
Body = Body & "confirmhotel: " & confirmhotel & VbCrLf
Body = Body & "hotel2: " & hotel2 & VbCrLf
Body = Body & "confirmhotel2: " & confirmhotel2 & VbCrLf
Body = Body & "train: " & train & VbCrLf
Body = Body & "confirmtrain: " & confirmtrain & VbCrLf
Body = Body & "train2: " & train2 & VbCrLf
Body = Body & "confirmtrain2: " & confirmtrain2 & VbCrLf
Dim mail
Set mail = Server.CreateObject("CDONTS.NewMail")
mail.To = EmailTo
mail.From = EmailFrom
mail.Subject = Subject
mail.Body = Body
mail.Send
Response.Redirect("itineraryconfirmation.html")
%>
I have posted my asp form below. can you see any reason why my form doesn't work? thanks alot for any guidance.
_________________________________________________________________
thisisit.asp
<%
Dim EmailFrom
Dim EmailTo
Dim Subject
Dim airline
Dim confirmflight
Dim airline2
Dim confirmflight2
Dim carrental
Dim confirmcar
Dim carrental2
Dim confirmcar2
Dim hotel
Dim confirmhotel
Dim hotel2
Dim confirmhotel2
Dim train
Dim confirmtrain
Dim train2
Dim confirmtrain2
EmailFrom = "marci@travelco.com"
EmailTo = "matt@travelco.com"
Subject = "Itinerary"
airline = Trim(Request.Form("airline"))
confirmflight = Trim(Request.Form("confirmflight"))
airline2 = Trim(Request.Form("airline2"))
confirmflight2 = Trim(Request.Form("confirmflight2"))
carrental = Trim(Request.Form("carrental"))
confirmcar = Trim(Request.Form("confirmcar"))
carrental2 = Trim(Request.Form("carrental2"))
confirmcar2 = Trim(Request.Form("confirmcar2"))
hotel = Trim(Request.Form("hotel"))
confirmhotel = Trim(Request.Form("confirmhotel"))
hotel2 = Trim(Request.Form("hotel2"))
confirmhotel2 = Trim(Request.Form("confirmhotel2"))
train = Trim(Request.Form("train"))
confirmtrain = Trim(Request.Form("confirmtrain"))
train2 = Trim(Request.Form("train2"))
confirmtrain2 = Trim(Request.Form("confirmtrain2"))
Dim validationOK
validationOK=true
If (validationOK=false) Then Response.Redirect("itineraryfailed.html")
Dim Body
Body = Body & "airline: " & airline & VbCrLf
Body = Body & "confirmflight: " & confirmflight & VbCrLf
Body = Body & "airline2: " & airline2 & VbCrLf
Body = Body & "confirmflight2: " & confirmflight2 & VbCrLf
Body = Body & "carrental: " & carrental & VbCrLf
Body = Body & "confirmcar: " & confirmcar & VbCrLf
Body = Body & "carrental2: " & carrental2 & VbCrLf
Body = Body & "confirmcar2: " & confirmcar2 & VbCrLf
Body = Body & "hotel: " & hotel & VbCrLf
Body = Body & "confirmhotel: " & confirmhotel & VbCrLf
Body = Body & "hotel2: " & hotel2 & VbCrLf
Body = Body & "confirmhotel2: " & confirmhotel2 & VbCrLf
Body = Body & "train: " & train & VbCrLf
Body = Body & "confirmtrain: " & confirmtrain & VbCrLf
Body = Body & "train2: " & train2 & VbCrLf
Body = Body & "confirmtrain2: " & confirmtrain2 & VbCrLf
Dim mail
Set mail = Server.CreateObject("CDONTS.NewMail")
mail.To = EmailTo
mail.From = EmailFrom
mail.Subject = Subject
mail.Body = Body
mail.Send
Response.Redirect("itineraryconfirmation.html")
%>