Access SQL   ›   ACCESS SORULARI VE ÖRNEK UYGULAMALARI   ›   ACCESS ÖRNEKLERİ   ›   Mail Göndermek ve rapor eklemek (pdf)

Mail Göndermek ve rapor eklemek (pdf)
beab05
Forum Yöneticisi

*
Kayıt Tarihi: 05.03.2008
Toplam 252 konu açtı.
Toplam 3.105 yorum yaptı.
Toplam 131 puanı bulunmakta.
Mevcut Office Sürümü:
Office 2013,
Beğeniler: 9 / 23
#1
26-02-2011, 15:05
[Resim: epostabeco.jpg]

Merhaba arkadaşlar;

Aşağıdaki örnek CDO ile sessizce mail gönderimi yapar, uygulamadaki raporları oto olarak bulur ve seçtiğinizi pdf e dönüştürüp istediğiniz mail adresine gönderir. Ben Rapor(pdf) dizini olarak sabit bir dizin seçtim siz değiştirirsiniz. Ayrıca oluşan pdf ismini de sabit yaptım "beab.pdf" diye bunu da değiştirirsiniz hatta dinamik yaparsınız.

Açılan formdaki metin kutularını doldurunuz. burda en önemli kutular gönderilecek olan mail adresi ve kullanıcı isim ve şifre alanlarıdır.

Kullanıcı isminiz şöyledir. Mail adresiniz osmanamca@gmail.com ise kullanıcı isminiz "osmanamca" (tırnaksız) olacaktır. Kodlar GMail'e göre düzenlenmiştir. Test ettim hiç sorunsuz seçilen raporu pdf e dönştürüp istediğim mail adresine göndermektedir.


Not: Tekrar yazmakta fayda görüyorum. Bu kodları kullanabilmeniz için gerçek bir Gmail'e sahip olmanız gerekmektedir. Yani kullanıcı ismi ve şifrenizi bu adresinize göre doldurun. Form üstündeki Gönderilen mail adresteki önemli değildir.


Eklenti Dosyaları
.rar   Mail_Rapor_Gonder_beab.rar (Boyut: 96 KB / İndirilme: 1.581)
Javascript
  1. this.setState({sign:"Here comes the sun...."})







  Website   Bul
  Alıntı
Bu mesajı beğenenler:
Taruz
Forum Yöneticisi

*
Kayıt Tarihi: 04.03.2008
Toplam 371 konu açtı.
Toplam 7.540 yorum yaptı.
Toplam 236 puanı bulunmakta.
Mevcut Office Sürümü:
Office 2010, Office 2019,
Beğeniler: 56 / 56
#2
26-02-2011, 18:49
Teşekkürler Berkant..

Çok özel bir çalışma olmuş..
Bulunamayan yerleri bulmak için önce kaybolmak gerekir.
Kaptan Hector Barbossa


SORU SORMA KILAVUZU
Giriş | Sormadan Önce | İlgili Forumu dikkatlice seçin | Anlamlı ve duruma uygun konu başlıkları kullanın | Anlamsız soru cümleleri kurmayın | Açık, dilbilgisi kurallarına uygun ve sözdizimlerine dikkate ederek yazın | Sorunuz sizin için çok acil olsa bile, çok acil diye yazmayın | Sorununuz hakkında tam ve aydınlatıcı iletiler yazın | Amacınızı belirtin | Problemin belirtilerini tanımlayın, kendi tahminlerinizi değil | Sorunuz hakkında açık olun | Nezaket asla yaralamaz ve bazen oldukça yararlıdır | Boyut her şey değildir! | Kabalıkla ilgilenmek | Cevabı E-Posta ile istemeyin | İnsanlardan özel mesajla cevap vermelerini istemeyin | Eğer cevabı anlamadıysanız | Şayet bir cevap alamazsanız | Sorununuz çözüldükten sonra küçük bir not ile bildirin | Sorulmaması gereken türde sorular | İyi ve kötü sorular

Sorulara nasıl doğru düzgün cevap verilir



  Website   Bul
  Alıntı
Bu mesajı beğenenler:
akd27
Kıdemli Üye >1000

*
Kayıt Tarihi: 11.03.2008
Toplam 115 konu açtı.
Toplam 1.028 yorum yaptı.
Toplam 7 puanı bulunmakta.
Mevcut Office Sürümü:
Office 2010,
Beğeniler: 0 / 6
#3
26-02-2011, 18:49 (En son düzenleme: 26-02-2011, 18:50 akd27.)
Teşekkürler sayın berkant,
Elinize sağlık...



  Website   Bul
  Alıntı
Bu mesajı beğenenler:
akd27
Kıdemli Üye >1000

*
Kayıt Tarihi: 11.03.2008
Toplam 115 konu açtı.
Toplam 1.028 yorum yaptı.
Toplam 7 puanı bulunmakta.
Mevcut Office Sürümü:
Office 2010,
Beğeniler: 0 / 6
#4
26-02-2011, 18:55
bu kod hata veriyor,
renkli hata .OutputTo
Private Sub BtnGonderMail_Click()

If Not IsNull(Me.CmbEklentiMail) Then
DoCmd.OutputTo acOutputReport, Me.CmbEklentiMail, acFormatPDF, "C:\beab.pdf" _
, False, , , acExportQualityScreen

MailGonder ' Maili gönderiyoruz.

Else
MsgBox " rapor seçin"
Exit Sub

End If


End Sub



  Website   Bul
  Alıntı
Bu mesajı beğenenler:
beab05
Forum Yöneticisi

*
Kayıt Tarihi: 05.03.2008
Toplam 252 konu açtı.
Toplam 3.105 yorum yaptı.
Toplam 131 puanı bulunmakta.
Mevcut Office Sürümü:
Office 2013,
Beğeniler: 9 / 23
#5
27-02-2011, 01:21
Merhaba;

Eğer Vista ya da Win7 kullanıyorsanız rapor dizini için "C:" yi kullanmayın. (Click ve MailGonder kodlarında düzeltiniz) ya da UAC ı kapatın. Deneme için masaüstünü gösterebilirsiniz.
Javascript
  1. this.setState({sign:"Here comes the sun...."})







  Website   Bul
  Alıntı
Bu mesajı beğenenler:
MADMAX
Access Takımı

*
Kayıt Tarihi: 04.01.2009
Toplam 199 konu açtı.
Toplam 778 yorum yaptı.
Toplam 12 puanı bulunmakta.
Mevcut Office Sürümü:
Office 2003,
Beğeniler: 0 / 4
#6
27-02-2011, 02:14
Elinize sağlık. Çok güzel ve kullanışlı olmuş.



  Bul
  Alıntı
Bu mesajı beğenenler:


Benzer Konular...
Konu: Yazar Cevaplar: Gösterim: Son Mesaj
  Form birden Fazla kayıt Kaynagı eklemek junaid 4 1.683 21-03-2019, 23:24
Son Mesaj: junaid
  Mail gövdesinde rapor göndermek macinsoft 3 2.975 20-08-2014, 11:13
Son Mesaj: hbulut
  Mail gönderme macinsoft 2 2.623 28-11-2011, 17:10
Son Mesaj: MirzaKatar
  Basit Kullanışlı Telefon Rehberi ve Mail Deposu destinasi 9 7.277 18-09-2011, 18:48
Son Mesaj: skat067

Foruma Git:


Bu konuyu görüntüleyen kullanıcı(lar): 1 Ziyaretçi