vbs脚本大全，配有实例 DOS命令，批处理 脚本 代码

2016年07月27日 87 阅读

VBS 取得本机IP strComputer = "." Set objWMIService = GetObject（"winmgmts:\" & strComputer & " ootcimv2"） Set IPConfigSet = objWMIService.ExecQuery（"Select IPAddress from Win32_NetworkAdapterConfiguration Where IPEnabled=TRUE"） For Eac...

NYboy.vbs病毒源代码公布，我来模拟熊猫烧香

2016年07月27日 87 阅读

使用过U盘的朋友都知道u盘病毒是一种Autorun自运行病毒,当双击时触发病毒体,会复制自身到CDE和系统盘system32下等盘符,（生成exe文件和一个Autorun.inf文件）,同时修改注册表,当点击C盘等盘符右键时,会有一个auto命令（黑色粗体）或者是两个开始命令,本人学习vbs才15天,我也来模拟下这个autorun病毒和部分熊猫烧香功能,本人能力有限,只能模拟这样的病毒了,声明,本人模拟这个病毒,全是为了学习和技术，切忌不要搞破坏，如果有人...

vbs脚本病毒生成器 下载

2016年07月27日 90 阅读

Vbs脚本病毒生成器V1.0版 简 介： 国产的新编的vbs脚本病毒生成器1.0版，本程序通过采集用户的各项输入、选择，产生符合需要的vbs脚本病毒，属于傻瓜式的vbs病毒制造程序。从此以后，要制造vbs脚本病毒不用再学编程了！（当然还是懂点编程为妙：-））。需要注意的是，请您不要运行产生的vbs病毒！另外，产生病毒的同时，本程序也产生一个恢复文件，叫做"reset.vbs",万一您不慎运行了病毒，可以运行它解毒！怎麽样？想得够周到吧！我们可以利用它的功...

用vbs实现返回 IP 配置数据

2016年07月27日 89 阅读

描述信息 用以返回配置数据（类似于IPCONFIG命令返回信息）的WMI脚本。 脚本代码 复制代码 代码如下:"ReturningIPConfigurationData "WMIscriptthatreturnsconfigurationdatasimilartothatreturnedbyIpConfig. strComputer="." SetobjWMIService=GetObject（"winmgmts:\"&strComputer&" ootc...

mdir.vbs 建立隐藏虚拟目录的vbs

2016年07月27日 88 阅读

建立隐藏虚拟目录使用。首先要先在对应WEB目录里建立一个目录。然后利用脚本直接在Shell中创建虚拟目录。仅仅为了方便大家使用。方法如下 C:>mdir.vbs *************************************************************************** Usage:MDir<-wWebSiteIndex> <-vName1,Path1,Name2,Path2,...>...

改进后的mkw3site.vbs（创建虚拟目录）

2016年07月27日 90 阅读

"--------------------------------------------------------------------------------------------------- "创建虚拟目录POWERBYJARON,江都资讯网,1999-2002. "如果您需要设置权限，请修改40-56的代码。**根据MicrosoftCorp.的AdminScripts改写 " "用法:mkw3site<--RootDirectory|...

charCodeAt与AscW函数的区别说明

2016年07月27日 87 阅读

今天需要编写一个将字符转换为ASCII的小程序，本来是用JavaScript的charCodeAt函数，后来想用VBScript中的AscW函数代替，比较之后发现有所不同： 类似功能的函数: String.charCodeAt使用方法:varcode="A".charCodeAt（0）; 类似AscW（）使用方法:dimcode=AscW（"A"） String.fromCharCode使用方法:varmyStr=String.fromCharCode（9...

vbs中Empty和Null的区别

2016年07月27日 95 阅读

empty关键字指用于指明未初始化的变量值，与NULL不同 NULL关键字指用于指明变量包含的数据无效，与empty不同 实例： dimp "此时, isempty（p）为true isNull（p）为null 再例如，在在数据库里读出记录的一个的某个字段ppp值是null,该字段没有数据 p=rs（"ppp"） 此时isNull（p）=true 再说一个容易模糊的东东（可能也是大家费解的地方） vbs在没有optionexplicit时允许不声明变量就使...

用vbs将名称转换为正确的大小写的代码

2016年07月27日 97 阅读

问： 您好，脚本专家！我有一个脚本，我的帮助支持人员用它来创建用户帐户。不幸的是，有时这些帮助支持人员在忙乱中会键入类似这样的名称：kEnMYEr。如何将名称转换为正确的大小写（即KenMyer）呢？ --LC 答： 您好，LC。您知道吗：您真幸运。谈到正确行事，脚本专家通常便是您最不愿意找的人。事实上，就我们所知，只有一种情况例外，那便是将名称转换为正确的大小写，即，使名称中的首字母大写，而使其余字母小写。这一点我们还是可以办到的。 注意：嘿，每个人都得...

用vbs实现更改计算机的说明的代码

2016年07月27日 89 阅读

问： 您好，脚本专家！在使用Windows资源管理器连接到远程计算机时，可以在“详细信息”窗格中看见该计算机的说明。如何更改计算机的说明？ --GF 答： 您好，GF。只是为了确保每个人都清楚我们谈论的内容，我们不会谈论ActiveDirectory中的“说明”属性，而是谈论在整个网络范围内广播的计算机说明。（如果您真正想知道的是如何更改ActiveDirectory中的“说明”属性，请参阅此“您好，脚本专家！”专栏。） 例如，在WindowsXP中，您可...

vbs中使用 ADO 读取所有数据均在一行上的文本文件的代码

2016年07月27日 95 阅读

使用ADO读取所有数据均在一行上的文本文件问： 您好，脚本专家！我有一个固定宽度的文本文件，该文件包含名字（6个字符）、姓氏（13个字符）和部门（9个字符），并且它们均在同一行上。我该如何使用ADO来读取呢？ --DW 答： 您好，DW。坦白地讲，我们认为您不能使用ADO（ActiveX数据对象）读取这样的文件。ADO是一种和文本文件进行交互的非常好的方法（有关详细信息，请参阅文章有关文本文件的ADO更多知识（英文）），但是，确实，ADO有些挑剔：它的每项...

用vbs检测Internet Explorer 中是否启用了 ActiveX

2016年07月27日 95 阅读

问：您好，脚本专家！如何知道 Internet Explorer 中是否启用了 ActiveX？-- JV答：您好，JV。您一定要问这个问题，是吗？实际上，这并不是一个特别难回答的问题，只是有点复杂。不过，那与配置 Internet Explorer 的方式紧密相关，而与通过编写一个脚本来检索此信息关系不大。首先，Internet Explorer 没有管理对象模型；相反，我们能够通过编程的方式检索 Internet Explorer 设置和属性值的唯一方...

在vbs运行命令行工具后让命令窗口保持打开状态的脚本

2016年07月27日 95 阅读

问： 您好，脚本专家！如何在运行像Ping或Ipconfig这样的工具后让命令窗口保持打开状态？ --DB 答： 您好，DB。这个问题让我们想起了往事。有一个脚本专家刚来Microsoft，那时许多人认为WMI和ADSI对于脚本编写者来说太难使用。因此，人们建议这个脚本专家不使用WMI或ADSI，而是干脆使用VBScript作为调用命令行工具的方法。事实上，这个脚本专家编写的第一章就是一个关于事件日志管理的章节，该章后来成为MicrosoftWindows...

用vbs读取远程计算机上的文本文件的代码

2016年07月27日 99 阅读

问： 您好，脚本专家！如何读取远程计算机上的文本文件？ --BM 答： 您好，BM。我们得承认：我们在利用您和您的问题来达成我们自己的邪恶目的。本周早些时候我们回答了有关如何读取一组文本文件最后一行的问题；在回答中，我们承诺将会说明如何使用FileSystemObject对远程计算机执行同样的功能。这并无恶意，只是为了维护本专栏的精神，除非有人提出有关对远程计算机上的文本文件进行处理的问题，我们是不会做出回答的。于是我们选择了您的问题。 因此，没错，我们在...

用vbs从本地 Administrators 组中删除组

2016年07月27日 93 阅读

问： 您好，脚本专家！如何从本地Administrators组中删除组？ --SB 答： 您好，SB。有一位脚本专家还隐约记得早年一部名为Branded的电视节目，节目中的主人公（由查克·康纳斯扮演）被指控为懦夫并被不光彩地从美国骑兵队开除。差不多所有脚本专家都记得它的开头部分：骑兵队扯掉该士兵制服上的肩章并将它的剑一折两断，然后令其耻辱地快步走出要塞。 为何要忆起这一幕？没有什么真正的原因，我们只是认为如果每当将用户或组从本地Administrators...

用vbs删除前一天创建的备份文件

2016年07月27日 88 阅读

问： 您好，脚本专家！有一个程序每天都会创建一个具有类似于以下名称的文件：backup_20050607.bak。如何才能删除前一天的文件呢？ --JC 答： 您好，JC。嗯，可以调用一个脚本自动删除前一天产生的任何文件。伙计，就在几周前我们曾用过一个类似这样的脚本！ 是的，我们还有印象。但往事不能重提。 除此之外，我们还要在此写一个专栏。您需要一个脚本来删除名如backup_20050607.bak（其中，20050607表示前一天，在本例中即为2005...

不错的一篇VBS-JSCRIPT GETOBJECT理解

2016年07月27日 90 阅读

2年前,当时自己在写ASPSHELL的时候一直不理解为什么 GetObject（"WinNT://."）可以获得本地系统的一些重要信息 当时MSDN是这样一个解析的 ----------- Windows脚本宿主 GetObject方法 请参阅 WScript对象|CreateObject方法|DisconnectObject方法 用指定的ProgID检索现有的对象或从文件中创建新对象。 object.GetObject（strPathname[,strP...

VBS ArrayList Class vbs中的数组类

2016年07月27日 95 阅读

ClassArrayList Privateitems（） Privatesize PrivateSubClass_Initialize size=0 ReDimitems（1） EndSub PrivateSubClass_Terminate items=null EndSub PublicFunctionAdd（ByValvalue） If（size=Ubound（items））ThenEnsureCapacity（（size+1）） items（si...

如何调试JScript/VBScript的方法

2016年07月27日 96 阅读

可单步运行： cscript//Xtest.vbs 遇到Stop（vbs）或者是Debug指令方中断至调试器： cscript//Dtest.vbs 或者用wscript作为脚本解释器宿主，用msgbox而不是cscript里面的write输出结果...

如何通过计划任务调用QuickTest测试脚本

2016年07月27日 98 阅读

我们可以编写一个Vbs脚本，直接在Windows平台下直接运行调用qtp的测试脚本，也可以将这个脚本添加到计划任务中，可以定时执行。 脚本如下： －－－－－－－－－－－－－－－－－－－－－－－－－－－－－－－－－－－－－－－ 复制代码 代码如下:DimqtApp DimqtTest DimqtResultsOpt SetqtApp=CreateObject（"QuickTest.Application"） qtApp.Launch qtApp.Visibl...