MAPI.Session
Fares Achwan
- vb-script
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
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