<%
If Request.Form("mail") <> "" Then
' change to address of your own SMTP server
strHost = "mail.plaza-cubes.com"
Set Mail = Server.CreateObject("Persits.MailSender")
' enter valid SMTP host
Mail.Host = strHost
Mail.From = Request.Form("mail") ' From address
'Mail.FromName = Request("FromName") ' optional
Mail.AddAddress "info@plaza-cubes.com"
'Mail.AddAddress "talha@dijitalendustri.net"
' message subject
Mail.Subject = "Sitenize haber almak için başvuruda bulunuldu"
' message body
Mail.Body = Request.Form("mail") & " e-mailine sahip ziyaretçi, sizden haber almak için sitenize başvuruda bulunmuştur."
strErr = ""
bSuccess = False
On Error Resume Next ' catch errors
Mail.Send ' send message
%>
