[MAKRO] Mail Göndermede küçük bir sorunum var

turan6100 · 08-05-2012, 16:52

ekte çalışmamda müşterinin ekstresini outlook a göndererek maili gönderiyorum. ancak muavin formunda sizinde incelediğinizde anlayacaksınız maili göndermekten vazgeçtiğimde outlook un sayfasını kapattığımda formum donuyor hiçbişey yaptırmıyor kapatmak istediğimde de (Ado ve DDe çalışan bir modülünüz var felan...)
gibi bir hata veriyor kapanmıyor CTRL+Alt+Del ile kapatıyorum formu bu konuda yardımınızı bekliyorum....

MirzaKatar · 08-05-2012, 17:06

Muavin adlı formunuzdaki excel olarak mail gönder butonuna şu kodu ekleyin;

Visual Basic
On Error GoTo hata
DoCmd.SendObject acSendQuery, "Ekstre", "xls", , , , "Hesap Ekstreniz...", "İstemiş olduğunuz ekstre ektedir...", True
Exit Sub
hata:
    MsgBox "Hata : " & Err.Description & Chr(13) & "Hata Kodu : " & Err.Number

Not: Eklentiniz gerçek bilgiler içerdiğinden kaldırılmıştır... Lütfen kendi güvenliğiniz için gerçek bilgi kullanmayınız...

turan6100 · 08-05-2012, 17:24

ilginiz için çok teşekkür ederim ancak aynı sorun devam ediyor....

MirzaKatar · 08-05-2012, 17:50

Merhaba,
Ben outlook kullanmıyorum. O sebepten sorunun çözümü hakkında fikrim yok. Yalnız bir sorum olacak:

Mail gönderme işlemini outlook üzerinden iptal ettiğiniz zaman mı bu sorunu yaşıyorsunuz?

turan6100 · 08-05-2012, 17:52

açılan outlook sayfasını kapattığım zaman bu sorunu yaşıyorum...

MirzaKatar · **Kayıt Tarihi:** 18.10.2010

Merhaba,

Hiç bir eklenti koymadan aynı işlemi gerçekleştirdiğinizde donma olmuyorsa bir çözüm önerim olabilir.

Aşağıdaki kodu dener misiniz?

On Error GoTo hata
DoCmd.SendObject acSendNoObject, ,, , , , "Hesap Ekstreniz...", "İstemiş olduğunuz ekstre ektedir...", True
Exit Sub
hata:
MsgBox "Hata : " & Err.Description & Chr(13) & "Hata Kodu : " & Err.Number

Merhaba,

Hiç bir eklenti koymadan aynı işlemi gerçekleştirdiğinizde donma olmuyorsa bir çözüm önerim olabilir.

Aşağıdaki kodu dener misiniz?

Visual Basic
On Error GoTo hata
DoCmd.SendObject acSendNoObject, ,, , , , "Hesap Ekstreniz...", "İstemiş olduğunuz ekstre ektedir...", True
Exit Sub
hata:
    MsgBox "Hata : " & Err.Description & Chr(13) & "Hata Kodu : " & Err.Number

Benzer Konular...
Konu:		Yazar	Cevaplar:	Gösterim:	Son Mesaj
	Sorgudaki Bilgileri Otomatik Tek Tek Mail Gönderme	cirdakc	3	445	08-11-2024, 21:40 Son Mesaj: dsezgin
	Ilgili Raporu Mail Gönderme	Mtaner	6	1.490	21-05-2024, 07:09 Son Mesaj: dsezgin
	[VBA] Mail Ile Tablo Ya Da Sorgu Gönderme	benuva	5	590	17-06-2023, 12:18 Son Mesaj: benuva
	[FORM] Liste Kutusundaki Veriyi Mail Ile Göndermek	husem	8	1.513	27-01-2023, 00:52 Son Mesaj: BeyTor
	[FORM] Access Aktif Olan Formu, Mail Olarak Göndermek.	Fenerli88	5	753	25-01-2023, 02:14 Son Mesaj: BeyTor
	[FORM] Mail gönderimi.	orderyazbim	14	7.056	19-11-2022, 20:10 Son Mesaj: firatmalkoc
	[FORM] Liste Kutusu Büyük Harf Küçük Harf	ahmetsan	5	488	08-08-2022, 20:51 Son Mesaj: alperalper
	[VBA] Gmail Le Mail Gönderme Yeni Ayarları (çözüldü)	hedefkaya	7	1.011	20-07-2022, 12:13 Son Mesaj: benuva

Oturum Aç




Beni Hatırla Şifremi Unuttum?

Access SQL