<% Set Mail = Server.CreateOBject("Persits.MailSender")
Mail.Host = "smtp.adresiniz.com" 'SMTP server adresiniz
Mail.From = "gonderen@domain.com" ' gonderen mail adresi
Mail.FromName = "gonderen adi" 'gonderen adi
Mail.AddAddress "alici1@domain.com" ' sizin mail adresiniz
Mail.Subject = "haber listesi" ' konu
Mail.Body = "mail listenize katilmak istiyorum" ' mesaj
Mail.Send %>