Office: (Office 2013) Mails aus einem Postfach auslesen und verarbeiten

Hey Zusammen,
ich habe bisher hier nur ein wenig mitgelesen und nun das erste mal auch aktiv gleich mit einem Problemchen *upps
Ich bin leider noch ziemlicher VBA Anfänger und hoffe, dass die Frage nicht zu banal ist....

Ich versuche derzeit mit Access, die Mails aus einem Projektpostfach auszulesen, dann in einer Übersicht dem User darzustellen damit er hier wählen kann, was er mit dieser Mail tun möchte. Z.b. Löschen oder aber in eine weitere Prozedur zu übergeben.

Nun habe ich es bereits geschafft die Mails abzufragen, scheitere aber an der Darstellung. Ich möchte die Mails in ein Recordset schreiben welches NICHT lokal in eine Tabelle oder in eine SQL Tabe geschrieben wird. Die Inhalte sollen nach Beendigung wieder verschwunden sein. Ich weis jedoch nicht wie ich dies anzeigen lassen kann. Hat jemand vielleicht einen Denkanstoß für mich bitte? *Smilie
So sieht derzeit die Abfrage aus, die abzufragenden Inhalte sind noch nicht vollständig:

Code:

Vielen lieben Dank schon einmal im Voraus für eure Hilfe!

:)

 

anzeigen kannst du in einem Formular, welches du selbst erstellen musst.

LG Markus

 

Hallo klatscher,

du könntest den Posteingang auch in die DB verknüpfen!
Dann kannst daraus eine Abfrage erstellen und Mails lesen, löschen.

 

\@ Kyron9000: das Tool sollen 3 verschiedene Leute verwenden, und wenn ich die verknüpfung einer tabelle mit dem posteingang herstellen möchte, muss soweit ich das getestet habe auf dem jeweiligen rechner ein extra profil angelegt sein.

@markusxy: Aber um die Daten aus dem Recordset anzeigen zu können, muss ich die Daten doch in eine Tabelle schreiben oder?

Ich wollte es gerne so haben, dass der User z.b. auf "Posteingang anzeigen" klickt, dann frage ich über die Schleife die Daten ab und schreibe diese in ein Recordset, zeige dem User die Daten aus dem Recordset, und lasse Ihn hier entsprechende Aktionen wählen. Nach schließen des Fensters bzw. beenden der Funktion werden die Daten wieder gelöscht und damit nicht in einer Tabelle gespeichert. Ist das möglich? Quasi alles nur im zwischenspeicher?

 

\@markusxy: Aber um die Daten aus dem Recordset anzeigen zu können, muss ich die Daten doch in eine Tabelle schreiben oder?


Nein, du musst nicht in eine Tabelle schreiben.
Das ist ja das Hauptmerkmal von ADO Recordsets, dass die ungebunden die Daten präsentieren können.

Aber überleg auch was Kyron vorgeschlagen hat - vorausgesetzt ihr verwendet keine Exchange Konto. Da geht das nicht.

LG Markus

 

Okay danke!
Leider verwenden wir Exchange Konten.

Ich stell mich gerade vermutlich etwas dumm an, aber wenn ich ein neues Formular erstelle, kann ich als Datensatzquelle doch nur Tabellen auswählen.
Wie bring ich die Daten aus dem Recordset in das Formular?

 

Was heißt leider. Exchange ist wohl Standard in professioneller Umgebung.
Bezüglich Verwendung von Recordset:

Set form.Recordset = Recordset
Schau auch in der Hilfe unter Formular.Recordset nach, da Microsoft bei der Implementierung von ADO etwas faul war.

Noch ein Hinweis bezüglich ungebundener ADO.
1. Das öffnen erfolgt ohne Connection Angabe.
2. adOpenKeyset geht natürlich nur bei einer Server Connection. Das führt aber zu keinem Fehler sondern wird einfach nicht umgesetzt. Es müsste heißen adOpenStatic.
In diesem Fall ist das womöglich nicht relevant. In anderen Fällen führt das ganze zu unerwünschten Ergebnisse.
In der Hilfe - unter ado.Recordset gibt es dazu jede Menge Infos.
LG Markus

 

Vielleicht geht das Ganze auch viel trivialer. Google mal nach "Outlook View Control", damit kannst du in Access Formularen Outlook-Ordner (samt Objekten) anzeigen, und darin auch die ganz normalen Mouse-Aktionen wie löschen, verschieben, etc. vornehmen. Da Du die GUI von Outlook nutzt, muss hier auch nicht wirlich viel programmiert werden, sofern Du mit eben den Möglichkeiten des Outlook-Fensters auskommst.

Evtl. erschlägt das Deine Anforderungen?

 

\@Andre.Heisig: Danke für den Tipp, leider nicht ganz. Um das zu erklären hol ich kurz aus. Die Funktion wird in ein bestehendes Tool integriert, welches von einem Kollegen geschrieben wurde. In diesem Tool geht es vorallem um Ticketbearbeitung. Störungsmeldungen die also per Mail kommen werden hier erfasst und dokumentiert. Um das zu vereinfachen möchte ich aus der "Mailübersicht" gerne auch einen Button einfügen, der den Inhalt der Mail in ein neues Ticket oder ein bestehendes Ticket einfügt.

@markusxy Nur für mich grob von der Logik, ich erstelle also ein formular setze hier eine Ereignisprozedur "beim Öffnen". Initialisiere zuerst das Recordset, setze dieses als quelle, und frage dann in einer schleife darunter die Mails alle ab.
Ist der Ansatz so richtig?

 

Von der Reihenfolge zuerst das Recordset füllen, dann an das Form heften.
LGM

 

Danke dir *Smilie
leider komm ich aber iwie nicht weiter... Ich habe hier anhand diverser Quellen mir etwas zusammengeschustert, dass die Mails abfrägt und in ein recordset schreibt. Aber leider immer in Verbindung mit einer Tabelle.
Wenn ich "str" weglasse und beim öffnen schreibe
"rst.Open ,, adOpenKeyset, adLockOptimistic"
Schmeißt er mir immer nen Fehler.*entsetzt

Wie bring ich ihm denn bei, dass er zwar ein recordset erstellen soll mit diversen spalten jedoch nur im RAM?
Vielen Dank schon einmal für eure Mühe
Code:

 

Hier gibts eine Anleitung zum Arbeiten mit ADO Recordsets.

Ich hoffe, du gehörst zu denen die dazulernen möchten.

LG Markus

 

\@markusxy
Danke dir! Das hat mir wirklich etwas gebracht. Habe es jetzt auch soweit geschafft ein ADO Recordset zu erstellen und die Daten darin zu schreiben.
nach der Schleife, habe ich noch, das Formular an das Recordset gebunden.
Ich habe die Abfrage für Testzwecke nun auf 5 beschränkt. Jedoch das Problem, dass die Felder im Formular nur mit "#Fehler" befüllt werden.
Die "Anzahl" der Datensätze wird mit 5 aber richtig angegeben.
Mir ist leider nicht klar, woran es liegt, weil das Recordset ja geöffnet und befüllt ist. Und das Formular scheint die entsprechenen Datenfelder ja auch zu finden, aber vielleicht seh ich auch den Wald vor lauter Bäumen nicht.
Fällt dir hier der Fehler auf?
Code:

 

Ich nehme an du hast TextBox.ControlSource nicht angegeben.
Das musst du angeben, sonst weiß das Form nicht was es anzeigen soll.
Also bei jedem Textfeld bei Steuerelementinhalt den Namen des Feldes vom Recordset eintragen. Das kann man fix hinterlegen, oder auch per Code eintragen.

LG Markus

 

Hey Markus,
doch ich habe im Feld "Steuerelementinhalt" jeweils die Bezeichnung hinterlegt.
"Absender" "Titel" usw..
Wenn ich stattdessen z.B.: "rst.Absender" eingebe erscheint #Name

Muss ich die Infos im Textfeld noch an einer anderen Stelle als dem Steuerelementinhalt hinterlegen?

LG
Leo