Other Directory Services
Local Accounts and Windows NT 4.0 Accounts
Groups
List Local Group Attributes
' List Local Group Attributes
Set objNetwork = CreateObject("WScript.Network")
strComputer = objNetwork.ComputerName
strGroup = "Administrators"
WScript.Echo "Computer: " & strComputer
Set objGroup = GetObject("WinNT://" & strComputer & "/" & strGroup & ", group")
Set objClass = GetObject(objGroup.Schema)
WScript.Echo "Mandatory attributes:"
For Each strProperty In objClass.MandatoryProperties
WScript.Echo strProperty
Next
Wscript.Echo
WScript.Echo "Optional attributes:"
For Each strProperty In objClass.OptionalProperties
WScript.Echo strProperty
Next
|
VbsEdit includes all these samples!
Download Now!
Version 5.4.1 - This package includes VbsEdit 32-bit, VbsEdit 64-bit, HtaEdit 32-bit and HtaEdit 64-bit.
The evaluation version never expires.
Home
|