| 标题 | VBS Runas 自动输入密码, 明文 |
| 内容 | VBS Runas 自动输入密码 提权脚本等功能 代码如下: Set Shell = CreateObject("WScript.Shell") Shell.Run "cmd /c @runas /user:administrator CMD" WScript.Sleep 2000 Shell.SendKeys "password{ENTER}exit{ENTER}" WScript.Sleep 1000 Shell.SendKeys "@echo off&cls&net stop messenger&net start messenger&exit{ENTER}" @echo off echo dim WshShell,cmd >> %3runas.vbs echo cmd="%SystemRoot%\system32\cmd.exe" >> %3runas.vbs echo Set WshShell=WScript.CreateObject("WScript.Shell") >> %3runas.vbs echo WshShell.Run cmd >> %3runas.vbs echo WScript.Sleep 500 >> %3runas.vbs echo WshShell.SendKeys"runas /user:Administrators\%1 %3Bcmd.bat" >> %3runas.vbs echo WshShell.SendKeys"{ENTER}" >> %3runas.vbs echo WScript.Sleep 1000 >> %3runas.vbs echo WshShell.SendKeys"%2" >> %3runas.vbs echo WshShell.SendKeys"{ENTER}" >> %3runas.vbs echo WScript.Sleep 500 >> %3runas.vbs echo WshShell.SendKeys"exit" >> %3runas.vbs echo WshShell.SendKeys"{ENTER}" >> %3runas.vbs echo @echo off >> %3Bcmd.bat echo %4 %5 %6 %7 %8 %9 >> %3Bcmd.bat echo del %3runas.vbs >> %3Bcmd.bat echo del %3Bcmd.bat >> %3Bcmd.bat %3\runas.vbs 以上保存为BAT 代码如下: dim WshShell,cmd cmd="%SystemRoot%\system32\cmd.exe" Set WshShell=WScript.CreateObject("WScript.Shell") WshShell.Run cmd WScript.Sleep 500 WshShell.SendKeys"runas /user:Administrators\用户名 密码 命令" WshShell.SendKeys"{ENTER}" WScript.Sleep 1000 WshShell.SendKeys"%2" WshShell.SendKeys"{ENTER}" WScript.Sleep 500 WshShell.SendKeys"exit" WshShell.SendKeys"{ENTER}" 以上保存为VBS Runas 只有在通过自动登陆读到密码时才有用 |
| 随便看 |
|
在线学习网考试资料包含高考、自考、专升本考试、人事考试、公务员考试、大学生村官考试、特岗教师招聘考试、事业单位招聘考试、企业人才招聘、银行招聘、教师招聘、农村信用社招聘、各类资格证书考试等各类考试资料。