Forums Neueste Beiträge
 

Outlook: eMail senden: Text übergeben

14/08/2009 - 10:08 von Carsten Jung | Report spam
Hallo,
ich möchte gerne per Schaltflàche eine neue Outlook eMail (Exchange
Server) öffnen und
in die Betreffzeile als auch in den Textbereich den Inhalt von
Textfeldern übergeben.

Wie geht das?

(ich benutze Access 2007 und Outlook 2002)


Gruss
Carsten
 

Lesen sie die antworten

#1 Mark Doerbandt
14/08/2009 - 10:29 | Warnen spam
Hallo, Carsten,

Carsten Jung:

ich möchte gerne per Schaltflàche eine neue Outlook eMail (Exchange
Server) öffnen und
in die Betreffzeile als auch in den Textbereich den Inhalt von
Textfeldern übergeben.



Dim OL As Object
Dim M As Object
Set OL = GetObject(, "Outlook.Application")
If OL Is Nothing Then
Set OL = CreateObject("Outlook.Application")
OL.GetNamespace(0).GetDefaultFolder(6).Display
End If
Set M = OL.Application.CreateItem(0)
M.Subject = Me!txtBetreff
M.HtmlBody = Me!txtInhalt
M.Display
Set M = Nothing

Gruss - Mark

Informationen fuer Neulinge in den Access-Newsgroups unter
http://www.doerbandt.de/Access/Newbie.htm

Bitte keine eMails auf Newsgroup-Beitràge senden.

Ähnliche fragen