Sebas » 25.03.2005 (Пт) 9:28
Set objNetwork = CreateObject("Wscript.Network")
strComputer = objNetwork.ComputerName
Set colAccounts = GetObject("WinNT://" & strComputer & "")
colAccounts.Filter = Array("user")
For Each objUser In colAccounts
Msgbox objUser.Name
Next
- Я никогда не понимал, почему они приходят ко мне чтобы умирать?
sebas<-@->mail.ru