<% 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
First Name
*
Last Name
*
Company
*
Position
*
Mobile Phone
Email
*
Website by ARTWO Studio
Home
|
Profil
|
Rozwiązania
|
Klienci
|
Artykuły
|
Społeczność
|
Kariery
|
Kontakt
|
Mapa strony