Mail Yollama Hatası
Tarih
16/06/2011 14:28
Konu Sahibi
kardelen188
Yorumlar
3
Okunma
1316
Konuyu Oyla:
  • Derecelendirme: 0/5 - 0 oy
  • 5
  • 4
  • 3
  • 2
  • 1

Derecelendirme: 0/5 - 0 oy
kardelen188
Aktif Üye
Kullanici Avatari
Aktif Üye
33
31/05/2011
0
Bingöl
Ofis XP
23/06/2011,19:03
Çözüldü 
Merhaba siteden indirdiğim örnek bende çalışmadı.

Access 2007 kullanıyorum.Aldığım hata mesajı ektedir.Teşk.




Ek Dosyalar
.zip   Hata.zip (Dosya Boyutu: 102,11 KB / İndirme Sayısı: 4)
Cevapla

DUAYEN
Aktif Üye
Kullanici Avatari
Aktif Üye
S.... A....
1.026
13/08/2010
279
Yozgat
Ofis 2007
16/03/2017,17:22
Çözüldü 
Sponsor Reklam
[vb]Dim objCDO<span class="highlight" style="padding-left: 0px; padding-right: 0px;">Mail</span> As Object


Set objCDO<span class="highlight" style="padding-left: 0px; padding-right: 0px;">Mail</span> = CreateObject("CDO.Message")

objCDO<span class="highlight" style="padding-left: 0px; padding-right: 0px;">Mail</span>.To = "xxxxxx@hot<span class="highlight" style="padding-left: 0px; padding-right: 0px;">mail</span>.com" ' Gönderilecek e-<span class="highlight" style="padding-left: 0px; padding-right: 0px;">mail</span> adresi
objCDO<span class="highlight" style="padding-left: 0px; padding-right: 0px;">Mail</span>.From = "yyyyy@g<span class="highlight" style="padding-left: 0px; padding-right: 0px;">mail</span>.com" ' Gönderilen e-<span class="highlight" style="padding-left: 0px; padding-right: 0px;">mail</span> adresi
'objCDO<span class="highlight" style="padding-left: 0px; padding-right: 0px;">Mail</span>.CC = "xxxx@hot<span class="highlight" style="padding-left: 0px; padding-right: 0px;">mail</span>.com" ' Eğer isterseniz CC olarak yani bilgi gönderilecek e-<span class="highlight" style="padding-left: 0px; padding-right: 0px;">mail</span> adresi
objCDO<span class="highlight" style="padding-left: 0px; padding-right: 0px;">Mail</span>.Subject = "g<span class="highlight" style="padding-left: 0px; padding-right: 0px;">mail</span> deneme" ' e-<span class="highlight" style="padding-left: 0px; padding-right: 0px;">mail</span> konusu
'objCDO<span class="highlight" style="padding-left: 0px; padding-right: 0px;">Mail</span>.Addattachment "C:\kaynak.txt" ' eğer isterseniz eklenecek dosya

objCDO<span class="highlight" style="padding-left: 0px; padding-right: 0px;">Mail</span>.TextBody = "g<span class="highlight" style="padding-left: 0px; padding-right: 0px;">mail</span> denemesi" ' Mesajınız....
objCDO<span class="highlight" style="padding-left: 0px; padding-right: 0px;">Mail</span>.Configuration.Fields.Item("http://schemas.microsoft.com/cdo/configuration/smtpusessl") = True

objCDO<span class="highlight" style="padding-left: 0px; padding-right: 0px;">Mail</span>.Configuration.Fields.Item("http://schemas.microsoft.com/cdo/configuration/sendusing") = 2
objCDO<span class="highlight" style="padding-left: 0px; padding-right: 0px;">Mail</span>.Configuration.Fields.Item("http://schemas.microsoft.com/cdo/configuration/smtpserver") = "smtp.g<span class="highlight" style="padding-left: 0px; padding-right: 0px;">mail</span>.com"
objCDO<span class="highlight" style="padding-left: 0px; padding-right: 0px;">Mail</span>.Configuration.Fields.Item("http://schemas.microsoft.com/cdo/configuration/smtpauthenticate") = 1
objCDO<span class="highlight" style="padding-left: 0px; padding-right: 0px;">Mail</span>.Configuration.Fields.Item("http://schemas.microsoft.com/cdo/configuration/sendusername") = "kullanıcıadı"
objCDO<span class="highlight" style="padding-left: 0px; padding-right: 0px;">Mail</span>.Configuration.Fields.Item("http://schemas.microsoft.com/cdo/configuration/sendpassword") = "şifre"
objCDO<span class="highlight" style="padding-left: 0px; padding-right: 0px;">Mail</span>.Configuration.Fields.Item("urn:schemas:http<span class="highlight" style="padding-left: 0px; padding-right: 0px;">mail</span>:importance") = 2
objCDO<span class="highlight" style="padding-left: 0px; padding-right: 0px;">Mail</span>.Configuration.Fields.Item("urn:schemas:<span class="highlight" style="padding-left: 0px; padding-right: 0px;">mail</span>header:X-Priority") = 1
objCDO<span class="highlight" style="padding-left: 0px; padding-right: 0px;">Mail</span>.Configuration.Fields.Item("http://schemas.microsoft.com/cdo/configuration/smtpserverport") = 25
objCDO<span class="highlight" style="padding-left: 0px; padding-right: 0px;">Mail</span>.Configuration.Fields.Update
objCDO<span class="highlight" style="padding-left: 0px; padding-right: 0px;">Mail</span>.Send

Set objCDO<span class="highlight" style="padding-left: 0px; padding-right: 0px;">Mail</span> = Nothing
Birde bu kodu denermisiniz.
Bizim için zor diye bir şey yoktur, imkansızsa zaman alır...
Cevapla

kardelen188
Aktif Üye
Kullanici Avatari
Aktif Üye
33
31/05/2011
0
Bingöl
Ofis XP
23/06/2011,19:03
Çözüldü 
(16/06/2011, 15:03)DUAYEN Adlı Kullanıcıdan Alıntı: [vb]Dim objCDO<span class="highlight" style="padding-left: 0px; padding-right: 0px;">Mail</span> As Object


Set objCDO<span class="highlight" style="padding-left: 0px; padding-right: 0px;">Mail</span> = CreateObject("CDO.Message")

objCDO<span class="highlight" style="padding-left: 0px; padding-right: 0px;">Mail</span>.To = "xxxxxx@hot<span class="highlight" style="padding-left: 0px; padding-right: 0px;">mail</span>.com" ' Gönderilecek e-<span class="highlight" style="padding-left: 0px; padding-right: 0px;">mail</span> adresi
objCDO<span class="highlight" style="padding-left: 0px; padding-right: 0px;">Mail</span>.From = "yyyyy@g<span class="highlight" style="padding-left: 0px; padding-right: 0px;">mail</span>.com" ' Gönderilen e-<span class="highlight" style="padding-left: 0px; padding-right: 0px;">mail</span> adresi
'objCDO<span class="highlight" style="padding-left: 0px; padding-right: 0px;">Mail</span>.CC = "xxxx@hot<span class="highlight" style="padding-left: 0px; padding-right: 0px;">mail</span>.com" ' Eğer isterseniz CC olarak yani bilgi gönderilecek e-<span class="highlight" style="padding-left: 0px; padding-right: 0px;">mail</span> adresi
objCDO<span class="highlight" style="padding-left: 0px; padding-right: 0px;">Mail</span>.Subject = "g<span class="highlight" style="padding-left: 0px; padding-right: 0px;">mail</span> deneme" ' e-<span class="highlight" style="padding-left: 0px; padding-right: 0px;">mail</span> konusu
'objCDO<span class="highlight" style="padding-left: 0px; padding-right: 0px;">Mail</span>.Addattachment "C:\kaynak.txt" ' eğer isterseniz eklenecek dosya

objCDO<span class="highlight" style="padding-left: 0px; padding-right: 0px;">Mail</span>.TextBody = "g<span class="highlight" style="padding-left: 0px; padding-right: 0px;">mail</span> denemesi" ' Mesajınız....
objCDO<span class="highlight" style="padding-left: 0px; padding-right: 0px;">Mail</span>.Configuration.Fields.Item("http://schemas.microsoft.com/cdo/configuration/smtpusessl") = True

objCDO<span class="highlight" style="padding-left: 0px; padding-right: 0px;">Mail</span>.Configuration.Fields.Item("http://schemas.microsoft.com/cdo/configuration/sendusing") = 2
objCDO<span class="highlight" style="padding-left: 0px; padding-right: 0px;">Mail</span>.Configuration.Fields.Item("http://schemas.microsoft.com/cdo/configuration/smtpserver") = "smtp.g<span class="highlight" style="padding-left: 0px; padding-right: 0px;">mail</span>.com"
objCDO<span class="highlight" style="padding-left: 0px; padding-right: 0px;">Mail</span>.Configuration.Fields.Item("http://schemas.microsoft.com/cdo/configuration/smtpauthenticate") = 1
objCDO<span class="highlight" style="padding-left: 0px; padding-right: 0px;">Mail</span>.Configuration.Fields.Item("http://schemas.microsoft.com/cdo/configuration/sendusername") = "kullanıcıadı"
objCDO<span class="highlight" style="padding-left: 0px; padding-right: 0px;">Mail</span>.Configuration.Fields.Item("http://schemas.microsoft.com/cdo/configuration/sendpassword") = "şifre"
objCDO<span class="highlight" style="padding-left: 0px; padding-right: 0px;">Mail</span>.Configuration.Fields.Item("urn:schemas:http<span class="highlight" style="padding-left: 0px; padding-right: 0px;">mail</span>:importance") = 2
objCDO<span class="highlight" style="padding-left: 0px; padding-right: 0px;">Mail</span>.Configuration.Fields.Item("urn:schemas:<span class="highlight" style="padding-left: 0px; padding-right: 0px;">mail</span>header:X-Priority") = 1
objCDO<span class="highlight" style="padding-left: 0px; padding-right: 0px;">Mail</span>.Configuration.Fields.Item("http://schemas.microsoft.com/cdo/configuration/smtpserverport") = 25
objCDO<span class="highlight" style="padding-left: 0px; padding-right: 0px;">Mail</span>.Configuration.Fields.Update
objCDO<span class="highlight" style="padding-left: 0px; padding-right: 0px;">Mail</span>.Send

Set objCDO<span class="highlight" style="padding-left: 0px; padding-right: 0px;">Mail</span> = Nothing
Birde bu kodu denermisiniz.




objCDOMail.Send bölümünde hata verdi

Ben Access e nasıl DOMail nesnesi ekleyebilirim...

Teşk.
Cevapla

kardelen188
Aktif Üye
Kullanici Avatari
Aktif Üye
33
31/05/2011
0
Bingöl
Ofis XP
23/06/2011,19:03
Çözüldü 
Sponsor Reklam
Çözülmüştür Teşk.
Cevapla


Konuyu Okuyanlar: 1 Ziyaretçi


Konu ile Alakalı Benzer Konular
Konular Yazar Yorumlar Okunma Tarih Son Yorum
  Genel Toplam Hatası SOSS06 6 78 Dün, 12:19 SMMM.
Çözüldü Data Type Mismatch Hatası Hakkında alperalper00 8 6.857 20/05/2017, 20:17 ozanakkaya
  Versiyon Hatası mustafakucuknazli 3 136 13/05/2017, 12:21 atoz112
  Form Da Döngü İle Mail Gönderme barcins 8 212 08/05/2017, 09:09 barcins
  Bağlı Tablo Yöneticisi "Geçersiz Parola" Hatası cudii 3 70 03/05/2017, 20:39 ozanakkaya


Türkçe Çeviri: MCTR, Yazılım: MyBB, © 2002-2017 MyBB Group.
DMCA.com Protection Status