Send-Methode funktioniert scheinbar nicht

[Fares]

Hallo,

das unten dargestellte Script läuft eigentlich ganz prima!
Aber eben nur eigentlich, denn wenn ich mich abmelde und den Task, der unter meinem Account läuft, zu einer bestimmten Zeit anstarte, wird keine Mail versendet. :-( Mein Account hat Administratorrechte.
Es liegt wohl in erster Linie an der Send-Methode.
Eigentlich hatte ich erwartet, daß MAPIs auch im abgemeldeten Modus laufen - scheint aber nicht so zu sein!?

Also, kann mir jemand noch einen sachdienlichen Grund nennen bzw. Tipp geben?

Vielen Dank im voraus!

#############################################################

'Body of email message
Dim msgBody
msgBody="Dies ist ein Test!"

'Call our function with recipient, message and subject
MySendMail "[e-mail]",msgBody,"RVS-Meldung!"

Sub MySendMail(recipient,msg,subject)
Dim objSession, oInbox, colMessages, oMessage, colRecipients

Set objSession = CreateObject("MAPI.Session")
objSession.Logon "MS Exchange Settings"

Set oInbox = objSession.Inbox
Set colMessages = oInbox.Messages
Set oMessage = colMessages.Add()
Set colRecipients = oMessage.Recipients

colRecipients.Add recipient
colRecipients.Resolve

oMessage.Subject = subject
oMessage.Text = msg
oMessage.Send

objSession.Logoff
Set objSession = nothing

End Sub