----- 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
