Top-Themen

AppleEntwicklungHardwareInternetLinuxMicrosoftMultimediaNetzwerkeOff TopicSicherheitSonstige SystemeVirtualisierungWeiterbildungZusammenarbeit

Aktuelle Themen

Administrator.de FeedbackApache ServerAppleAssemblerAudioAusbildungAuslandBackupBasicBatch & ShellBenchmarksBibliotheken & ToolkitsBlogsCloud-DiensteClusterCMSCPU, RAM, MainboardsCSSC und C++DatenbankenDatenschutzDebianDigitiales FernsehenDNSDrucker und ScannerDSL, VDSLE-BooksE-BusinessE-MailEntwicklungErkennung und -AbwehrExchange ServerFestplatten, SSD, RaidFirewallFlatratesGoogle AndroidGrafikGrafikkarten & MonitoreGroupwareHardwareHosting & HousingHTMLHumor (lol)Hyper-VIconsIDE & EditorenInformationsdiensteInstallationInstant MessagingInternetInternet DomäneniOSISDN & AnaloganschlüsseiTunesJavaJavaScriptKiXtartKVMLAN, WAN, WirelessLinuxLinux DesktopLinux NetzwerkLinux ToolsLinux UserverwaltungLizenzierungMac OS XMicrosoftMicrosoft OfficeMikroTik RouterOSMonitoringMultimediaMultimedia & ZubehörNetzwerkeNetzwerkgrundlagenNetzwerkmanagementNetzwerkprotokolleNotebook & ZubehörNovell NetwareOff TopicOpenOffice, LibreOfficeOutlook & MailPapierkorbPascal und DelphiPeripheriegerätePerlPHPPythonRechtliche FragenRedHat, CentOS, FedoraRouter & RoutingSambaSAN, NAS, DASSchriftartenSchulung & TrainingSEOServerServer-HardwareSicherheitSicherheits-ToolsSicherheitsgrundlagenSolarisSonstige SystemeSoziale NetzwerkeSpeicherkartenStudentenjobs & PraktikumSuche ProjektpartnerSuseSwitche und HubsTipps & TricksTK-Netze & GeräteUbuntuUMTS, EDGE & GPRSUtilitiesVB for ApplicationsVerschlüsselung & ZertifikateVideo & StreamingViren und TrojanerVirtualisierungVisual StudioVmwareVoice over IPWebbrowserWebentwicklungWeiterbildungWindows 7Windows 8Windows 10Windows InstallationWindows MobileWindows NetzwerkWindows ServerWindows SystemdateienWindows ToolsWindows UpdateWindows UserverwaltungWindows VistaWindows XPXenserverXMLZusammenarbeit

Per VBA Emails im Posteingang auslesen

Frage Entwicklung VB for Applications

Mitglied: sbrinkkoetter

sbrinkkoetter (Level 1) - Jetzt verbinden

14.09.2012 um 12:49 Uhr, 5495 Aufrufe, 4 Kommentare

Hallo,

verzweifel gerade an einer Kleinigkeit...

Ich übergebe der Variablen vom Typ MailItem den entsprechenden Ordner und kann auch Stück für Stück die Betreffzeilen der jeweiligen Emails bequem auslesen. Das Problem ist nur, wenn die Schleife in dem Ordner auf ein Objekte des Typs MeetingItem trifft, erscheint die Meldung : "Es ist nicht möglich ein MeetingItem einem MailItem zuzuweisen"... Das klingt auch logisch, aber wie kann ich es im Vorwege heraus filtern oder erkennen, dass es sich um ein MeetingItem handelt. Es handelt sich um die Kalendereinträge, die man per Email im Posteingang hat, bis man sie zu- oder absagt...

Über Hilfestellung würde ich mich sehr freuen !

Liebe Grüße
SB
Mitglied: Pjordorf
14.09.2012 um 13:02 Uhr
Hallo,

Zitat von sbrinkkoetter:
aber wie kann ich es im Vorwege heraus filtern oder erkennen
Na z.B. durch den Klassiker "If" oder "Wend"
01.
If xxx.mailitem Then 
02.
   deine Arbeit tun 
03.
End If
oder
01.
If NOT xxx.MeetingItem Then 
02.
   deine Arbeit tun 
03.
End If
oder
01.
While xx.MailIten 
02.
   deine arbeit tun 
03.
Wend
Es gibt also genug Möglichkeiten zu prüfen ob es sich um ein MailItem oder nicht handelt um daraus abzuleiten ob etwas getan werden muss oder nicht. Mehr werden wir dir ohne genaue Kenntnisse der fehlerhaften Stelle in deinem Quellcode schwer anbieten können.

Gruß,
Peter
Bitte warten ..
Mitglied: sbrinkkoetter
14.09.2012 um 16:10 Uhr
Vielen Dank ! Ich glaube, ich muss die Anfrage in einem Navision Forum noch einmal stellen. Es werden nicht alle methoden und Eigenschaften über den Automation-Server in Navision angeboten. Deswegen ist es da wesentlich umständlicher... Aber im Prinzip war die Antwort ja richtig ! Danke nochmal !
Bitte warten ..
Mitglied: Pjordorf
14.09.2012 um 16:51 Uhr
hallo,

Zitat von sbrinkkoetter:
Es werden nicht alle methoden und Eigenschaften über den Automation-Server in Navision angeboten.
Hat auch damit nichts zu tun. Du brauchst nur vor dem Verarbeiten/zuweisen deines MailItems prüfen ob es auch ein Mailiten ist. Dort wo deine Schleife gerade ist. Poste doch mal was du an Code (in code tags) hast, dann kann dir auch geholfen werden.

Gruß,
Peter
Bitte warten ..
Mitglied: sbrinkkoetter
14.09.2012 um 17:14 Uhr
Hallo,

vielen dank für die intensive Hilfe !

Es läuft eigentlich gut, bis die Zeile "ol:=olItems.GetNext();" darüber stolpert, dass kein Objekt des Typs MailItem, sondern ein MeetingItem übergeben wird. Nicht über den Syntax wundern, es ist Navision eigener Code, angelehnt an Pascal und C. Der Zugriff erfolgt aber direkt über den Automation-Server von Microsoft Outlook...

"New Booking" & Co. sind die Suchbegriffe der Betreffzeile, um die gewünschten Emails zu finden. Das klappt auch soweit...


IF NOT CREATE(olApplication) THEN
ERROR('Outlook nicht gefunden!');

olNamespace := olApplication.GetNamespace('MAPI');
olFolder := olNamespace.GetDefaultFolder(6);
olItems:=olFolder.Items;

FOR Idx:=1 TO olItems.Count-1 DO
BEGIN
ol:=olItems.GetNext();

IF STRPOS(UPPERCASE(ol.Subject),'NEW BOOKING')>0 THEN
BEGIN
MESSAGE('%1',COPYSTR(ol.Subject,1,30));
END;

IF STRPOS(UPPERCASE(ol.Subject),'MODIFICATION')>0 THEN
BEGIN
MESSAGE('%1',COPYSTR(ol.Subject,1,30));
END;

IF STRPOS(UPPERCASE(ol.Subject),'CANCELLATION')>0 THEN
BEGIN
MESSAGE('%1',COPYSTR(ol.Subject,1,30));
END;
END;
Bitte warten ..
Neuester Wissensbeitrag
Humor (lol)

Linkliste für Adventskalender

(3)

Information von nikoatit zum Thema Humor (lol) ...

Ähnliche Inhalte
VB for Applications
Excel VBA XML-Nodes auslesen (4)

Frage von chef1568 zum Thema VB for Applications ...

VB for Applications
gelöst VBA: Wert von einer Website (pdf-Dokument) auslesen und in Excel kopieren (16)

Frage von Stern123 zum Thema VB for Applications ...

VB for Applications
gelöst Outlook VBA, Alternative zu NewMailEx, neue bereits gelesene Email im Posteingang (12)

Frage von joha1908 zum Thema VB for Applications ...

Heiß diskutierte Inhalte
Router & Routing
gelöst Ipv4 mieten (22)

Frage von homermg zum Thema Router & Routing ...

Windows Server
DHCP Server switchen (20)

Frage von M.Marz zum Thema Windows Server ...

Exchange Server
gelöst Exchange 2010 Berechtigungen wiederherstellen (20)

Frage von semperf1delis zum Thema Exchange Server ...

Hardware
gelöst Negative Erfahrungen LAN-Karten (19)

Frage von MegaGiga zum Thema Hardware ...