Predmet:Re:e-mail iz Accessa
PreuzmiIzvorni kôd (Visual Basic):Function mail()
Dim primaoc As String
Dim subjekt As String
Dim poruka As String
primaoc = "primjer@email.com"
subjekt = "Test Email"
poruka = "Ovo je testna poruka iz Microsoft Accessa."
putanjaDatoteke = "e:\20081.pdf"
DoCmd.SendObject acSendNoObject, , , primaoc, , , subjekt, poruka, True, putanjaDatoteke
MsgBox "Email je uspjesno poslan.", vbInformation
End Function
Podrska samo putem foruma, jer samo tako i ostali imaju koristi od toga.