QQ聊天"我是猪"整人小程序,谁有啊?

程序, 整人

on error resume next

dim WSHshellA

set WSHshellA = wscript.createobject("wscript.shell")

WSHshellA.run "数好cmd.exe /c shutdown -r -t 60 -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) + "哈哈哈哈，真过瘾"

msgbox chr(13) + chr(13) + chr(13) + "乖孩子真听州毕拿话啊"

msgbox chr(13) + chr(13) + chr(13) + "下次叔叔买糖给你吃"

msgbox chr(13) + chr(13) + chr(13) + "要吃什么糖啊"

msgbox chr(13) + chr(13) + chr(13) + "什么，大白兔？"

msgbox chr(13) + chr(13) + chr(13) + "不行，不行，大白兔吃了长石头啊"

msgbox chr(13) + chr(13) + chr(13) + "要不叔叔给你讲个故事"

msgbox chr(13) + chr(13) + chr(13) + "从前有个山"

msgbox chr(13) + chr(13) + chr(13) + "山里有个庙"

msgbox chr(13) + chr(13) + chr(13) + "庙里有个老和尚"

msgbox chr(13) + chr(13) + chr(13) + "老和尚在给小和尚讲故事"

msgbox chr(13) + chr(13) + chr(13) + "讲什么故事呢"

msgbox chr(13) + chr(13) + chr(13) + "故事是这样的"

msgbox chr(13) + chr(13) + chr(13) + "从前有个山"

msgbox chr(13) + chr(13) + chr(13) + "山里有个庙"

msgbox chr(13) + chr(13) + chr(13) + "庙里有个老和尚"

msgbox chr(13) + chr(13) + chr(13) + "什么，不听了"

msgbox chr(13) + chr(13) + chr(13) + "别哭别哭，叔叔给你买糖！"

复制代册搭码一个整人的小代码，“说我是猪就不关机”

把上面的代码复制到记事本里，把后缀名改成.VBE

把它放到开始启动里

别人就算调出任务管理器也关不掉

注销也不行

辱骂他人，情节严重是属于侮辱罪的。这类案件属于自诉案件，也就是，你不告，对方就没事。但是，辱骂到达一定程度才可以起诉。

如果遭遇网络聊天被骂、言语威胁等情况，对方立即删除了好友，斗埋这时候可以在微信聊天窗口的右上角点击三个点，进入投诉页面，提供聊天记录和截图。不过这个一般都是系统自动识别处理竖销局，不是人工客服核查，如果微信团队答复投诉失败，下一步可以去腾讯110小程余让序提交举报试试，如果还是投诉失败，那就不要折腾了。

举报成立后我司会对违规帐号进行相应的封号处罚，防止违规帐号再给其他用户带来不良影响，如您产生了资金损失，请您尽快联系当地公安机关进行报案，执法部门需要我司配合时，我司会全力配合。

对于每一宗举报，我司都会进行认真的核查，会根据事实依据来进行判断被举报帐号是否违规。

举报人需尽可能填写真实完整的信息，以便我司可准确的判断用户违规行为是否成立，余盯包括：

1、详细清楚的描述事情经过；

2、完整真实的聊天截图；

3、付款时间、付款方式截图；

4、违规内容的截图，如空间/朋友圈发布不良信息的截图；

温馨提示：举报人需对举证信息的真实性负责，如果为虚假举报，我司对举报人也会做出相应处罚。磨坦

如何学习更多网络安全知识？

方式一：进入微信小程序“腾讯卫士”，选择任意一专项，通过“每日答题瞎毁桐”“网友分享”“近期真实案例/高发风险资讯”，学习网络安全知识。

方式二：进入微信小程序“腾讯卫士”，下滑屏幕，通过“全民反诈”“易骗测试”“风险查询”“近期风险”等板块，学习网络安全知识。