AutoPlay Media Studio (AİO) Mail Sistemi

Konusu 'AutoPlay Media Studio Öğreniyorum' forumundadır ve guclusat tarafından 19 Ekim 2010 başlatılmıştır.

  1. guclusat
    Offline

    guclusat Tanınmış Üye Süper Moderatör

    Katılım:
    14 Haziran 2009
    Mesajlar:
    10.178
    Ödül Puanları:
    48
    Ekran Görüntüsü:

    [​IMG]

    Gönder Button Kodları:

    PHP:
    name Input.GetText("isim") -- isimdeki metni al
    mail 
    Input.GetText("mail")-- maildeki metni al
    subject 
    Input.GetText("konu") -- konudaki metni al
    msg 
    Input.GetText("mesaj") -- mesajdaki metni al
    guvenlik1 
    Input.GetText("guvenlik") -- girilen guvenlik kodunu al
    guvenlik2 
    Paragraph.GetText("Paragraph1") -- gorunen guvenlik kodunu al

    -- eğer isim veya mail veya konu veya mesaj boş değilse ve güvenlik1 guvenlik2 ye eşitse
    if name ~= "" and mail ~= "" and subject ~= "" and msg ~= "" and guvenlik1 == guvenlik2 then

    tblMailProperties 
    = {};
    tblMailProperties.FromName name; -- girilen isim
    tblMailProperties
    .FromEmail mail; -- girilen mail
    tblMailProperties
    .To "BURAYA MAİL ADRESİNİZİ YAZIN"; -- gönderilecek adres
    tblMailProperties
    .HtmlBody msg; -- girilen mesaj
    tblMailProperties
    .Subject subject; -- girilen konu
    tblMailProperties
    .CC ""; -- bilgi
    tblMailProperties
    .BCC ""; -- gizli

    tblServerProperties 
    = {};
    tblServerProperties.Server "smtp.gmail.com"; -- smtp adresi
    tblServerProperties
    .ServerPort 465; -- smtp portu
    tblServerProperties
    .UseSSL true;  -- SSL kullan

    tblServerProperties
    .Authenticated true;   -- Doğrulama
    tblServerProperties
    .UserName "BURAYA GMAİL ADRESİNİZİ YAZIN";  -- gmail adresiniz
    tblServerProperties
    .PassWord "BURAYA GMAİL ŞİFRENİZİ YAZIN";             -- şifreniz

    Button
    .SetEnabled("Button1"false) -- buttonu pasif et
    result 
    SMTP.SendMail(tblMailPropertiestblServerProperties""); --maili gönder

    Dialog
    .Message("İletişim Formu""Mesajınız başarıyla gönderildi!"MB_OKMB_ICONINFORMATIONMB_DEFBUTTON1); -- ok mesajı ver
    -- inputlari temizle
    Input
    .SetText("isim""")
    Input.SetText("mail""")
    Input.SetText("konu""")
    Input.SetText("mesaj""")
    else -- 
    hata varsa
    Dialog
    .Message("Hata""Lütfen gerekli alanları doldurunuz."MB_OKMB_ICONSTOPMB_DEFBUTTON1); -- hata mesajı ver
    end
    Button
    .SetEnabled("Button1"true) -- buttonu aktif et
    Zip File Contents:

    [0] SMTP.V14.zip
    [1] SMTP.zip

    Proje Dosyası ve Plugin ektedir
     

    Ekli Dosyalar:

    Son düzenleme: 6 Şubat 2016
Yüklüyor...

Sayfayı Paylaş

  1. Bu site çerez kullanmaktadır. Siteyi kullanmaya devam etmeniz halinde çerez kullanımı ile ilgili site koşullarını kabul etmiş sayılırsınız.
    Notu Gizle