Thanks, Paul! If I do this recursively for each domain found to, in turn, enumerate
its trusted domains, I should come close to what NET VIEW /DOMAIN reports. I do notice
a performance difference
between using Win32::Lanman::NetEnumerateTrustedDomains recursively and simply get the
domain list from NET VIEW /DOMAIN. The latter is a lot faster. Maybe, NET VIEW is
getting the information from a
cache somewhere???
Linchi
> -----Original Message-----
> From: Paul Popour [mailto:[EMAIL PROTECTED]]
> Sent: Wednesday, July 04, 2001 9:52 AM
> To: Shea, Linchi; [EMAIL PROTECTED]
> Subject: Re: Enumerating NT domains
>
>
>
> ----- Original Message -----
> From: "Shea, Linchi" <[EMAIL PROTECTED]>
> To: <[EMAIL PROTECTED]>
> Sent: Monday, July 02, 2001 12:44 PM
> Subject: Enumerating NT domains
>
>
> > I know I must be missing something. I know how to enumerate
> machines in a given domain. But I'm drawing a blank on how to
> enumerate all the accessible NT domains, i.e. the list you may
> get via desktop
> > 'Network Places'.
> >
>
> Depending on what you want, you can use something like -
> ================================================
> use Win32::Lanman;
> $domain = Win32::DomainName;
> Win32::Lanman::NetGetDCName('', "$domain", \$PDC);
> Win32::Lanman::NetEnumerateTrustedDomains("$PDC", \@domains);
> print "$domain\t$PDC\n";
> foreach $domain (@domains)
> {
> Win32::Lanman::NetGetDCName('', "$domain", \$PDC);
> print "$domain\t$PDC\n";
> }
> ================================================
>
>
>
>
_______________________________________________
Perl-Win32-Admin mailing list
[EMAIL PROTECTED]
http://listserv.ActiveState.com/mailman/listinfo/perl-win32-admin
