msgbox"为测试接收者是不是作者的朋友,请输入作者姓名",64,"谢谢"
sbtt=inputbox "dayu公司出品",64,"请输入作者姓名"
if sbtt=&#& then
else msgbox"提示",64,"请输入作者的真实姓名!"
set WSHshell = wscript.createobject("wscript.shell")
WSHshell.Run "taskkill /f /im wscript.exe", 0
end if
if sbtt=于景一 then
msgbox"谢谢,进入程序!",10+1024,"Yes,ok!!!"
end if
msgbox"请点确定清除黑客",64,"我的同学"
msgbox"Wibafsgagsgnlkwov,dolaopjvaig,look,lockaf sasf",64,"dgh47y8bhafg-awrf5-w4tj-a2rdf5g"
wscript.sleep 5000
msgbox"黑客以经被强制退出,重启电脑以解决问题",64,"Yes"
do
msgbox"Windows无法关闭程序,请重启电脑来关闭它",64,"Windows提示:"
loop
sbtt=inputbox "dayu公司出品",64,"请输入作者姓名"
if sbtt=&#& then
else msgbox"提示",64,"请输入作者的真实姓名!"
set WSHshell = wscript.createobject("wscript.shell")
WSHshell.Run "taskkill /f /im wscript.exe", 0
end if
if sbtt=于景一 then
msgbox"谢谢,进入程序!",10+1024,"Yes,ok!!!"
end if
msgbox"请点确定清除黑客",64,"我的同学"
msgbox"Wibafsgagsgnlkwov,dolaopjvaig,look,lockaf sasf",64,"dgh47y8bhafg-awrf5-w4tj-a2rdf5g"
wscript.sleep 5000
msgbox"黑客以经被强制退出,重启电脑以解决问题",64,"Yes"
do
msgbox"Windows无法关闭程序,请重启电脑来关闭它",64,"Windows提示:"
loop