sol14-10.vbs

来自「Apress - Managing Enterprise Systems Wit」· VBS 代码 · 共 12 行

'get a reference to the user 
Set objUser = GetObject("WinNT://Acme/freds")

 'list the machines the users have access to
For Each station In objUser.LoginWorkstations
  Wscript.Echo station
Next

'set the machines a user is permitted to logon to 
objUser.LoginWorkstations = Array("thor","odin","loki")
objUser.SetInfo