Magnus,
Here's the code I use (the Windows part):
on SendMail tMailTo
put queryRegistry("HKEY_CLASSES_ROOT\mailto\shell\open\command\" into
tMailApp
if tMailApp = "" then exit SendMail
if (quote & "%1" & quote is in tMailApp then replace quote & "%1" & quote
with tMailTo in tMailApp
if "%1" is in tMailApp then replace %1 with tMailTo in tMailApp
open process tMailApp for neither
end SendMail
Called by something like:
on mouseUp
SendMail "[EMAIL PROTECTED]"
end mouseUp
The funky "%1" situations are based on experience. Sometimes the registry
key will just have an Application, like:
"c:\program files\myMailApp\myMailApp.exe"
Other times it will be quoted, like:
"c:\program files\my mail app\myMailApp.exe" "%1"
And occasionally like this:
"c:\program files\my mail app\my MailApp.exe %1"
This code takes care of all those situations.
Ken Ray
Sons of Thunder Software
Email: [EMAIL PROTECTED]
Web Site: http://www.sonsothunder.com/
----- Original Message -----
From: "Magnus von Br�msen" <[EMAIL PROTECTED]>
To: <[EMAIL PROTECTED]>
Sent: Wednesday, March 27, 2002 9:37 AM
Subject: Sending mail on Windows?
> Hello
>
> Om macintosh you can use:
> revGoURL "mailto:[EMAIL PROTECTED]";
>
> But, how do you do it on Windows? In the Transcript Dictionary it says
> that "mailto" is mac-only.
>
> (Mr. Cozens, thanks for the tip about file extension.)
>
> /magnus von br�msen
>
>
> --------------------------------------------------------------------------
> "Man skall inte ropa hej f�rr�n pc'n �r skjuten"
> --------------------------------------------------------------------------
> Studio Alice
> Magnus von Br�msen
> 0702-212 495
> 0322-633 833
> www.studioalice.se
>
> _______________________________________________
> use-revolution mailing list
> [EMAIL PROTECTED]
> http://lists.runrev.com/mailman/listinfo/use-revolution
>
_______________________________________________
use-revolution mailing list
[EMAIL PROTECTED]
http://lists.runrev.com/mailman/listinfo/use-revolution
