最近电话诈骗横行,一时疏忽被骗子套到了公司的初始密码,唉~ 防不胜防啊。遂有了标题的需求。
本脚本需要3个文件,位于d:/pwd下
1 name.csv,保存需要测试的用户名列表 (在A列 表头为 name)
2 pwd.csv,保存需要测试的密码列表 (在A列 表头为 pwd)
3 name2.csv,保存验证成功的密码
域不能限制测试密码次数,必须管理员方式运行
echo "本脚本需要3个文件,位于d:/pwd下" echo "1 name.csv,保存需要测试的用户名列表 " echo "2 pwd.csv,保存需要测试的密码列表" echo "3 name2.csv,保存验证成功的密码" echo "域不能限制测试密码次数,必须管理员方式运行" $files = (Get-Childitem d:\pwd\name2.csv).pspath $content = get-content $files Import-Csv -Path D:\pwd\name.csv | foreach { $bb ="{0}" -F $_.name $UserName = "xxxx.com\" +"$bb" # xxxx.com 设置为你们自己的域 Import-Csv -Path D:\pwd\pwd.csv | foreach { $pwd2 ="{0}" -F $_.pwd $pass = ConvertTo-SecureString -AsPlainText $_.pwd -Force $cred = New-Object System.Management.Automation.PSCredential($UserName,$Pass) $dCred = $cred $dUsername = $dCred.username $dPassword = $dCred.GetNetworkCredential().password $currentDomain = "LDAP://" + ([ADSI]"").distinguishedName $auth = New-Object System.DirectoryServices.DirectoryEntry($CurrentDomain,$dUserName,$dPassword) if ($auth.name -eq $null) { # Write-Host 当前测试用户$bb 当前测试密码$pwd2 # Write-Host "验证密码失败." -foregroundcolor 'Red' } else { Write-Host 当前测试用户$bb 当前测试密码$pwd2 Write-Host "密码测试成功 -> " $($auth.Name) -foregroundcolor 'green' $a = "密码测试成功 -> $UserName $pwd2" |Out-File -Append D:\pwd\name2.csv } } }
如果有密码验证成功的,会自动追加写入到D:\pwd\name2.csv下,同时,控制台会绿色显示那条记录。
用法:
建一个记事本,贴入修改后的代码,然后文件保存为 xxx.ps1 后缀为ps1
在域中任何一台计算机中,以管理员身份运行powershell,然后进入到这个脚本所在目录
直接使用 .\xxx.ps1 即可执行
脚本转至http://jiushu.blog.51cto.com/972756/1675200
发表评论:
◎欢迎参与讨论,请在这里发表您的看法、交流您的观点。
相关文章
转:如何让 Windows 命令行程序像 Linux & 命令那样在后台运行2023-02-24
转:Linux站点备份打包脚本2020-04-05
Python3串口16进制读写通讯2017-10-13
Bat选择性拷贝文件夹里文件2016-09-13
Bat脚本转换成EXE可执行文件2016-08-29
Windows目标服务器端口监测脚本微信通知2016-08-25
Windows批量建文件夹和寻找目录下空文件夹2016-08-13
bat脚本设置开机启动并去除黑框2015-04-25
windows搜索文件内容并拷贝文件到指定目录2015-04-12