迷茫的vbs整人代码,把我整迷了
各位大佬,有没有人知道,我这个电脑为啥不能运行呀
以下是vbs文件的代码:
在这里插入代码片
set ws=createobject("wscript.shell")
call shutdown(1)
do while a<>"我是猪"
a=inputbox("快在下面的框框里输入我是猪,否则后果自负,快输""我是猪"" ","输不输","")
loop
call shutdown(2)
msgbox "早说就行了嘛",4096+64
msgbox"再输一遍我是猪!",4096+64
msgbox"我是猪!",4096+64
MsgBox"最后一次!",4096+64
MsgBox"如果你很快的点过去,不看的话",4096+64
MsgBox"我就要你踩我空间的!哼!",4096+64
MsgBox"从前有座山!",4096+64
MsgBox"山里有个庙.",4096+64
MsgBox"庙里有个老和尚在讲故事.",4096+64
ws.run"iexplore.exe http://new.qzone.qq.com/137841986/infocenter"
msgbox"哎呀累了!数绵羊哄我睡觉",4096+64
for i=1 to 100
MsgBox i&"只绵羊",4096+64
next
msgbox"哎呀我困了,这次就饶过你吧,下次注意哦!",4096+64
msgbox"最后问个问题,我是不是大好人!",4096+64
if inputbox("是不是","请选择","是")<>"是" then
call shutdown(1)
end if
sub shutdown(s)
select case s
case 1
ws.run"cmd.exe /c shutdown -r -t 60 -c",0
case 2
ws.run"cmd.exe /c shutdown -a",0
end select
end sub
迷茫的vbs整人代码,把我整迷了相关推荐
- vbs整人代码大集合(多年以来的整合)
博客超链接首页 博客超链接资源 vbs整人代码大集合/不要乱使用! 前言 一.删除D:\所有文件 二.不断弹出窗口 三.不断按下alt+f4 (开什么都关闭--) 四.按999次回车 五.关不掉的窗口 ...
- 笔记3:关于VBS整人代码的浅谈
今天又看到有人在群里刷屏了.就想到了以前玩过的发QQ骚扰信息程序了.其实蛮简单的 和网上很多的整人代码差不多 一.直接在网上搜索"VBS整人代码",然后找到有用的代码复制着. ps ...
- 笔记3:关于VBS整人代码
今天又看到有人在群里刷屏了.就想到了以前玩过的发QQ骚扰信息程序了.其实蛮简单的 和网上很多的整人代码差不多 一.直接在网上搜索"VBS整人代码",然后找到有用的代码复制着. ps ...
- VBS整人代码(1)。
首先,我们要知道什么是VBS代码. 什么是VBScript呢? VBScript的全称是:Microsoft Visual Basic Script Editon.(微软公司可视化BASIC脚本版). ...
- vbs整人代码蓝屏_愚人节必备,教你制作整人神器,用代码实现计算机蓝屏
计算机蓝屏简称BSOD,又叫蓝屏死机.蓝屏死机提示已经成为Microsoft Windows操作系统标志性的画面.蓝屏死机主要是Microsoft Windows 系列操作系统为保护电脑数据文件不被破 ...
- vbs整人代码大全(强制自动关机,打开无数计算器)等.
一. set s=createobject("wscript.shell") set bag=getobject("winmgmts:\\.\root\cimv2&quo ...
- vbs整人代码蓝屏_小弟求VBS整人代码 比较有用的!以前发过的就不要在发了!求那种运行就蓝屏之类的 比较新的代码...
匿名用户 1级 2011-02-15 回答 strs=array(13,105,102,32,77,115,103,66,111,120,40,34,-15133,-13625,-10515,-128 ...
- vbs整人代码蓝屏_求一些VB恶搞代码。效果越厉害越好,例如:蓝屏.等等
满意答案 xcccnu 2013.05.26 采纳率:45% 等级:12 已帮助:8861人 蓝屏:msgbox "我想要你蓝屏,哈哈..." Set ws = Create ...
- vbs关不掉的计算机窗口,vbs怎么关闭_vbs整人代码-关不掉的窗口
摘要 腾兴网为您分享:vbs整人代码-关不掉的窗口,智慧医疗,猿辅导,熊猫视频,幸福一百等软件知识,以及手机解锁工具,autocad2004,小学英语冀教版,电池校准软件,当当读书app,藏宝天下,东 ...
最新文章
- 蓝云公布2019云生态战略,如何解决企业上云关键问题?
- 信而泰推出100G多速率测试模块:填补中国通信产业链短板
- 程序员伤不起的年龄——30岁
- 蓝桥杯 1454 蚂蚁感冒 (找规律)
- C++ Opengl 透明纹理源码
- 自定义sql_一个简单易用的开源BI软件,专为SQL用户设计的开源库
- java getclass 相等_java使用反射比较两个bean对象属性值是否相等
- skyeye linux qt,ARM仿真器SkyEye的安装及使用
- ASP中巧用Response属性
- 3des 解密 java_◆JAVA加密解密-3DES
- Pymol教程--Caver插件 研究蛋白通道
- 第四次实验(全连MGRE、星型拓扑、OSPF通私有网段)
- Win10经常断开网络连接的原因
- 基础SQL第无课---数据修改
- 金沙艺廊于澳门四季名荟正式开幕;招商维京游轮深耕“文游”助力中国旅游业高质量发展 | 全球旅报...
- C1. Pokémon Army (easy version)(DP)
- 华为nova2s用哪个型号服务器,华为Nova2s和Nova2买哪个好/区别大吗?华为Nova2s与Nova2的区别对比详解...
- 编写lisp程序解一元二次方程_怎样用C语言编一个解一元二次方程的程序?
- 真实业务场景展现CAS原理的ABA问题及解决方案
- 华为云部署JavaWeb(SpringBoot)程序(基于Centos7)