<% if Request.Form <> "" then Set Mailer = Server.CreateObject ("SMTPsvg.Mailer") Mailer.FromName = Request.Form("first-name") Mailer.FromAddress = Request.Form("email") Mailer.Subject = "mailing list" Mailer.BodyText = Request.Form("first-name") Mailer.BodyText = Request.Form("last-name") Mailer.BodyText = Request.Form("company") Mailer.BodyText = Request.Form("position") Mailer.BodyText = Request.Form("mobile-phone") Mailer.BodyText = Request.Form("email") Mailer.RemoteHost = "localhost" Mailer.AddRecipient "JOIN", "mailinglist-syn@bezeqint.net" 'Mailer.AddCC "CC Name", "CC email" // Optional if Mailer.SendMail then ' Message sent sucessfully response.write ("
Your message was sent.
") else ' Message send failure response.write ("
Your message was not sent.
") response.write ("
The error was: " & Mailer.Response & "
") end if Set Mailer = Nothing end if %>
Contact Synergy
> Contact us
> Contact details
> Join our mailing
..
list
Join our mailing list
First Name
*
Last Name
*
Company
*
Position
*
Mobile Phone
E-mail
*
Website by ARTWO Studio
Home
|
Profile
|
Synergy Solutions
|
Clients
|
Articles
|
Analytics
|
Careers
|
Contact us
|
Site Map