Const ADS_UF_PASSWD_NOTREQD = &H0020
strDCHostName = "myDC" 'Change this value to the name of your domain controller
strUserName = "jsmith" 'Change this value to the username in question
set objUser = GetObject("WinNT://" & strDCHostName & "/" & strUserName)
objPwdNotRequiredFlag = objUserFlags AND NOT ADS_UF_PASSWD_NOTREQD
objuser.put "userFlags",objPwdNotRequiredFlag
objUser.SetInfo
如果所有计算机都已打开:
下载并安装PSExec,在每个工作站上创建一个文件,您可以使用 Active Directory 用户和计算机搜索轻松完成此操作。然后运行以下命令:
如果计算机未打开:
放
进入 .cmd 文件并将其添加为组策略中的计算机启动脚本 - 这与使用 SCCM 几乎相同。
如果你想要一个脚本,这里有一个快速的 VBS 脚本应该为你做: