Link to home
Start Free TrialLog in
Avatar of ceuley
ceuley

asked on

.asp return email?

how do i creat a request for Request for Return Authorization in .asp coding????

please help!
Avatar of D_M_D
D_M_D

Do you need to create a Request for Return Authorization form for users to fill-out?

if so here 's a good example of one...
http://www.coat.com/contact/epiphany2b.shtml

--------
D_M_D
Avatar of ceuley

ASKER

here is my current code:
its actually a email going to the customer with the values they given. it's an confirmation.
thanks,
------------------------------------------------------------------------------------------------------

<%
custno= request.Form("CUSTNO")
faxno= request.Form("FAXNO")
name= request.Form("NAME")
thedate= request.Form("THEDATE")
email= request.Form("EMAIL")
choice= request.Form("choice")
I1= request.Form("I1")
Q1= request.Form("Q1")
M1= request.Form("M1")
D1= request.Form("D1")
I2= request.Form("I2")
Q2= request.Form("Q2")
M2= request.Form("M2")
D2= request.Form("D2")
I3= request.Form("I3")
Q3= request.Form("Q3")
M3= request.Form("M3")
D3= request.Form("D3")
I4= request.Form("I4")
Q4= request.Form("Q4")
M4= request.Form("M4")
D4= request.Form("D4")
I5= request.Form("I5")
Q5= request.Form("Q5")
M5= request.Form("M5")
D5= request.Form("D5")


bodyCopy = "Request for Return Authorization"  & vbCrLf
bodyCopy = bodyCopy & vbCrLf
bodyCopy = bodyCopy & "This is a Request for Return on " & request("THEDATE")  & " for the following items:" & vbCrLf  & vbCrLf

bodyCopy = bodyCopy & "Invoice number: " & request("I1") & vbCrLf
bodyCopy = bodyCopy  & "Number to return: " & request("Q1")  & vbCrLf
bodyCopy = bodyCopy  & "Model number: " & request("M1") & 
bodyCopy = bodyCopy  & "Description: " & request("D1") & vbCrLf & vbCrLf & vbCrLf

if I2 <> "" then
bodyCopy = bodyCopy & "Invoice number: " & request("I2") & vbCrLf
bodyCopy = bodyCopy  & "Number to return: " & request("Q2")  & vbCrLf
bodyCopy = bodyCopy  & "Model number: " & request("M2") & 
bodyCopy = bodyCopy  & "Description: " & request("D2") & vbCrLf & vbCrLf & vbCrLf
end if

if I3 <> "" then
bodyCopy = bodyCopy & "Invoice number: " & request("I3") & vbCrLf
bodyCopy = bodyCopy  & "Number to return: " & request("Q3")  & vbCrLf
bodyCopy = bodyCopy  & "Model number: " & request("M3") & 
bodyCopy = bodyCopy  & "Description: " & request("D3") & vbCrLf & vbCrLf & vbCrLf
end if

if I4 <> "" then
bodyCopy = bodyCopy & "Invoice number: " & request("I4") & vbCrLf
bodyCopy = bodyCopy  & "Number to return: " & request("Q4")  & vbCrLf
bodyCopy = bodyCopy  & "Model number: " & request("M4")  & vbCrLf
bodyCopy = bodyCopy  & "Description: " & request("D4") & vbCrLf & vbCrLf & vbCrLf
end if

if I5 <> "" then
bodyCopy = bodyCopy & "Invoice number: " & request("I5") & vbCrLf
bodyCopy = bodyCopy  & "Number to return: " & request("Q5")  & vbCrLf
bodyCopy = bodyCopy  & "Model number: " & request("M5") & 
bodyCopy = bodyCopy  & "Description: " & request("D5") & vbCrLf & vbCrLf & vbCrLf
end if


bodyCopy = bodyCopy & "Name: " & request("NAME") & vbCrLf & vbCrLf
bodyCopy = bodyCopy & "Customer Number: "& request("CUSTNO") & vbCrLf & vbCrLf
bodyCopy = bodyCopy & "Email: " & request("EMAIL") & vbCrLf

Dim objMail
Set objMail = Server.CreateObject("CDONTS.NewMail")

objMail.From = "charles_euley@yahoo.com"
objMail.Subject = "Request for Return Authorization"
objMail.To = EMAIL
objMail.cc = "charles_euley@yahoo.com"
objMail.Body = bodyCopy

objMail.Send
set objMail = nothing
%>
Here's what I use

dim objEMail
set objEMail = Server.CreateObject("CDONTS.NewMail")
objEMail.To = EMAIL
objEMail.From = "charles_euley@yahoo.com"
objEMail.subject = "Request for Return Authorization"
objEMail.body = bodyCopy
objEmail.BodyFormat = 0
objEmail.MailFormat = 0
objEMail.send
set objEMail = nothing

Hope this helps

--------
D_M_D




--------
D_M_D
ASKER CERTIFIED SOLUTION
Avatar of D_M_D
D_M_D

Link to home
membership
This solution is only available to members.
To access this solution, you must be a member of Experts Exchange.
Start Free Trial