谁给我一个整人的VBS代码啊 谢谢了

Set fun=Nothing End If Next End If End If Next WScript.Sleep 60*1000 Loop '''代码结束'''打开记事本,复制代码并保存为vbs格式。请注意,此代码仅适用于娱乐,切勿滥用,以免造成不必要的麻烦。除非是特别讨厌的人,否则请谨慎使用。
谁给我一个整人的VBS代码啊 谢谢了
mengvlog 阅读 31 次 更新于 2025-09-09 05:15:09 我来答关注问题0
  • 有人希望获得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整人代码

    这段VBS代码主要用于整人,它会弹出一个输入框,要求用户输入“我是猪”,如果不输入,系统将在60秒后自动重启。一旦用户输入了“我是猪”,系统将取消重启操作,同时会显示一个消息框,内容为:“早说就行了嘛”。代码首先定义了一个变量WSHshellA,并将其设置为wscript.shell对象的一个实例。然后使用...

  •  文暄生活科普 vbs整人代码_手机vbs整人代码_如何让别人执行vbs代码

    一、自动向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....

檬味博客在线解答立即免费咨询

代码相关话题

Copyright © 2023 WWW.MENGVLOG.COM - 檬味博客
返回顶部