The delphi equivalent of GetObject is GetOleObject. Stacey
> -----Original Message----- > From: Neven MacEwan [mailto:[EMAIL PROTECTED]] > Sent: Wednesday, 24 October 2001 12:12 p.m. > To: Multiple recipients of list delphi > Subject: [DUG]: equiv in Delphi > > > Hi guys > > Can anyone xlate this particularly ugly VBS code (main the > getobject call) > > dim domain as variant > Set domain = GetObject("WinNT://AIRNZ-NZ") > domain.Filter = Array("User") > For Each user in domain > wscript.echo user.LastLogin > Next > > Regards Neven > N.K. MacEwan B.E. E&E > Ph 649 574 0027 > Fax 649 570 2706 > [EMAIL PROTECTED] > > > -------------------------------------------------------------- > ------------- > New Zealand Delphi Users group - Delphi List - > [EMAIL PROTECTED] > Website: http://www.delphi.org.nz > To UnSub, send email to: [EMAIL PROTECTED] > with body of "unsubscribe delphi" > Web Archive at: http://www.mail-archive.com/delphi%40delphi.org.nz/ > --------------------------------------------------------------------------- New Zealand Delphi Users group - Delphi List - [EMAIL PROTECTED] Website: http://www.delphi.org.nz To UnSub, send email to: [EMAIL PROTECTED] with body of "unsubscribe delphi" Web Archive at: http://www.mail-archive.com/delphi%40delphi.org.nz/
