ASP destekli hosting veya sunucularınız üzerinden aşağıdaki asp scripti kullanarak CDO ile smtp üzeri mail gönderebilirsiniz. E-posta ve diğer ayarları kendinize göre güncelleyiniz.
|
1 2 3 4 5 6 7 8 9 10 11 12 13 14 15 16 17 18 19 20 21 22 23 24 25 26 27 28 29 |
<%@LANGUAGE="VBSCRIPT" CODEPAGE="1254"%> <% On Error Resume Next set config = CreateObject("CDO.Configuration") sch = "http://schemas.microsoft.com/cdo/configuration/" with config.Fields .item(sch & "sendusing") = 2 .item(sch & "smtpserver") = "localhost" .item(sch & "smtpserverport") = "587" .item(sch & "smtpauthenticate") = 1 .item(sch & "sendusername") = "kimden@domain.com" .item(sch & "sendpassword") = "mailsifresi" .update end with with CreateObject("CDO.Message") .configuration = config .to = "kime@domain.com" .from = "kimden@domain.com" .subject = "Mesaj Konusu" .HTMLBody = "Mesajınızın içeriği" call .send() end with If ERR Then Response.Write err.Description & "Email gönderilemedi !" Else Response.Write "Email başarıyla gönderildi" End If %> |
