| |
| |
|
Christof
Neuß | Hallo Leute,
ich baue im Programm eine E-Mail zusammen und möchte diese dann direkt im aktuellen E-Mail-Programm des Anwenders erstellen. Das funktioniert auch prima mit dem Befehl "mailto..."
Allerdings hat die Sache einen Haken. Outlook und Lotus-Notes (nur die beiden werden bei den Anwendern eingesetzt) wollen unterschiedliche Zeichen in der Übergabe haben 
Notes:
eMailBefehl$="mailto:"+eMailAdresse$+" ?CC="+eMailCC$+" ?subject="+eMailBetreff$+" ?body="+eMailText$
Outlook:
'eMailBefehl$="mailto:"+eMailAdresse$+" &CC="+eMailCC$+" &subject="+eMailBetreff$+" &body="+eMailText$
Also einmal mit '?' und einmal mit '&'. Kann ich denn irgendwie (ziemlich leicht) erkennen, welches E-Mail-Programm eingesetzt wird?
DANKE  |
|
| |
| |
| |
|
|
 | Schau mal hier in der Reg :
HKEY_LOCAL_MACHINE\SOFTWARE\Classes\mailto\shell\open\command |
|
| |
| |
| |
|
|
Dieter
Zornow | Bei Windows 7 steht es aber hier
HKEY_CLASSES_ROOT\mailto\shell\open\command |
|
| |
| XProfan X2Er ist ein Mann wie ein Baum. Sie nennen ihn Bonsai., Win 7 32 bit und Win 7 64 bit, mit XProfan X2 | 07.11.2011 ▲ |
|
| |
|
|
| Hab grad nochmal geschaut...
dieser bei Dir unter Windows 7 existierende Schlüssel existiert bei mir unter Windows XP nicht. |
|
| |
| |
| |
|
|
Dieter
Zornow | Dann müsste nur noch jemand sagen wie es mit Vista aussieht
Ich denke mal wie bei Windows 7 |
|
| |
| XProfan X2Er ist ein Mann wie ein Baum. Sie nennen ihn Bonsai., Win 7 32 bit und Win 7 64 bit, mit XProfan X2 | 07.11.2011 ▲ |
|
| |
|
|
Jörg
Sellmeyer | |
| |
| Windows XP SP2 XProfan X4... und hier mal was ganz anderes als Profan ...  | 07.11.2011 ▲ |
|
| |
|
|
Christof
Neuß | Hey, das funzt mit der Abfrage. DANKE
Mit der Registry tu' ich mich schwer. Da lasse ich besser die Finger von. |
|
| |
| |
| |
|
|
Dieter
Zornow | | Das funktioniert aber nur wenn *.eml mit dem E-Mail programm verküpft ist. Ich habe z.B. zwei E-Mail Programme und das Standard E-Mail Programm muss nicht unbedingt auch mit *.eml verknüpft sein. |
|
| |
| XProfan X2Er ist ein Mann wie ein Baum. Sie nennen ihn Bonsai., Win 7 32 bit und Win 7 64 bit, mit XProfan X2 | 07.11.2011 ▲ |
|
| |
|
|
Jörg
Sellmeyer | Ich hab's mal noch standardisiert: [...]  |
|
| |
| Windows XP SP2 XProfan X4... und hier mal was ganz anderes als Profan ... | 07.11.2011 ▲ |
|
| |
|
|
| Was Dietmar bereits ansprach meine ich auch, dass es hierbei wohl relevanter ist nach dem URL-Protokoll "mailto" Ausschau zu halten statt nach dem mit der Dateiendung "eml" verknüpften Programm -
also besser die Reg-Variante nutzen. |
|
| |
| |
| |
|
|
Jörg
Sellmeyer | |
| |
| Windows XP SP2 XProfan X4... und hier mal was ganz anderes als Profan ... | 07.11.2011 ▲ |
|
| |
|
|
Andreas
Miethe
 | Dafür gibt es eine schöne Vorlage aus PRFellow von Thomas Hölzer
Sollte eigentlich immer an den Standard-Mailclient gehen !
KompilierenMarkierenSeparieren' PRFellow-Vorlage
' (C) 2000, Thomas Hölzer,Siegen
' Alle Rechte vorbehalten
' Mail mit Dateianhang verschicken
' Voraussetzungen:
' Ab Profan 5.0 (getestet mit 6.6, 6.99ßXI)
' MAPI kompatibler E-Mail-Client
' Getestet bisher mit Outlook 98
' Die anzuhängende Datei muß auf jeden Fall existieren,
' sonst startet der E-Mail Client nicht.
' Der Einfachheit halber wurde die config.sys genommen, weil die
' auf den meisten 9x -Rechnern vorhanden ist.
' Ggf. ist eine andere Datei einzutragen.
' Bitte nicht absenden - mich interessiert anderer Leuts config.sys nicht ;-)
Def MAPISendMail(5) !"MAPI32.DLL","MAPISendMail"
Def ZeroMemory(2) !"KERNEL32","RtlZeroMemory"
Declare MapiMessage#,subject#,text#,MapiRecipDesc#,cc#,bcc#,additional#,x$
Declare MapiFileDesc#,recip#,file#
Dim MapiMessage#,48
Dim subject#,32
Dim text#,128
Dim MapiFileDesc#,24'für 1 Datei
Dim recip#,32
Dim cc#,32
Dim bcc#,32
Dim additional#,32
Dim file#,32
Dim MapiRecipDesc#,96' für 4 Empfänger
' Strukturen müssen unbedingt null-initialisiert werden.
' Clear arbeitet teilweise fehlerhaft,deshalb:
ZeroMemory(MapiMessage#,48)
ZeroMemory(MapiRecipDesc#,96)
ZeroMemory(MapiFileDesc#,24)
' Empfänger:
String recip#,0="Coole_Vorlagen@prfellow.de"
Long MapiRecipDesc#,4=1' = Empfänger
Long MapiRecipDesc#,8=recip#
'CC
String cc#,0="Profan-Solutions@prfellow.de"
Long MapiRecipDesc#,28=2' =CC
Long MapiRecipDesc#,32=cc#
'BCC
String bcc#,0="thoelzer@tehsoft.de"
Long MapiRecipDesc#,52=3'=BCC
Long MapiRecipDesc#,56=bcc#
'' Noch ein CC-Empfänger
String additional#,0="webmaster@tehsoft.de"
Long MapiRecipDesc#,76=2' der soll zusätzlich ins CC-Feld
Long MapiRecipDesc#,80=additional#
' Datei-Anhang:
String file#,0="C:\CONFIG.SYS"
Long MapiFileDesc#,12=file#
' Subject und Text:
String subject#,0="PRFellow 2001-Vorlage"
String text#,0="Dies ist ein Test - bitte NICHT abschicken!"
' Haupt-Struktur bestücken:
Long MapiMessage#,4=subject#
Long MapiMessage#,8=text#
Long MapiMessage#,32=4' Anzahl der Empfänger im folgenden Array
Long MapiMessage#,36=MapiRecipDesc#
Long MapiMessage#,40=1' Anzahl der Dateianhänge im folgenden Array
Long MapiMessage#,44=MapiFileDesc#
' und los (modal zum Hauptfenster!)...
Cls
WindowTitle GetText$(%hwnd)+" - Powered by PRFellow 2001"
MAPISendMail(0,0,MapiMessage#,11,0)
WaitInput
' Aufräumen:
Dispose MapiMessage#
Dispose subject#
Dispose text#
Dispose MapiRecipDesc#
Dispose cc#
Dispose bcc#
Dispose recip#
Dispose additional#
Dispose MapiFileDesc#
Dispose file#
|
|
| |
| Gruss Andreas ________ ________ ________ ________ _ Profan 3.3 - XProfanX2 Win 95,98,ME,2000,XP,Vista - Win 7 32 / 64 Bit ASUS X93S - Intel Core I7-NVIDIA GForce 540M 8GB Arbeitsspeicher Homepage : [...]  | 07.11.2011 ▲ |
|
| |
|
(909)
Deutsch
English
Français
Español
Italia