KintaRo Posted October 31, 2011 Share Posted October 31, 2011 [quote]http://www.tnctr.com/Index.php?app=core&module=search&search_in=forums[/quote] ? Quote Link to comment Share on other sites More sharing options...
Kral__ Posted October 31, 2011 Share Posted October 31, 2011 o deil senin verdiğin linkler hep silinmiş onu diom Quote Link to comment Share on other sites More sharing options...
KintaRo Posted October 31, 2011 Share Posted October 31, 2011 [quote]http://www.tnctr.com/topic/182346-oernek-dosyalar/[/quote] ? Quote Link to comment Share on other sites More sharing options...
pcusta_99 Posted November 14, 2011 Share Posted November 14, 2011 (edited) Ellerinize sağlık. KintaRo hocam sizin verdiğinizi indirdim ilk önce çalışmadı, arkadaşın verdiğini denedim çalışıyor. Acaba ne sorun olabilir ? Mail in iki kişiye birden gönderilmesini, mesaj olarak sadece bir inputun değil, input7, input8 deki yazanlarında mesaj olarak gönderilmesini istiyorum. Bunu nasıl yapabilirim ? Edited November 14, 2011 by Bilinchard Quote Link to comment Share on other sites More sharing options...
leonx038 Posted January 27, 2013 Share Posted January 27, 2013 APZ linkleri kırık yenılermısınız lütfen. Quote Link to comment Share on other sites More sharing options...
nightmare3519 Posted January 27, 2013 Share Posted January 27, 2013 Kintaro abi paylaşmış zaten. Yukarıda link bile vermiş dosyalar burada diye http://www.mediafire.com/?hiddyaccq420n0v Quote Link to comment Share on other sites More sharing options...
leonx038 Posted January 27, 2013 Share Posted January 27, 2013 Bu örneği biraz geliştirerek açıklamalarla beraber hazırladım.Ekran Görüntüsü:Proje Dosyası ve Plugin: http://www.tamotomatik.org/dosya/SMTP.zip Gönder Button Kodları:CODE 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(tblMailProperties, tblServerProperties, ""); --maili gönder Dialog.Message("İletişim Formu", "Mesajınız başarıyla gönderildi!", MB_OK, MB_ICONINFORMATION, MB_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_OK, MB_ICONSTOP, MB_DEFBUTTON1); -- hata mesajı ver end Button.SetEnabled("Button1", true) -- buttonu aktif et Kendi smtp Adresimizi Ve Özel Mailimizin Bilgilerini Yazarsak Bu Proje Çalışırmı ?? Quote Link to comment Share on other sites More sharing options...
nightmare3519 Posted January 27, 2013 Share Posted January 27, 2013 (edited) Evet çalışır, tamamen güvenlidir. Yazabilirsin denedim ben. Edited January 27, 2013 by nightmare3519 Quote Link to comment Share on other sites More sharing options...
KintaRo Posted January 27, 2013 Share Posted January 27, 2013 Diğer kullanıcılara dağıtacağınız programların içine yazmayın yalnız. AMS kodları görüntülenebildiği için lamerlerin eline geçebilir. Quote Link to comment Share on other sites More sharing options...
superhalit Posted January 28, 2013 Share Posted January 28, 2013 Bu örneği biraz geliştirerek açıklamalarla beraber hazırladım.Ekran Görüntüsü:Proje Dosyası ve Plugin: http://www.tamotomatik.org/dosya/SMTP.zip Gönder Button Kodları:CODE 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(tblMailProperties, tblServerProperties, ""); --maili gönder Dialog.Message("İletişim Formu", "Mesajınız başarıyla gönderildi!", MB_OK, MB_ICONINFORMATION, MB_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_OK, MB_ICONSTOP, MB_DEFBUTTON1); -- hata mesajı ver end Button.SetEnabled("Button1", true) -- buttonu aktif et abicim ben tamotomatik.com a giremiyorum neden Quote Link to comment Share on other sites More sharing options...
KintaRo Posted January 28, 2013 Share Posted January 28, 2013 tamotomatik ismiyle verilen tüm dosyalar şu adreste mevcut: http://www.tnctr.com/topic/182346-oernek-dosyalar/ Quote Link to comment Share on other sites More sharing options...
Recommended Posts
Join the conversation
You can post now and register later. If you have an account, sign in now to post with your account.
Note: Your post will require moderator approval before it will be visible.