I have a function that i use on forms via
runcode=send_email(......). May be this will help
Public Function SEND_EMAIL(TOEMAIL, CCEMAIL, SUBJ, BODY)
Set objOutlook = CreateObject("Outlook.application")
Set objEmail = objOutlook.CreateItem(olMailItem)
With objEmail
.TO = TOEMAIL
.cc = CCEMAIL
.Subject = SUBJ
.BODY = BODY
.SEND
End With
Set objEmail = Nothing
End Function
Good luck,
Kuzz
"Time spent debating the impossible subtracts from the time during which you
can try to accomplish it."