%
Set Mailer = Server.CreateObject("SMTPsvg.Mailer")
Mailer.FromName = "name"
Mailer.FromAddress = "email"
Mailer.RemoteHost = "mail.jagro.com"
Mailer.AddRecipient = "kirk_ejdys@jagro.com"
Mailer.Subject = "Info Request!"
'Mail.IsHTML=true
Mail.BodyText = "Title:
" &_
trim(Request("title"))& " " &_
"Company:
" &_
trim(Request("company"))& " " &_
"Address:
" &_
trim(Request("address"))& " " &_
"City:
" &_
trim(Request("city"))& " " &_
"State:
" &_
trim(Request("state"))& " " &_
"Zip:
" &_
trim(Request("zip"))& " " &_
"Phone:
" &_
trim(Request("phone"))& " " &_
"Fax:
" &_
trim(Request("fax"))& " " &_
"
Questions or Comments:
" & _
trim(Request("comments"))& " " &_
"
Please let us know how you prefer to be contacted:
" & _
trim(Request("literature"))&" "&_
"
Call Me:
" & trim(Request("callme"))&" "&_
If Mailer.SendMail then
Response.Redirect ("relations_infoReq.asp")
else
Response.Write "Mail send failure.Error was " & Mailer.Response
end if
%>
|
![]() |
![]() |
![]() |
|
|
![]() |
![]() |
||
![]() |
|
||
![]() |
Copyright © 2007 Jagro. |