E-Mail an bestimmte Empfänger aus Access

Computer: Software & Programmierung Microsoft Access
#1

Hallo Experten und Profis,

vielleicht könnt ihr mir ja bei meinem folgenden Problem helfen:

ich habe eine Access-Datenbank (Office 2003) als Bewerberkartei. Darin werden u.a. auch die e-mail-Adressen der Bewerber mit erfasst. Nun möchte ich ganz gerne dass z. B. der Report Absage automatisch per Mail geschickt werden kann. Über sendobject muss ich aber den Empfänger jedes Mal von Hand eingeben. Gibt es da eine Möglichkeit, dass ich Access sagen kann, schicke diesen Report als e-mail an den Bewerber-Nr. 10? Und das vielleicht auch noch ein paar andere Infos automatisch mit in die Mail kommen? Im Archiv habe ich zwar ein bischen was zum Thema gefunden - aber das hat mich nicht wirklich weiter gebracht.

Danke im Voraus für eure Hilfe.

Viele Grüße
Yvonne

#2

ich habe eine Access-Datenbank (Office 2003) als
Bewerberkartei. Darin werden u.a. auch die e-mail-Adressen der
Bewerber mit erfasst. Nun möchte ich ganz gerne dass z. B. der
Report Absage automatisch per Mail geschickt werden kann. Über
sendobject muss ich aber den Empfänger jedes Mal von Hand
eingeben. Gibt es da eine Möglichkeit, dass ich Access sagen
kann, schicke diesen Report als e-mail an den Bewerber-Nr. 10?
Und das vielleicht auch noch ein paar andere Infos automatisch
mit in die Mail kommen? Im Archiv habe ich zwar ein bischen
was zum Thema gefunden - aber das hat mich nicht wirklich
weiter gebracht.

Um die Arbeit mit Outlook zu vereinfachen, würde ich einen Verweis auf die Outlook Obejct Library hinzufügen
(Extras>Verweise>„Microsoft Outlook xx.x Object Library“ suchen, markieren(Häkchen setzen), hinzufügen
Dann habe ich folgenden Code aus der Outlook - Hilfe, den man dann entsprechend variieren kann (Eigenschaften einfach in der Outlook - Hilfe suchen)

Public Sub tzjtzjtj()
Dim olApp As Outlook.Application
Dim objMail As Outlook.MailItem
Set olApp = Outlook.Application
'Create e-mail item
Set objMail = olApp.CreateItem(olMailItem)

With objMail
'########################################
'Hier alles verändern, was man will
'########################################
'Set body format to HTML
.BodyFormat = olFormatHTML
.HTMLBody = " The body of this message will appear in HTML. Please enter the message text here. "
.Display
End With

End Sub

Den Bericht vllt. Vorher abspreichern, und als Anhang mitschicken, oder als HTMLBody, wenn man Berichte als HTML abspeichern kann…

Hoffe, das hilft…

#3

Hallo,

Um die Arbeit mit Outlook zu vereinfachen, würde ich einen
Verweis auf die Outlook Obejct Library hinzufügen
(Extras>Verweise>„Microsoft Outlook xx.x Object Library“
suchen, markieren(Häkchen setzen), hinzufügen
Dann habe ich folgenden Code aus der Outlook - Hilfe, den man
dann entsprechend variieren kann (Eigenschaften einfach in der
Outlook - Hilfe suchen)

…

Hoffe, das hilft…

weiß ich noch nicht so genau :smile: werde mich da mal durchfuchsen und Bescheid geben.

Danke.

Gruß
Yvonne

#4

weiß ich noch nicht so genau :smile: werde mich da mal

durchfuchsen und Bescheid geben.

Danke.

Gerne :smile:

Gruß
Yvonne

Also ich habe gesehen, dass man Berichte als HTMl abspeichern kann!!
Darum müsste es auch mit VBA möglich sein (Aber wie ist ein anderes Thema)
Dann kann man ja diese erzeugte HTML - Berichts - Datei auslesen und den Inhalt in einem String abspeichern und dann einfach in die EMail einsetzen.

Also müsste der Macro folgende Aufgaben erfüllen
automatische Erzeugung des Berichts im HTML - Format
Temporär abspeichern
Die HTML - Datei auslesen (abspeichern im String)
EMail erzeugen ( mit den Feldern der Datenbank die ganzen Eigenschaften füllen; .To .CC etc
In .HTMLBody den oben erzeugten String einfügen
Per Macro direkt absenden (wenn das geht) oder halt vorher nochmal anschauen

Wie du diese ganzen Punkte zustande bekommst, findest du zu 99 bei google!

#5

Hallo nochmal,

weiß ich noch nicht so genau :smile: werde mich da mal

durchfuchsen und Bescheid geben.

Danke.

Gerne :smile:

Gruß
Yvonne

Also ich habe gesehen, dass man Berichte als HTMl abspeichern
kann!!
Darum müsste es auch mit VBA möglich sein (Aber wie ist ein
anderes Thema)
Dann kann man ja diese erzeugte HTML - Berichts - Datei
auslesen und den Inhalt in einem String abspeichern und dann
einfach in die EMail einsetzen.

aha!!!

Also müsste der Macro folgende Aufgaben erfüllen
automatische Erzeugung des Berichts im HTML - Format
Temporär abspeichern
Die HTML - Datei auslesen (abspeichern im String)
EMail erzeugen ( mit den Feldern der Datenbank die ganzen
Eigenschaften füllen; .To .CC etc
In .HTMLBody den oben erzeugten String einfügen
Per Macro direkt absenden (wenn das geht) oder halt vorher
nochmal anschauen

Wie du diese ganzen Punkte zustande bekommst, findest du zu 99
bei google!

und wenn man von VBA Ahnung hat, mag das bestimmt auch alles funktionieren.

Ich habe jetzt mal das gemacht, was Du geschrieben hast und der meckert direkt rum bei Dim olApp As…

Ich stelle mir also folgenden Ablauf vor:
Ich habe ein Formular in welches ich die Daten der Bewerber eintrage, einen Datensatz pro Bewerber
Nun soll das Makro fragen, für welchen Bewerber ich eine Mail schicken möchte (Bewerber-Nr) und dann den entsprechenden Report (z. B. die Absage) an eine Mail hängen. Das Abschicken soll nicht automatisiert sein.

Wie gesagt, mit der sendobject-Geschichte klappt es ja soweit, nur muss ich da die Mailadresse von Hand eingeben.

Gruß
Yvonne