Hello Group!
Using this Code:
---8<--- SNIP
#!c:/perl/bin/perl.exe -w
use strict;
use Win32::Message;
my $recipient = "Username"; # Name of a existing, logged in User
my $message = "This is a Message Text!"
if (Win32::Message::Send( "MYHOST", $recipient, "MYLOGIN", $message)) {
print "Sent administrative failure message to $recipient.\n";
} else {
my $Err = Win32::FormatMessage(Win32::GetLastError());
print "Error sending message to $recipient: $Err \n";
--------->8--------- SNAP
Gaves me the following Error:
The System couldn't find the given Environment Option! ( Translated from
german )
any Ideas?
Mit freundlichen Grüßen / With best regards
Sascha Teifke
**********************************************************
ZF Friedrichshafen AG | 88038 Friedrichshafen | Abt. FW-EI
Fon: +49 (0) 7541 77 - 3330
Mobil: +49 (0) 7541 77 - 91 3330
Fax: +49 (0) 7541 77 - 90 3330
Email: mailto:[EMAIL PROTECTED]
Internet: http://www.zf.com
Intranet: http://web.zff.zf-group.de/kst635
**********************************************************
_______________________________________________
Perl-Win32-Admin mailing list
[EMAIL PROTECTED]
To unsubscribe: http://listserv.ActiveState.com/mailman/mysubs
