deutschsprachige FoxPro User Group
Forum View
Home
  
  Re: outlook, Mail versenden mit text- #20081 in section [740772]
Sec: (28) VFX deutsch
Von: Uwe Habermann
An: Bernd Köhl
Am/Um: 21.07.2017 16:24:13 gelesen

--from Newsreader at Freitag, 21. Juli 2017; 16:24:13--

Hallo Bernd!

>>es gibt ja keinen Fehler, es wird einfach keine Email versendent.<<

Ja, genau. Und wenn Du das TRY/CATCH kommentierst, kommt der Fehler.

>>Damit wir in Outlook ein neues Mailfenster geöffnet<<

Damit wird eine E-Mail an das Standard-E-Mailprogramm übergeben. In Deinem
Fall ist dies zufällig Outlook.

>>Ich habe da irgenwo bei MS gefunden, leider hat er ein Problem mit
>>?Subjet= usw, alles was danach kommt ist wohl falsch.

=ShellExecute(0,"Open","mailto:"+
m.lcAdresse?subject=&tcUeberschrift&body=&Firma%0A&tcAnrede%0A&tcName%0A&tcStrasse%0A&tcPLZ&tcOrt","","",1)<<

Setz den String in einer Variablen zusammen:

lcMail = "mailto:"+ m.lcAdresse + "?subject=" + tcUeberschrift + "&body=" +
Firma && usw.

Und dann:

=ShellExecute(0,"Open", lcMail,"","",1)<<

Viele Grüße

Uwe Habermann




Bernd Köhl   20.07.2017 12:19
Uwe Habermann  20.07.2017 16:20
Bernd Köhl  21.07.2017 08:42
Uwe Habermann  21.07.2017 10:22
Bernd Köhl  21.07.2017 13:45
Ulf Neugebauer  21.07.2017 14:59
Uwe Habermann  21.07.2017 15:41
Ulf Neugebauer  21.07.2017 19:31
Bernd Köhl  21.07.2017 14:38
Uwe Habermann  21.07.2017 15:44
Bernd Köhl  21.07.2017 15:58
Uwe Habermann  21.07.2017 16:24
Bernd Köhl  24.07.2017 12:04
Bernd Köhl  24.07.2017 13:48
  
zurück zum Forum