Hallo ACCESS-Spezialisten,
bisher habe ich aus einer Anwendung heraus über ein Hyper-Textfeld heraus gemailt(mailto:smile:. Leider muss dann „Betreff“ und „Mailtext“ in die Mail kopiert werden. Es gibt doch bestimmt eine Möglichkeit auch Betreff und Text in die Mail zu bekommen, so dass mit einem Klick alles in der Mail ist. Mit sendobjekt weiss ich nicht wie ich die Feldinhalte von Betreff und Mailtext reinbekomme.
Wer kann mir helfen
so long
Martin
Hi Martin,
Du bist doch schon verdammt richtig mit dem „SendObject“-Befehl.
Einfach nur
DoCmd.SendObject [Objekttyp][, Objektname][, Ausgabeformat][, An][, cc][, Bcc][, Betreff][, Nachricht], usw.
mit den betreffenden Parametern füllen!
Gruß
Andy
Hi Andy,
danke für die Antwort. Mein Problem als Anfänger ist es:
Den Text des Feldinhaltes meines Feldes „Text“ zu füllen.
Kannst Du mir mal ein Beispiel geben?
Entschuldige, wenn ich schwer von Begriff bin.
Martin
[Bei dieser Antwort wurde das Vollzitat nachträglich automatisiert entfernt]
So in dieser Richtung müßte es flutschen . . .
Gruß aus Finnland
Stephan
Die Outlook-Bibliothek muß natürlich in den Verweisen (VBA-Umgebung EXTRAS-Verweise) eingebunden sein.
Dim Outl As Outlook.Application
Dim NeueMail As Outlook.MailItem
Dim NameSpace As Outlook.NameSpace
Set Outl = New Outlook.Application
Set NameSpace = Outl.GetNamespace(„MAPI“)
Set NeueMail = Outl.CreateItem(olMailItem)
With NeueMail
.To = Forms![DeinFormName]![Dein-e-mail-Feld]
.Recipients.ResolveAll
.Subject = „Test“ 'Oder mit anderen Inhalten abfüllen
.Body = Forms![DeinFormName]![Dein-e-mail-Feld].Value & vbCrLf & Forms![DeinFormName]![IrgendwasAnderes].Value
.Display
End With
Set NeueMail = Nothing
Set NameSpace = Nothing
Set Outl = Nothing