WINDOWS用户密码永不过期

debug1984

于 2008-09-06 22:08:00 发布

阅读量1.6k

点赞数

CC 4.0 BY-SA版权

文章标签： windows

本文链接：https://blog.youkuaiyun.com/debug1984/article/details/2893069

本文提供两种VBS脚本实现方式：一种用于指定特定用户设置密码永不过期；另一种批量设置所有用户密码永不过期。通过WMI操作Windows用户账号。

摘要生成于 C知道，由 DeepSeek-R1 满血版支持，前往体验 >

用户密码永不过期

两个版本，第一个VBS是用来指定修改某个用户的，第二个是批量设置所有用户的。

sub passwordexpires(username)
dim users
'获取所有用户 
set users = getobject("winmgmts:{impersonationlevel=impersonate}").instancesof("win32_useraccount")
for each user in users
if user.name = username then
'如果和参数指定的用户名相同，则设置密码永不过期 
user.PasswordExpires = False
'提交刚才的修改 
user.Put_()
end if
next
end sub
'函数调用实例 
passwordexpires("phpadmin")

批量设置所有用户的属性，密码永不过期

dim users
set users = getobject("winmgmts:{impersonationlevel=impersonate}").instancesof("win32_useraccount")
for each user in users
    user.PasswordExpires = False
    user.Put_()
next

以上文件保存为vbs,双击执行即可。