<% dim name,email,subject,message name = TRIM(Request.Form("name")) email = TRIM(Request.Form("email")) subject = TRIM(Request.Form("subject")) message = TRIM(Request.Form("message")) Dim BodyContent Dim ContactUsMail Set ContactUsMail = CreateObject("CDONTS.NewMail") ContactUsMail.From= email ContactUsMail.To= "dli@awtlinida.com" ContactUsMail.Subject= "Contact Us (AW Travels)" ContactUsMail.CC= "bgl@awtlindia.com,bby@awtlindia.com" BodyContent = BodyContent & "Customer Name & Message" & vbCrLf BodyContent = BodyContent & "-----------------------" & vbCrLf & vbCrLf BodyContent = BodyContent & "Name : " & name & vbCrLf BodyContent = BodyContent & "E-mail : " & email & vbCrLf & vbCrLf BodyContent = BodyContent & "Subject : " & subject & vbCrLf & vbCrLf BodyContent = BodyContent & "Message : " & message & vbCrLf & vbCrLf & vbCrLf BodyContent = BodyContent & "For AW Customer Service" & vbCrLf & vbCrLf ContactUsMail.Body = BodyContent ContactUsMail.Send set ContactUsMail=nothing Response.Redirect ("thanx.htm") %>