VBS面向对象编程与Me关键字使用介绍

2017年02月06日 146 阅读

VBS 是一种很简单的脚本语言，正因为简单，所以仅仅支持面向对象的很小一部分特性。 其他面向对象的编程语言通常使用 this 或者 self 关键字来访问当前对象，而 VBS 使用的是 Me 关键字。Me 关键字代表着类在代码运行时的当前实例（instance），或者说，当前对象（object）。 对象是类的一个实例。同一个类可以实例化很多个具有相同属性和方法的对象，但是每个对象是唯一的，它们的成员变量并不一样。这些成员变量通过对象引用来访问。在类的外部，...

VBS变量名Wsh等于WScript对象？

2017年02月06日 151 阅读

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

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

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

2017年02月06日 144 阅读

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

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

2017年02月06日 132 阅读

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

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

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

2017年02月06日 121 阅读

在众多文本编辑器中，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日 118 阅读

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

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

2017年02月06日 137 阅读

百度抽风，老是把吃掉行首空格，导致代码没有缩进。可以用以下方法来解决： 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日 138 阅读

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

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

2017年02月06日 154 阅读

效果如图所示:核心代码:复制代码 代码如下: 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日 115 阅读

复制代码 代码如下:"程序名称: 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日 194 阅读

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

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

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

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

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

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

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

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