Fares Achwan: MAPI.Session

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

  1. Hallo miteinander,

    vielleicht oder eher bestimmt gibt es bei dir dieses Objekt nicht, bzw. es hat eine andere (version independent) ProgID...

    versuche mal in der Registry zu suchen

    für Mapi.Session (bei mir funzt es) sind die CDO (collaboration data objects) = cdo.dll notwendig

    das ist glaub ich eine spezielle Option bei der Installation von Office 2000

    HTH

    Viele Grüße aus dem Süden, Frank