sn atoz112, merhaba
örnek dosya üzerinde bahsettiğiniz kodu değiştirdiğimde hata veriyor,
eklediğim örnek dosya üzerinden yardımcı olabilirmisiniz acaba,
yada , dosyayı bilgisayarıma pdf formatında kaydetsem buda işime yarar, bilgisayardaki bir dosyayı gönderirken sorun yaşamıyorum çünkü.
iyi çalışmalar.
sayın husem,
bahsettiğiniz hataya yönelik olarak;
olduğu esnadaki halini içeren ekran görüntüsünü konunuza dahil ediniz.teşekkürler.
bilginize...iyi çalışmalar,saygılar.
MERHABA,
Access 2003 den 2010 a geçtim.
gönder butonuna mail ekine pdf dosyayı ekliyor. mail iletini açıyor. ' açmadan göndermesi için hangi kodu İLAVE etmeliyim acaba.
Private Sub GONDER_click()
DoCmd.SetWarnings (False)
Dim RpAdi As String
RpAdi = "İrsaliye"
DoCmd.OpenReport RpAdi, acViewPreview, , , acHidden
DoCmd.SendObject acSendReport, RpAdi, acFormatPDF, Me.MAIL, , , "Konuyu Yaz", "iletilecek mesaji yaz", True
DoCmd.Close acReport, RpAdi
DoCmd.SetWarnings (True)
End Sub
sayın husem,
Alıntı:örnek dosya üzerinde bahsettiğiniz kodu değiştirdiğimde hata veriyor,
konunuzun 7.mesajında bir hatadan bahsetmiştiniz fakat,
Alıntı:gönder butonuna mail ekine pdf dosyayı ekliyor. mail iletini açıyor. ' açmadan göndermesi için hangi kodu İLAVE etmeliyim acaba.
9.mesajda ise farklı bir husustan (talepten) bahsediyorsunuz?
eğer bir hata durumu yoksa ve sadece iletinin çıkmasınını engellemek istiyorsanız,yapmanız gereken;
DoCmd.SendObject acSendReport, RpAdi, acFormatPDF, Me.MAIL, , , "Konuyu Yaz", "iletilecek mesaji yaz", True
kod satırındaki TRUE ifadesini FALSE olarak değiştirerek kullanmayı deneyiniz.
bilginize...iyi çalışmalar,saygılar.
(13/02/2017, 19:51)atoz112 yazdı: [ -> ]sayın husem,
Alıntı:örnek dosya üzerinde bahsettiğiniz kodu değiştirdiğimde hata veriyor,
konunuzun 7.mesajında bir hatadan bahsetmiştiniz fakat,
Alıntı:gönder butonuna mail ekine pdf dosyayı ekliyor. mail iletini açıyor. ' açmadan göndermesi için hangi kodu İLAVE etmeliyim acaba.
9.mesajda ise farklı bir husustan (talepten) bahsediyorsunuz?
eğer bir hata durumu yoksa ve sadece iletinin çıkmasınını engellemek istiyorsanız,yapmanız gereken;
DoCmd.SendObject acSendReport, RpAdi, acFormatPDF, Me.MAIL, , , "Konuyu Yaz", "iletilecek mesaji yaz", True
kod satırındaki TRUE ifadesini FALSE olarak değiştirerek kullanmayı deneyiniz.
bilginize...iyi çalışmalar,saygılar.
2010 kurduktan sonra mail gönderirkenki izinver, reddet uyarısı gitti.
mesajımdada belirttiğim gibi gönderirken outlook mail iletisini açıyor. göndermiyor. outlook iletisinde göndere tıklayınca gönderiyor. benim istediğim, anlatmaya çalıştığım direkt gönderebilirmi. ikinci kez outlook iletisinde göndere tıklamayayım.
teşekkür ederim iyi akşamlar.
sayın husem,
Alıntı:outlook mail iletisini açıyor. göndermiyor. outlook iletisinde göndere tıklayınca gönderiyor. benim istediğim, anlatmaya çalıştığım direkt gönderebilirmi. ikinci kez outlook iletisinde göndere tıklamayayım.
ifadenize yönelik olarak;
konunuzun 10.mesajında yanıtı verilmişti.
yapmanız gereken,GÖNDER butonunun içeriğini,
DoCmd.SetWarnings (False)
Dim RpAdi As String
RpAdi = "İrsaliye"
DoCmd.OpenReport RpAdi, acViewPreview, , , acHidden
DoCmd.SendObject acSendReport, RpAdi, acFormatPDF, Me.MAIL, , , "Konuyu Yaz", "iletilecek mesaji yaz", False
DoCmd.Close acReport, RpAdi
DoCmd.SetWarnings (True)
kod satırı ile değiştirerek kullanmanız yeterlidir.
FALSE ifadesi,Outlook Belgesini açmaksızın direkt olarak gönderme işlemini sağlar.
TRUE ise,öncesinde bir kontrol etmek sureti ile Outlook Belgesi açılır son tetkiklerden sonra gönderme işlemi sağlanır.
bilginize...iyi çalışmalar,saygılar.