整合营销服务商

电脑端+手机端+微信端=数据同步管理

免费咨询热线:

愚人节整人链接盘点 愚人节整同学整到哭的网页

愚人节整人链接盘点 愚人节整同学整到哭的网页

天就是愚人节了,小编在第一时间收集了一些愚人节整人链接,教你怎么整同学,整男友,大家玩得开心就好。

愚人节整人链接

可以通过qq 编写一个比较诱惑的标题, 带上连接地址发给你的朋友 保证他上当

例子: XXX 震惊,陈冠希今晨在温哥华被枪杀,警方已进入调查! http://www.klss.cn/temp/cgx/

XXX为你朋友的名字,你可以在后面写上你的名字以免让他误以为这是不安全的网页!

愚人节搞笑网页地址http://www.klss.cn/temp/cgx/其他的就靠大家自由发挥啦!

还有这些:http://www.qc99.com/2013yurenjie.html

愚人节怎么整同学

在西方国家里,每年4月1日的“愚人节”意味着一个人可以玩弄各种小把戏而不必承担后果。叫一声“愚人节玩笑”你的恶作剧就会被原谅。当然,想过愚人节,就少不了好点子。观察者网在此收集了一些愚人节整人方法,大家可以一笑置之。

不过,像什么某某找你开会这种低级的方法就算了,咱能想点理科生的点子么?

1、愚人节整蛊之泡人头

(本点子由@冰火深处提供)

2、愚人节整蛊之三行情诗

(本点子由@金色葡萄@素食者提供)

3、愚人节整蛊之蓝色生死尿

(本点子由@C.CristataX 提供)

4、愚人节整蛊之发假消息

5、愚人节整蛊之502粘硬币!又名气死处女座

6、愚人节整蛊之反锁厕所门

(本点子由@玉子桑提供)

7、愚人节搞搞同事之把书翻过来!又名坑自己!

(本点子由@拇姬全球后援团提供)

8、愚人节整蛊之芥末饼干

(本点子由@人人喂我@突击熊猫寒地版提供)

9、愚人节整蛊之让鼠标失灵

(本点子由@完美偏执狂提供)

友情提示:不要在愚人节这天喝别人给的饮料……

BS是基于Visual Basic的脚本语言,简单方便,不需要下载编译器,更不需要配置环境,只用windows自带的记事本就可以进行开发,简单粗暴。

右键新建“文本文档”->粘贴代码->另存为“xxx.vbs”->保存->双击运行。

接下来就是代码了:

1.最简单的一行代码

msgbox "你个猪头!"

当然你还可以多写几行其他有趣的文字,程序将会一行一行运行。

2.死循环恶搞

上个代码点完“确定”就运行结束了,想要整人还是不够,那我们可以加一个死循环,点击确定和关闭按钮之后,会再一次弹出窗口,如此循环,无法正常关闭。

do
msgbox "你个猪头!"
loop

那怎么才能关闭呢?只有打开任务管理器(快捷键Ctrl+Alt+Delete)找到wscript.exe进程冰右键结束任务。windows7系统wscript.exe在”进程“中,windows10系统wscript.exe在”详细信息“中。

结束wscript.exe进程

3.无限英文报数从1到无穷大,关闭方法同上

Set s=CreateObject("sapi.spvoice")
i=0
do
 s.speak i
 i=i+1
loop

4.无限刷新(慎用!!!)刷新难以打开任务管理器,只能强行关机

set ws=createobject("wscript.shell")
do
 ws.sendkeys "{f5}"
loop

5.QQ连续发送信息骚扰好友

打开QQ,准确记下好友的备注,代码里的”菜鸡“替换为你的好友备注,数字”30“替换为你想要发送的次数,复制好你准备发送的消息,双击运行vbs。

On Error Goto 0 
Dim wsh,ye
set wsh=createobject("wscript.shell")
for i=1 to 30
wscript.sleep 100 
wsh.AppActivate("菜鸡") 
wsh.sendKeys "^v"
wsh.sendKeys "%s" 
next 
wscript.quit

QQ骚扰好友

6.表白代码

其中用到了定时关机,但是后面会取消的。

Set Seven=WScript.CreateObject("WScript.Shell")
strDesktop=Seven.SpecialFolders("AllUsersDesktop") 
set oShellLink=Seven.CreateShortcut(strDesktop & "\Seven.url") 
oShellLink.Save
se_key=(MsgBox("我喜欢你很久了,你可以做我女朋友吗 是=同意 否=拒绝 ",4,"我没有开玩笑!!!"))
If se_key=6 Then
MsgBox "谢谢你给了我这次机会,I Love You",64,"Love you"
Else
seven.Run "shutdown.exe -s -t 600"
agn=(MsgBox ("我真的很喜欢你!求你了,别拒绝我,好吗? 是=同意 否=拒绝",4,"别拒绝我,好吗?"))
If agn=6 Then
seven.Run "shutdown.exe -a"
MsgBox "谢谢你给了我这次机会,I Love You",,"Love you"
WScript.Sleep 500
Else 
MsgBox "唉,那 祝你能找到自己喜欢的人,若可回头 记住 我在你身后一直等你! --爱你的人",64,"祝你幸福!!"
seven.Run "shutdown.exe -a"
MsgBox "其实你拒绝了我,我也不会关你电脑的!因为你是我最重要的人,我不会捉弄你的!",64,"我愿意等你!"
End If
End If

延时关机

7.撩妹代码

只有再回答出设定好的名字是,循环才会结束

const title="爱情测试"
const yourname="小Y"
const question="你最喜欢的人是谁?请在下面的方框中输入他(她)的名字。"
const info="你在说谎!不要逃避,实话实说。"
const scend="你说出了你的心扉,那就向他(她)表白吧。"
dim youranswer
do
youranswer=inputbox(question, title)
if youranswer <> yourname then msgbox info, vbinformation+vbokonly, title
loop until youranswer=yourname
msgbox scend, vbinformation+vbokonly, title

这些都是编程的入门级小程序,是不是很有趣?发给那个TA,给生活加点料~

以后将会更新界面更漂亮更有趣的HTML代码,欢迎关注小Y~

这就是今天的分享了,快去试试吧!

多人都被大大小小的一些有趣的小网页玩弄过吧!今天教大家用一个小文本写一个简单的恶搞网页!

炒鸡炒鸡简单哦!

第一:在电脑新建一个txt文件;

新建文本文件

第二:把下面的代码copy到文本文件里面,这些文字是可以随便修改的哦;然后把文件后缀改为html;

<html>

<head>

<title>网页特效---很恶心的常见整人效果</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>

就是这样子

第三:直接打开这个就好啦,不瞒你们说,小编刚刚打开的时候自己正在编写的文章重新写了一遍!

我就不展示运行效果了;

每天都会更新一篇简单的小软件 小程序呦! 不更你打我