if you use LDAP, ADO or ADSI (IADS) you can simply ask for everything in the
"computers" OU. Treating the entire AD forest as a domain you'll probably
get away with
use strict;
use Win32::OLE qw/in/;
my $pcs_in_domain=Win32::OLE->GetObject("WinNT://domainname,computer");
print "$_\n" for (in $pcs_in_domain)
You'd be better off using ADO so do a SELECT on an LDAP path though as the
WinNT namespace can miss stuff on occasion.
Kind regards,
Mark Anderson
Service Improvement Programme
Level 2, 113 Dundas Street
Edinburgh, EH3 5DE
Tel: 0131 523 8786
Mob: 07808 826 063
> -----Original Message-----
> From: [EMAIL PROTECTED]
> [SMTP:[EMAIL PROTECTED] On Behalf Of Alan
> Peck
> Sent: Friday, March 18, 2005 7:51 AM
> To: perl-win32-users@listserv.ActiveState.com
> Subject: Win32::AdminMisc
>
> *** WARNING : This message originates from the Internet ***
>
> Well I placed my order with Amazon.com to get hold of Dave Ruth's "Win32
> Perl Programming: The Standard Extensions (2nd Edition)" book.
>
> Though in the mean time of waiting for it to arrive I am continuing to
> write basic scripts.
>
> My current problem is with Win32::AdminMisc module which I can't seem to
> get hold of. I need to use GetMachines( ... ) to obtain a list of machines
> (workstation) registered in the Active Directory of the Domain Controller.
> As this module been withdrawn, if so what is the alternative method to
> obtain the machine list of the Active Directory.
>
> Thanx for ya help. :)
>
> Alun
>
> Alun Peck
> Section Head: Computers
> Department of Mathematical Technology
> Faculty of Natural Sciences
> Tshwane University of Technology
> [EMAIL PROTECTED]
> Tel: (012) 318 6389
> Fax: (012) 318 6114
> ------------------------------------------------------------------
> Tshwane University of Technology
> ------------------------------------------------------------------
> This email is sent and received in terms of the
> Electronic Communications Policy of Tshwane University of Technology.
> In line with this policy, this email is private, priviledged and
> confidential. The full text of the Electronic Mail Disclaimer
> can be seen on the TUT web site at
> http://www.tut.ac.za/goto/emaildisclaimer
> or obtained by phoning (012) 318-5911
> <<<<gwavasig>>>>
>
> _______________________________________________
> Perl-Win32-Users mailing list
> Perl-Win32-Users@listserv.ActiveState.com
> To unsubscribe: http://listserv.ActiveState.com/mailman/mysubs
The Royal Bank of Scotland plc, Registered in Scotland No. 90312. Registered
Office: 36 St Andrew Square, Edinburgh EH2 2YB
The Royal Bank of Scotland plc is authorised and regulated by the Financial
Services Authority and represents The Royal Bank of Scotland Marketing Group.
The Bank sells life policies, collective investment schemes and pension
products and advises only on the Marketing Group's range of these products and
on a With-Profit Bond produced by Norwich Union Life (RBS) Limited.
This e-mail message is confidential and for use by the addressee only. If the
message is received by anyone other than the addressee, please return the
message to the sender by replying to it and then delete the message from your
computer. Internet e-mails are not necessarily secure. The Royal Bank of
Scotland plc does not accept responsibility for changes made to this message
after it was sent.
Whilst all reasonable care has been taken to avoid the transmission of viruses,
it is the responsibility of the recipient to ensure that the onward
transmission, opening or use of this message and any attachments will not
adversely affect its systems or data. No responsibility is accepted by The
Royal Bank of Scotland plc in this regard and the recipient should carry out
such virus and other checks as it considers appropriate.
_______________________________________________
Perl-Win32-Users mailing list
Perl-Win32-Users@listserv.ActiveState.com
To unsubscribe: http://listserv.ActiveState.com/mailman/mysubs
