Posteingang bei Outlook auslesen
Posted: Thu Jul 13, 2006 2:36 pm
Hallo alle zusammen,
hat jemand von Euch Erfahrung mit Outlook und OLE ?
Ich möchte gerne meinen Posteingang von Outlook einlesen. Leider finde ich die Variablennamen nicht raus. Hat da jemand einen Tipp für mich ?
Soweit bin ich gekommen:
Viele Grüße,
Norbert
hat jemand von Euch Erfahrung mit Outlook und OLE ?
Ich möchte gerne meinen Posteingang von Outlook einlesen. Leider finde ich die Variablennamen nicht raus. Hat da jemand einen Tipp für mich ?
Soweit bin ich gekommen:
Code: Select all
/
TRY
oOL := TOleAuto():New( "Outlook.Application" )
lOutlookOK := .T.
CATCH
lOutlookOK := .F.
END
IF ! lOutlookOK
RETURN ( 0 )
ENDIF
oNameSpace = oOL:Get( "GetNameSpace", "MAPI" )
oContacts = oNameSpace:Get( "GetDefaultFolder", "6" ) // 6 = Inbox-Folder
FOR nContador = 1 TO oContacts:ITEMS:Count()
oNewContact = oContacts:ITEMS( nContador )
cSenderName := oNewContact:get( "SenderName" )
cSubject := oNewContact:get( "Subject" )
>>>> ??????
NEXT nContador
RETURN NIL
Norbert