A97 Mail versenden

28/12/2009 - 11:32 von Peter Kaiser | Report spam
Moin zusammen,

ich möchte aus einer A97 Anwendung heraus mit einen Doppelklick das
lokale Mailprogramm öffnen und die Adresse in das To: Feld eintragen.
Folgenden Code habe ich versucht, aber irgendwie klappt das nicht.

-
Private Sub EMAIL_DblClick(Cancel As Integer)

Dim adresse
adresse = Me!EMAIL

'Version für Standardmailhandler
DoCmd.SendObject acSendNoObject, , acFormatTXT, Me!EMAIL, , , ,
,___ True

End Sub
-

hat jemand eine Idee?
Danke.

liebe Grüße vom Teutoburger Wald

Peter
 

Lesen sie die antworten

#1 Peter Doering
28/12/2009 - 11:59 | Warnen spam
Hallo,

Peter Kaiser wrote:

ich möchte aus einer A97 Anwendung heraus mit einen Doppelklick das
lokale Mailprogramm öffnen und die Adresse in das To: Feld eintragen.
Folgenden Code habe ich versucht, aber irgendwie klappt das nicht.

-
Private Sub EMAIL_DblClick(Cancel As Integer)

Dim adresse



Hier deklarierst du einen Variant. Besser waere

Dim adresse As String

adresse = Me!EMAIL

'Version für Standardmailhandler
DoCmd.SendObject acSendNoObject, , acFormatTXT, Me!EMAIL, , , ,


-^^^^^^^^

Oben weist du das Feld einer Variablen zu und hier benutzt du wieder das
Feld? Wozu die Variable adresse?

,___ True

End Sub
-



Definiere "klappt nicht". Kommt da eine Fehlermeldung? Welche?

Ich hab bei mir unter A03 getestet, funktioniert einwandfrei. In meiner
A97-VM hab ich kein Mail-Programm installiert, was von Access aber sauber
mit der entsprechenden Meldung berichtet wird.

Gruss - Peter

Mitglied im http://www.dbdev.org
FAQ: http://www.donkarl.com

Ähnliche fragen