Predmet:e-mail iz Accessa
Sa slijedećim kodom konvertitam Access Report u PDF file i spremim ga u određeni direktorij, recimo:
D:\Ponude\Ponuda_0145.pdf
Nakon toga otvori se Outlook Express sa več upisanom email adresom.
I sve to radi O.K.
Problem je u tome Å¡to sada iz Outlook Express-a moram sa 'Attach' dovući PDF file.
Moje pitanje je dali se ovaj Attach može nekako odraditi automatski?
PreuzmiIzvorni kôd (vbnet):Private Sub email_Click()
Dim strAdresa As String
Dim stDocName As String
SetPrt (2) 'doPDF printer iz tablice Stampaci
stDocName = "rptPonuda"
DoCmd.OpenReport stDocName, acViewNormal
If Not IsNull(Me.mailAdresa) Then
strAdresa = Me.mailAdresa
DoCmd.SendObject _
, _
, _
, _
strAdresa, _
, _
, _
, _
, _
True
End If
DoCmd.SendObject _
, _
, _
, _
, _
, _
, _
, _
, _
True
End Sub
Pozdrav