Check to see what command mailto will execute on your machine. On my win2k machine 
that command can be found in the system registry at:
HKEY_CLASSES_ROOT\mailto\shell\open\command

hth
Greg



Charles K. Clarkson wrote:
From: [EMAIL PROTECTED] <> wrote:

: Hello Eric,
: : Sunday, August 15, 2004, 9:14:34 PM, you wrote:
: : : On Sun, 15 Aug 2004 12:05:06 -0700, you wrote:
: : : : I need to open default email client.
: : : : : : my (not worked) code:
: : : : : : use Win32::API;
: : : my $ShellExecute = new Win32::API( "shell32",
: : : "ShellExecuteA", [ 'N', 'P', 'P', 'P', 'P', 'I' ], 'N' );
: : : $ShellExecute->Call( 0, "open", "mailto:[EMAIL PROTECTED]" , 0,
: : : 0, 1 ); : : : : : : what is wrong here?
: : : The @bla refers to an array when in double quotes. Use single
: : quotes instead.
: : yes , you are right .
:
: but still dont work :-((


    Do you receive any errors? It works on WindowsXP (Home).
It opened an Outlook with [EMAIL PROTECTED] in the "To:" field.

use Win32::API;

my $ShellExecute = new Win32::API (
                    'shell32',
                    'ShellExecuteA',
                    [ qw( N P P P P I ) ],
                    'N' );

$ShellExecute->Call( 0,
'open',
'mailto:[EMAIL PROTECTED]',
0, 0, 1 );


__END__


HTH,

Charles K. Clarkson


_______________________________________________
ActivePerl mailing list
[EMAIL PROTECTED]
To unsubscribe: http://listserv.ActiveState.com/mailman/mysubs

Reply via email to