English
Forum

E-Mail-Program discernible?

 

Christof
Neuß
Hello people,

I building in the program a E-Mail together and would like these then directly in the actually E-Mail-Program the Anwenders create. the functions too lovely with the commands "mailto..."

though has The thing a crux. Outlook and Lotus-Notes (only the two go with whom Users inserted) want different characters in the Übergabe having

Notes:
eMailBefehl$="mailto:"+eMailAdresse$+" ?CC="+eMailCC$+" ?subject="+eMailBetreff$+" ?body="+eMailText$

Outlook:
'eMailBefehl$="mailto:"+eMailAdresse$+" &CC="+eMailCC$+" &subject="+eMailBetreff$+" &body="+eMailText$

means once with '?' and once with '&'. can I because somehow (quite slight) discern, which E-Mail-Program inserted becomes?

THANK YOU
 
Win10 16 GB RAM
11/07/11  
 



look time here in the Reg :

HKEY_LOCAL_MACHINE\SOFTWARE\Classes\mailto\shell\open\command
 
11/07/11  
 




Dieter
Zornow
with windows 7 standing But here

HKEY_CLASSES_ROOT\mailto\shell\open\command
 
XProfan X2
Er ist ein Mann wie ein Baum. Sie nennen ihn Bonsai., Win 7 32 bit und Win 7 64 bit, mit XProfan X2
11/07/11  
 



Have strain again geschaut...

this with you under windows 7 existing Key existing by me under Windows XP not.
 
11/07/11  
 




Dieter
Zornow
then should only yet someone say as with Vista looks
i think time How with windows 7
 
XProfan X2
Er ist ein Mann wie ein Baum. Sie nennen ihn Bonsai., Win 7 32 bit und Win 7 64 bit, mit XProfan X2
11/07/11  
 




Jörg
Sellmeyer
How see it because so from?
CompileMarkSeparation
Declare File$,Exe$,Addr&
File$ = GetEnv$("TEMP") + "\\test.eml"
Assign #1,File$
ReWrite #1
Close #1
Print FindFirst$(File$)
Exe$ = MkStr$("\z",256)
External("SHELL32","FindExecutableA",(File$),0,(Exe$))
Print Trim$(Exe$)
WaitInput
Erase
ile$
 
Windows XP SP2 XProfan X4
... und hier mal was ganz anderes als Profan ...
11/07/11  
 




Christof
Neuß
Hey, the working with the request. THANK YOU

with the Registry tu' I heavy. there let I rather The fingers of.
 
Win10 16 GB RAM
11/07/11  
 




Dieter
Zornow
the functions but only if *.eml with the E-Mail Program verküpft is. I have z.B. two E-Mail programs and the standard E-Mail Program must not absolutely too with *.eml verknüpft his.
 
XProfan X2
Er ist ein Mann wie ein Baum. Sie nennen ihn Bonsai., Win 7 32 bit und Win 7 64 bit, mit XProfan X2
11/07/11  
 




Jörg
Sellmeyer
I hab's time yet standardisiert: [...] 
 
Windows XP SP2 XProfan X4
... und hier mal was ganz anderes als Profan ...
11/07/11  
 



what Dietmar already ansprach my so did i, that it hierbei well relevanter is to the URL-log "mailto" Ausschau To hold instead of to the with the File extension "eml" verknüpften Program -

means rather The Reg-Variante benefit.
 
11/07/11  
 




Jörg
Sellmeyer
by me (XP) is it the same Key, How with Dieter.
Reading is integrally simply:
CompileMarkSeparation
Print ReadIni$("HKEY_0","mailto\shell\open\command","")
'HKEY_CLASSES_ROOT\mailto\shell\open\command
WaitInputre>
 
Windows XP SP2 XProfan X4
... und hier mal was ganz anderes als Profan ...
11/07/11  
 




Andreas
Miethe


For this there a nice Presentation from PRFellow Thomas Hölzer
ought to really always on whom standard-Mailclient weg !
CompileMarkSeparation
' 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#
4 href='./../../Function-References/XProfan/dispose/'>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 :  [...] 
11/07/11  
 




Answer


Topictitle, max. 100 characters.
 

Systemprofile:

no Systemprofil laid out. [anlegen]

XProfan:

 Posting  Font  Smilies  ▼ 

Please register circa a Posting To verfassen.
 

Topic-Options

7.853 Views

Untitledvor 0 min.
Torben Nissen09/28/19
Christof Neuß08/21/18
rquindt05/29/16
funkheld10/17/15
More...

Themeninformationen



Admins  |  AGB  |  Applications  |  Authors  |  Chat  |  Privacy Policy  |  Download  |  Entrance  |  Help  |  Merchantportal  |  Imprint  |  Mart  |  Interfaces  |  SDK  |  Services  |  Games  |  Search  |  Support

One proposition all XProfan, The there's!


My XProfan
Private Messages
Own Storage Forum
Topics-Remember-List
Own Posts
Own Topics
Clipboard
Log off
 Deutsch English Français Español Italia
Translations

Privacy Policy


we use Cookies only as Session-Cookies because of the technical necessity and with us there no Cookies of Drittanbietern.

If you here on our Website click or navigate, stimmst You ours registration of Information in our Cookies on XProfan.Net To.

further Information To our Cookies and moreover, How You The control above keep, find You in ours nachfolgenden Datenschutzerklärung.


all rightDatenschutzerklärung
i want none Cookie