Did you run it from the command line with the -w switch? regards,
John -----Original Message----- From: "S�ren Edzen" [mailto:[EMAIL PROTECTED]] Sent: Thursday, February 20, 2003 10:55 AM To: [EMAIL PROTECTED] Subject: Dave Roth's Example 2-1 (Creaing accounts) error/warning Hello! I'm not sure if this question belongs here or not, but I would appreciate any help. When I run the script Example 2.1 from Dave Roth's "WIN32 PERL SCRIPTING" (after changing what's nessesary according to the comments in the code) I got the following. I asume it's warnings, because the script seems to work. The account, diectory and permissions get set allright. My question is why does this show? TIA S�ren Edzen [snip] -------------------------------------------------------------------------- Prototype mismatch: sub main::DACL_SECURITY_INFORMATION () vs none at E:/Perl/li b/Exporter/Heavy.pm line 165 Exporter::heavy_export('Win32::Lanman', 'main') called at E:/Perl/lib/Ex porter.pm line 45 Exporter::import('NET_INFO_DESCRIPTION', 'NET_STATUS_DESCRIPTION', 'SERV ICE_CONTROL_DESCRIPTIONS', 'SERVICE_STATE_DESCRIPTIONS', 'SERVICE_CONTROLS', 'SE RVICE_START_TYPES', 'SERVICE_ERROR_TYPES', 'SC_FAILURE_ACTIONS', ...) called at H:\bin\AddUser.pl line 14 main::BEGIN() called at E:/Perl/site/lib/Win32/Lanman.pm line 14 eval {...} called at E:/Perl/site/lib/Win32/Lanman.pm line 14 Prototype mismatch: sub main::GROUP_SECURITY_INFORMATION () vs none at E:/Perl/l ib/Exporter/Heavy.pm line 165 Exporter::heavy_export('Win32::Lanman', 'main') called at E:/Perl/lib/Ex porter.pm line 45 Exporter::import('NET_INFO_DESCRIPTION', 'NET_STATUS_DESCRIPTION', 'SERV ICE_CONTROL_DESCRIPTIONS', 'SERVICE_STATE_DESCRIPTIONS', 'SERVICE_CONTROLS', 'SE RVICE_START_TYPES', 'SERVICE_ERROR_TYPES', 'SC_FAILURE_ACTIONS', ...) called at H:\bin\AddUser.pl line 14 main::BEGIN() called at E:/Perl/site/lib/Win32/Lanman.pm line 14 eval {...} called at E:/Perl/site/lib/Win32/Lanman.pm line 14 Prototype mismatch: sub main::OWNER_SECURITY_INFORMATION () vs none at E:/Perl/l ib/Exporter/Heavy.pm line 165 Exporter::heavy_export('Win32::Lanman', 'main') called at E:/Perl/lib/Ex porter.pm line 45 Exporter::import('NET_INFO_DESCRIPTION', 'NET_STATUS_DESCRIPTION', 'SERV ICE_CONTROL_DESCRIPTIONS', 'SERVICE_STATE_DESCRIPTIONS', 'SERVICE_CONTROLS', 'SE RVICE_START_TYPES', 'SERVICE_ERROR_TYPES', 'SC_FAILURE_ACTIONS', ...) called at H:\bin\AddUser.pl line 14 main::BEGIN() called at E:/Perl/site/lib/Win32/Lanman.pm line 14 eval {...} called at E:/Perl/site/lib/Win32/Lanman.pm line 14 Prototype mismatch: sub main::SACL_SECURITY_INFORMATION () vs none at E:/Perl/li b/Exporter/Heavy.pm line 165 Exporter::heavy_export('Win32::Lanman', 'main') called at E:/Perl/lib/Ex porter.pm line 45 Exporter::import('NET_INFO_DESCRIPTION', 'NET_STATUS_DESCRIPTION', 'SERV ICE_CONTROL_DESCRIPTIONS', 'SERVICE_STATE_DESCRIPTIONS', 'SERVICE_CONTROLS', 'SE RVICE_START_TYPES', 'SERVICE_ERROR_TYPES', 'SC_FAILURE_ACTIONS', ...) called at H:\bin\AddUser.pl line 14 main::BEGIN() called at E:/Perl/site/lib/Win32/Lanman.pm line 14 eval {...} called at E:/Perl/site/lib/Win32/Lanman.pm line 14 >From the book 'Win32 Perl Scripting: The Administrator's Handbook' by Dave Roth AddUser.pl ---------- Create an account. Syntax: perl AddUser.pl AccountName [-d Domain | -m Machine][-c Comment] [-f FullName] [-g Group] -c..........Specify the account's comment. -f..........Specify the account's full name. -g..........A group the account is a member of. This is only applicable to user accounts. Specify this switch as many times as needed. -m Machine..Specify a machine where the user account will live. -d Domain...Specify a domain where the user account will live. AccountName.The name of the account (the userid). [/snip] -------------------------------------------------------------------------- _______________________________________________ Perl-Win32-Admin mailing list [EMAIL PROTECTED] To unsubscribe: http://listserv.ActiveState.com/mailman/mysubs _______________________________________________ Perl-Win32-Admin mailing list [EMAIL PROTECTED] To unsubscribe: http://listserv.ActiveState.com/mailman/mysubs
