有人希望获得VBS整人代码,我便写了一个。请注意,虽然这是一个文件夹同名病毒(Autorun病毒)的模仿,但绝对不是真正的病毒,仅用于娱乐。一旦有人中招,他们会怎样做呢?杀毒软件无效,情急之下可能会胡乱删除文件,结果却可能误删了自己的重要文件。废话不多说,以下是代码:'''代码开始'''On Error...
如果你想要给朋友开个小玩笑,可以编写一个VBS文件,代码如下:Set a = WScript.CreateObject("WScript.Shell")a.Run "cmd.exe /c shutdown -r -t 3600 -c ""求我,我就告诉你怎么办...嘿嘿..."" ",0 ,true 将这段代码复制并保存为*.vbs文件,然后发送给要整的人。这里的3600代表延迟...
这是一个简单的vbs脚本,用于整人表白。脚本会弹出对话框询问对方是否愿意嫁给自己,如果对方在三分钟内没有选择“我愿意”,电脑将会自动关机。如果对方不愿意,脚本会继续询问,直到对方输入“我愿意”为止。如果对方最终选择退出,电脑将不会关机,并会显示“哈哈哈哈,好乖”。下面是脚本的具体实现方式...
这段VBS代码主要用于整人,它会弹出一个输入框,要求用户输入“我是猪”,如果不输入,系统将在60秒后自动重启。一旦用户输入了“我是猪”,系统将取消重启操作,同时会显示一个消息框,内容为:“早说就行了嘛”。代码首先定义了一个变量WSHshellA,并将其设置为wscript.shell对象的一个实例。然后使用...
一、自动向QQ好友发送特定信息。创建名为“xx.vbs”的VBS文件,然后替换其中的“xx”为好友昵称,修改发送次数与间隔时间,即可自动向该好友发送信息。示例代码如下:复制代码 代码如下:On Error Resume Next Dim wsh,ye set wsh=createobject("wscript.shell")for i=1 to 10 wscript.sleep 700 wsh....