Ich habe versucht, das unten aufgeführte Script zum Laufen zu bringen, statt dessen erhalte ich aber folgende Fehlermeldung:
Zeile 11, Zeichen 1
ActiveX-Komponenten kann kein Objekt erstellen: 'MAPI.Session'
Laufzeitfehler in Microsoft VBScript
Installiert ist MS Outlook 2000 auf einem Windows 2000 Prof.
Irgendwelche Ideen, die mir weiterhelfen?
Vielen Dank im voraus!
#############################################################
'Body of email message
Dim msgBody
msgBody="Dies ist ein Test!"
'Call our function with recipient, message and subject
MySendMail "starslider@gmx.de",msgBody,"RVS-Meldung!"
Sub MySendMail(recipient,msg,subject)
Dim objSession, oInbox, colMessages, oMessage, colRecipients
Set objSession = CreateObject("MAPI.Session")
objSession.Logon ""
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