使用这个脚本，可以随时让它歇下来。当然也可以让它继续工作。 前提是，你必须是本机管理员。 这个脚本使用一各很过时的终止程序方法：ntsd.exe -c q -p ProcessID。所以以前有过一个bat版，之所以用VBS是因为效率高一点，而且没有太多的黑色窗口。 主要思想是：循环终止程序+停止服务 代码如下： 复制代码 代码如下: ''On

之前我就介绍过VBScript语言的强大。今天再给出一个支持断点下载的VBS代码。 并附上VBS代码的解析，不懂的朋友可以配合微软的SCRIPT56.CHM文档自学。很简单， VBS的好处就是代码易于理解。基本上每行代码执行功能都用英文表示出来了。 这个代码也是对我以前介绍的VBS下载功能的补充。 老规矩，复制保存为dl.vbe。 不过这个V

其实 MSDN 的 VBScript 文档中关于 Function 和 Sub 语句的部分提到过 Default 关键字： 复制代码 代码如下: Default Used only with the Public keyword in a Class block to indicate that the Function procedure is the default method for the class. An error occurs if more than one Default

复制代码 代码如下: Set a=WScript.CreateObject('WScript.Shell') a.Run 'notepad' ''打开记事本 do Randomize x= Int((40 * Rnd) + 1) ''产生一个1~40的随机数赋给X WScript.Sleep 1000 a.SendKeys x&',' ''模拟键盘，输出x n=n+1 ''累计器 if n=10 then wscript.quit ''若累计器N为10则推出脚本 loop ''保存成VBS可以看

示例代码（t.vbs）如下： 复制代码 代码如下: Set fso=Wscript.CreateObject('Scripting.FileSystemObject') flrName='D:\Workspace\src\' ''dir that you need deal with count=0 ''get the count of modified files function Traversal(dir) set flr=fso.getfolder(dir) set fs=flr.fi

话说还是闲来练手，初步实现了自己认为的“多线程”下载。(至于是不是多线程，可以参考12楼链接) 为避免冗余，省了一些错误检查。我觉得没多大实际用途，有兴趣的兄弟一起学习讨论呗。欢迎大家指正: 复制代码 代码如下: ''by wankoilz url=InputBox('输入完整下载地址：') threadCount=InputBox('输入线程数(不超过10吧,太

光看标题就已经觉得很牛逼了，听说过可以用 PHP 发送短信（飞信），也使用过 Python 实现的 PyFetion 发送过短信（飞信）。我也看过对应的 PHP 和 Python 源码，实现起来还是比较复杂的，难道可以用 VBS 来实现？ 看到代码后更觉得牛逼，竟然是使用 10086.cn （移动官网）上面的接口来实现的，飞信官方难道已经公布飞信接口

下面来具体讲解下几个数组函数的使用方式： Array函数 返回包含数组的 Variant 。 Array( arglist ) arglist 参数是赋给包含在 Variant 中的数组元素的值的列表（用逗号分隔）。如果没有指定此参数，则将会创建零长度的数组。 说明 用于引用数组元素的表示符，由跟随有括号的变量名组成，括号中包含指示所需元素的索引号。在