Koristim Access 2007 jer klijent ima tu verziju i pojavljuje mi se greška 287 prilikom slanja maila
Ako se skine comment na liniji .Display, onda ovaj kod radi, poruka se pošalje. Posle tog inicijelnog prikazivanja poruke kod radi i bez njenog prikazivanja. Da li je imao neko iskustvo sa ovim i da li se poruka nekako može aktivirati bez .Display i taj prvi put?
Code:
Public Sub TestMail()
Dim objoutlook As New Outlook.Application
Dim objmail As MailItem
Set objmail = objoutlook.CreateItem(olMailItem)
With objmail
.To = "[email protected]"
.CC = ""
.Subject = "Test"
.Body = "Test1"
' .Display
.Send ' ovde se pojavljuje greška
End With
Set objmail = Nothing
End Sub
Public Sub TestMail()
Dim objoutlook As New Outlook.Application
Dim objmail As MailItem
Set objmail = objoutlook.CreateItem(olMailItem)
With objmail
.To = "[email protected]"
.CC = ""
.Subject = "Test"
.Body = "Test1"
' .Display
.Send ' ovde se pojavljuje greška
End With
Set objmail = Nothing
End Sub
Ako se skine comment na liniji .Display, onda ovaj kod radi, poruka se pošalje. Posle tog inicijelnog prikazivanja poruke kod radi i bez njenog prikazivanja. Da li je imao neko iskustvo sa ovim i da li se poruka nekako može aktivirati bez .Display i taj prvi put?
Potpis
Ozbiljan i odgovoran mladić