desperado
Goto Top

Outlook Email Administration per VB 6

Ordner auslesen, Emails checken, Emails verschieben....

Hallo zusammen,

ich möchte per VB6 alle Emails im Posteingang checken (soweit bin ich ;) ) , dann aber ggf. Ordner erstellen, Emails in Ordner verschieben etc. Kennt jemand nen Tut? Ich habe Schwierigkeiten die Ordner per Namen zu finden... Oder neue Ordner zu erstellen.

Greetz, Desperado

Content-ID: 18791

Url: https://administrator.de/forum/outlook-email-administration-per-vb-6-18791.html

Ausgedruckt am: 22.12.2024 um 16:12 Uhr

azubaer
azubaer 01.11.2005 um 11:46:15 Uhr
Goto Top
geht bestimmt, habe ich aber noch nie nutzen müssen. sieh mal ins MSDN unter outlook programmierung oder frag mal die spezis bei activevb.de oder vbarchiv.de
fm
fm 02.11.2005, aktualisiert am 18.10.2012 um 17:55:16 Uhr
Goto Top
Hi Desperado,

anscheinend hast du vor unter anderem mein Problem zu lösen, wobei ein weiteres Foren-Mitglied folgendes dazu bemerkt hat:

[quote]
@fm
Dann sag bitte gleich Desperado, er soll die "Microsoft Outlook 10.0 Object Library" (outlook10.dll) mit referenzieren - der Rest geht dann fast von allein.
Bei Dir natürlich genauso.

HTH Biber
[/quote]

Mein Thread: Outlook 2003 Regel erstellen die auf Kontakt Kategorie zurückgreift

Vielleicht weißt du Rat! face-smile

Gruß,
fm
Desperado
Desperado 03.11.2005 um 08:40:26 Uhr
Goto Top
Hehe, moin,

also ich hab es hinbekommen. Sowohl Ordner finden, als auch erstellen. Ich muss aber jetzt zur Arbeit, poste später ein paar Codeschnipsel hier rein face-smile

Grüsse, Desperado

P.S.: 9.0
Desperado
Desperado 05.11.2005 um 09:56:19 Uhr
Goto Top
Also
Set objOut = New Outlook.Application

Set objNameSpace = GetNamespace("MAPI")
Set objMailFolder = objNameSpace.GetDefaultFolder(olFolderInbox)

For i = 1 To objMailFolder.Folders.Count
Set objMailFolder = objNameSpace.GetDefaultFolder(olFolderInbox).Folders(i)
Msgbox objMailFolder
Next i

Gibt Dir alle angelegten Ordnernamen im Posteingang an. Wenn Du alle haben willst, musst Du die Ordner hierarchisch angehen...

Folders(1).Folders(2)....

Greetz Desperado