Hey,
wie kann ich bei Access 2010 mehrere, um genau zu sein alle, E-Mailadressen auswählen und diese werden dann Automatisch in die Empfänger-Zeile von Outlook gesetzt?
Bei einer E-Mailadresse kann man ja diese einfach anklicken und daraufhin öffnet sich Outlook, mit der eingetragenen E-Mailadresse als Empfänger. Aber wie geht es bei Allen oder bei Ausgewählten?
Meine E-Mailadressen sind als Hyperlink eingetragen.
Gruß
Morslord
Hallo,
wie kann ich bei Access 2010 mehrere, um genau zu sein alle,
E-Mailadressen auswählen und diese werden dann Automatisch in
die Empfänger-Zeile von Outlook gesetzt?
Alle Emailadressen zu einer „Adressliste“ zusammenbauen und mittels Docmd.Sendobject an Oulook übergeben.
Bei einer E-Mailadresse kann man ja diese einfach anklicken
und daraufhin öffnet sich Outlook, mit der eingetragenen
E-Mailadresse als Empfänger. Aber wie geht es bei Allen oder
bei Ausgewählten?Meine E-Mailadressen sind als Hyperlink eingetragen.
Das ist ein Fehler. Setze das Hyperlink-Feld in ein normales Textfeld um und speicher die EMailadressen darin als reinen Text.
Viele Grüße vom Bodensee
Franz, DF6GL
Hey
Ich habe jetzt die E-Mail als Textfeld gespeichert.
„Alle Emailadressen zu einer „Adressliste“ zusammenbauen und mittels Docmd.Sendobject an Oulook übergeben.“
Kannst du mir sagen wie das geht, ich bekomms nicht hin.
Und wie kann ich jetzt nur einer Person eine E-Mail schicken?
Danke für die Hilfe
Gruß
Morslord
Hallo,
Ich habe jetzt die E-Mail als Textfeld gespeichert.
„Alle Emailadressen zu einer „Adressliste“ zusammenbauen und
mittels Docmd.Sendobject an Outlook übergeben.“Kannst du mir sagen wie das geht, ich bekomms nicht hin.
WAS bekommst Du nicht hin? „Wie es geht“ habe ich gesagt, einen kopierbaren Code, der auch noch bei Dir funktioniert, kann ich Dir wegen Mangels an Kenntnis über Deine DB nicht geben.
Und wie kann ich jetzt nur einer Person eine E-Mail schicken?
Das kannst Du doch jetzt schon ??
Viele Grüße vom Bodensee
Franz, DF6GL
Hi,
ich weiß nicht wie ich alle E-mails in eine Adressliste bekomme, also in ein Feld setzten lasse.
Am besten müssten die mit einem „;“ voneinander getrennt sein, wenn ich das dann habe schaffe ich den Rest.
Weiß jetzt wie ich „Docmd.Sendobject“ benutze.
Dank und Gruß
Morslord
Hallo,
ich weiß nicht wie ich alle E-mails in eine Adressliste
bekomme, also in ein Feld setzten lasse.
Am besten müssten die mit einem „;“ voneinander getrennt sein,
wenn ich das dann habe schaffe ich den Rest.
Weiß jetzt wie ich „Docmd.Sendobject“ benutze.
Luftcode:
Dim rs as Dao.Recordset, strAdr as String
set rs=Currentdb.Openrecordset(„Select emailadresse from tblKunden where emailadresse is not null order by emailadresse“, dbopenSnapshot)
do until rs.eof
strAdr= strAdr & „;“ & rs(0)
rs.Movenext
loop
rs.close:set rs =nothing
if len(strAdr) > 0 then strAdr = mid(strAdr,2)
docmd.sendobject , , , strAdr, , , „Betreff“, „Mitteilung“, true
Viele Grüße vom Bodensee
Franz, DF6GL
Vielen Dank klappt wunderbar.
Gruß
Morslord