VBS变量名Wsh等于WScript对象？

2017年02月06日 172 阅读

复制代码 代码如下: set wsh = createobject（"wscript.shell"） wscript.sleep 15 * 60 * 1000 wsh.run "shutdown /s /t 0" 双击运行，居然弹出个错误对话框 复制代码 代码如下: Line: 1 Char: 1 Error: Wrong number of arguments or invalid property assignment: ‘wsh" Code: 80...

Msxml2.XMLHTTP Msxml2.ServerXMLHTTP与缓存

2017年02月06日 178 阅读

在大部分情况下，Msxml2.XMLHTTP 能够很好地完成工作，因为它是有缓存的。比如，我们用 Msxml2.XMLHTTP 发送 HTTP POST 请求模拟登陆了某个网站，它会把登陆时的 Cookie 和 Session 缓存下来，当我们想获取网站的数据时直接 HTTP GET 就行了，不需要人工发送 Cookie 和 Session。 但是，在有些时候，缓存会给我们造成麻烦。比如我们要写一个 VBS 脚本暴力破解某个网站的账号，假设我们已经破解了一...

VBS打开选择文件对话框代码（Win7）

2017年02月06日 161 阅读

相信很多人都看过“嗨，Scripting Guy！”上面的一个问题，就算没有看过原文，也应该看过被复制粘贴后的代码。 我如何向用户显示一个用来选择文件的对话框？ 问：嗨，Scripting Guy！有没有什么方法可以让我使用脚本向用户显示一个对话框，供用户选择文件使用？ — BF 答：您好，BF。如果您使用的是 Windows 2000，我们不知道实现此操作的方法，至少操作系统中没有内置这样的方法。但如果您使用的是 Windows XP，情况就不同了。在 ...

VBS通过WMI获取CPU使用率的代码

2017年02月06日 152 阅读

Python固然强大，但是调用WMI还是用VBS比较“正宗”。 复制代码 代码如下: On Error Resume Next strComputer = "." Set objWMIService = GetObject（"winmgmts:\" & strComputer & " ootcimv2"） Set colItems = objWMIService.ExecQuery（"Select * from Win32_Processor",,48） ...

用VBS控制鼠标的实现代码（获取鼠标坐标、鼠标移动、鼠标单击、鼠标双击、鼠标右击）

2017年02月06日 145 阅读

怎么用VBS模拟鼠标左键单击、左键双击、右键单击？…… 网上搜到的答案普遍是VBS无法实现，或者是要用第三方COM（ActiveX？）组件。我对第三方组件是很反感的，使用第三方组件毫无可移植性可言，因为别人的系统中不一定注册了这个组件。我的建议是，尽量不要在VBS代码中调用第三方组件，除非你的程序只是写来自己用。（顺便说一下，也尽量不要用不靠谱的Sendkeys方法，原因不解释） 好了，废话就说这么多，现在说说用VBS控制鼠标的方法。我以前写过一篇《VBS...

TXT转HTM、HTML「TXT转网页」的vbs实现代码

2017年02月06日 135 阅读

在众多文本编辑器中，Microsoft的Word是功能很强大的。况且XP PRO本身支持VBS调用Word文档对象，那么使用VBS是最好不过的了。思路如下：VBS打开Word，Word打开TXT，另存为网页，退出。 1. VBS调用Word.Application组件 如果电脑中安装了Word，那么用VBS打开Word其实很简单，如下： Set objWord = CreateObject（"Word.Application"） objWord.Visib...

VBS基础视频教程 批处理之家broly出品

2017年02月06日 135 阅读

每一讲的主题：第一讲：VBS介绍和相关第二讲：数据类型和变量、注释第三讲：基本的流程控制语句第四讲：过程与函数第五讲：对象的介绍和调用第六讲：文件和文件夹的操作第七讲：WSH脚本宿主第八讲：正则表达式第九讲：类和面向对象第十讲：WMI的使用------------------------------------------------------------------------------------下载地址：115网盘下载地址：http://u.11...

VBS版百度贴吧代码格式化调整工具

2017年02月06日 154 阅读

百度抽风，老是把吃掉行首空格，导致代码没有缩进。可以用以下方法来解决： 1、在百度贴吧切换到经典版 2、用以下脚本把代码中的制表符和空格替换成unicode编码格式 复制代码 代码如下: "cscript //nologo C: est est.vbs C: est est.bat Set objFSO = CreateObject（"Scripting.FileSystemObject"） Set objFile = objFSO.OpenTextFil...

运行bat时隐藏cmd窗口的方法（bat隐藏窗口 隐藏运行bat文件）

2017年02月06日 157 阅读

这里脚本之家简单的整理下常用方法，方便大家使用。都是通过vbscript的代码。运行bat时隐藏cmd窗口的方法 可以编辑一个vbs脚本，在其中以隐藏窗口运行批处理程序。 复制代码 代码如下: Set ws = CreateObject（"Wscript.Shell"） ws.run "cmd /c 批处理程序名",vbhide 将上面代码拷贝到记事本中，保存为"runbat.vbs"或者其它的名字（扩展名必须是.vbs），然后点击运行生成的脚本runb...

读取Access数据库的vbscript代码打包下载

2017年02月06日 175 阅读

效果如图所示:核心代码:复制代码 代码如下: Option Explicit Dim arrTables（ ）, i, idxTables, intValidArgs Dim blnContent, blnFieldNames Dim objConn, objFSO, objRS, objSchema Dim strConnect, strHeader, strOutput Dim strFile, strResult, strSQL, strTable ...

网络接口利用率监控VBS脚本代码（Windows）

2017年02月06日 136 阅读

复制代码 代码如下:"程序名称: btlwchk_netinterface.vbs "程序用途: 监测windows主机网络接口利用率 "创建日期: 2011-09-1 "作者信息: zhangkai "运行环境: vbs "处理参数 MonSubject="NetInterface" Set Args=WScript.Arguments If （Args.Count<1） Then Wscript.Echo MonSubject & " -1:co...

用vbs读取Excel文件的函数代码

2017年02月06日 220 阅读

核心代码 复制代码 代码如下: Function ReadExcel（ myXlsFile, mySheet, my1stCell, myLastCell, blnHeader ） " Function : ReadExcel " Version : 2.00 " This function reads data from an Excel sheet without using MS-Office " " Arguments: " myXlsFile [...

从XML文件中获取信息的vbs代码

2017年02月06日 151 阅读

复制代码 代码如下: "***************************************************************** "** Script: getxmlelement.vbs "** Version: 1.0 "** Created: 1/8/2009 10:58PM "** Author: Adriaan Westra "** E-mail: "** Purpose / Comments: "** Get an e...

将信息保存到一个XML文件的vbs代码

2017年02月06日 144 阅读

This script demonstrates how to save information to a xml file with the use of MSXML. The example xml file is used for the photo album on the site. 复制代码 代码如下: "***************************************************************** "** ...

vbscript Registry 注册表操作实现代码（读写删除）

2017年02月06日 177 阅读

VBScript Code: 复制代码 代码如下: " Create a WSH Shell object: Set wshShell = CreateObject（ "WScript.Shell" ） " " Create a new key: wshShell.RegWrite "HKCUTestKey", "" " Create a new DWORD value: wshShell.RegWrite "HKCUTestKeyDWordTestVal...

WMI StdRegProv 通过wmi操作注册表的vbscript实现代码 （本地或远程）

2017年02月06日 141 阅读

Because of its length, only the code for the function itself is shown on this page. The demo script that shows how to use this function is available as a separate download. 复制代码 代码如下: Function ReadRegValue（ myComputer, myRegPath, ...

bookfind 通过ISBN序号获取图书连接的书名与作者的vbs代码

2017年02月06日 137 阅读

核心代码:复制代码 代码如下: If WScript.Arguments.UnNamed.Count <> 1 Then Syntax If WScript.Arguments.Named.Count > 1 Then Syntax blnTd = False If WScript.Arguments.Named.Count = 1 Then If UCase（ WScript.Arguments.Named（ 0 ） ） = "/TD"...

VBS脚本和BAT批处理删除自身的方法

2017年02月06日 172 阅读

VBS脚本和BAT批处理自身删除的方法（自杀） 删除自身之：VBS 把下面的脚本保存为selfkill.vbs或selfkill.vbe： 复制代码 代码如下: Set fso = CreateObject（"Scripting.FileSystemObject"） f = fso.DeleteFile（WScript.ScriptName） WScript.Echo（ WScript.ScriptName） 然后运行它，是不是发现selfkill.vb...

VBS字符串的内部实现

2017年02月06日 150 阅读

最近对 VBS 字符串 Chr（0） 注①截断讨论得比较多，看来有必要介绍一下 VBS 字符串的内部实现。Demon 友情提示：本文需要一些 C 语言和 Windows 编程的知识，VBScript 初学者慎入。 VBS 是基于微软的 ActiveX/COM 技术实现的，而 COM 对象为了做到支持任何语言，定义了一系列通用的数据类型，微软称之为自动化对象类型（Automation data types），其中之一就是 BSTR。VBS 在内部是以 BST...

ASP/VBScript中CHR（0）的由来以及带来的安全问题分析

2017年02月06日 145 阅读

该字符标识着字符串的结束，也称作null-terminated，这个给脚本编程尤其是ASP编程带来了一定的麻烦，很多人可能会问为什么要保留这个特殊字符，我们可以追溯到编写操作系统的语言之一C语言，学过C/C++的童鞋可能知道，在字符串中标识一个字符串结束靠的就是结尾的（NULL或者0），否则不能称作为字符串，只能说是字符串数组，任何对于字符串操作的函数如果传入的字符串丢掉了这个结束NULL字符，都有可能会出现异常。 复制代码 代码如下: char strb...