Try putting "DaveSeale" in single quotes.

--Chuck

--- "Seale, David" <[EMAIL PROTECTED]> wrote:
> Group,
> 
> The following code appears to complete successfully, but no group
> information is returned:
> 
> #################
> use Win32;
> use Win32::Lanman;
> 
> Win32::Lanman::NetUserGetGroups ( '\\target', DaveSeale, \@GlobalGroups);
> $Win32_Error = Win32::GetLastError();
> print "error: $Win32_Error\n";
> 
> print "Global Groups:\n";
> foreach $group (@GlobalGroups){
>   print "${$group}{'name'}\n"
> }
> #############
> Program Output:
> 
> W:\perl\dev> t.pl
> 
> error: 0
> Global Groups:
> 
> W:\perl\dev
> ##############
> 
> I'm running ActivePerl v5.6.0 build 623 and lanman v1.0.9 .
> 
> Can anyone tell me what I'm doing wrong, or suggest ways of trouble shooting
> this?
> 
> Thanks Alot,
> 
> David


__________________________________________________
Do You Yahoo!?
Get personalized email addresses from Yahoo! Mail
http://personal.mail.yahoo.com/
_______________________________________________
Perl-Win32-Admin mailing list
[EMAIL PROTECTED]
http://listserv.ActiveState.com/mailman/listinfo/perl-win32-admin

Reply via email to