02-08-2012, 06:12
|
|
|
חבר מתאריך: 07.02.04
הודעות: 2,421
|
|
local administrators group all computers in domain
שלום.
אני צריך Query לקבלת כל המחשבים באירגון שנתנו להם הרשאת local administrators group.
לא משנה באיזה דרך
sccm
PowerShell ( קוביבי אני מחכה לך)
vbs
מצאתי כמה פתרונות ברשת
קוד:
With CreateObject("Scripting.FileSystemObject")
Set inFile = .OpenTextFile("sys.txt")
Set objLogFile = .OpenTextFile("c:\output.log", 8, True, 0)
End With
Do Until inFile.AtEndOfStream
computer = inFile.ReadLine
objLogFile.WriteLine "************************************************** **********" _
& vbNewLine & computer
With GetObject("WinNT://" & computer & "/Administrators,Group")
objLogFile.WriteLine vbTab & .Name
For Each objUser in .Members
objLogFile.WriteLine vbTab & vbTab & objUser.Name
Next
End With
Loop
objLogFile.close
WScript.Echo "Done"
אבל ה VBS הנ"ל מוציא לי קובץ TXT ואני מעונין ב csv מסודר עם טבלאות.
יש לציין ששאילתה של VBS לוקחת זמן על כל המחשבים...
תודה
נערך לאחרונה ע"י eyal-r בתאריך 02-08-2012 בשעה 06:32.
|