VBS教程：VBScript 基础-VBScript 数据类型

2017年02月06日 70 阅读

VBScript 数据类型VBScript 只有一种数据类型，称为 Variant。Variant 是一种特殊的数据类型，根据使用的方式，它可以包含不同类别的信息。因为 Variant 是 VBScript 中唯一的数据类型，所以它也是 VBScript 中所有函数的返回值的数据类型。最简单的 Variant 可以包含数字或字符串信息。Variant 用于数字上下文中时作为数字处理，用于字符串上下文中时作为字符串处理。这就是说，如果使用看起来象是数字的数据...

Wscript.Shell 对象详细介绍！！特好的东西第1/2页

2017年02月06日 71 阅读

分类:程序WshShell 对象ProgID Wscript.Shell 文件名 WSHom.Ocx CLSID F935DC22-1CF0-11d0-ADB9-00C04FD58A0B IID F935DC21-1CF0-11d0-ADB9-00C04FD58A0B 下表说明和 WshShell 对象有关的属性。属性 说明 Environment 返回 WshEnvironment 集合对象。 SpecialFolders 使用 WshSpecialFo...

利用vbscript脚本修改文件内容，此适用于自动化的操作中

2017年02月06日 70 阅读

利用vbscript脚本修改文件内容，此适用于自动化的操作中 "新建一个Replace.vbs脚本，脚本内容如下，程序运行时输入三个参数：查找内容，替换内容，文件 复制代码 代码如下:DimFileName,Find,ReplaceWith,FileContents,dFileContents Find=WScript.Arguments（0） ReplaceWith=WScript.Arguments（1） FileName=WScript.Argume...

批量替换快捷方式目的路径的VBS脚本

2017年02月06日 99 阅读

可以替换指定目录及其子目录下所有的快捷方式，自己指定存放快捷方式的路径、要被替换的字符串和希望替换成的字符串，然后双击即可运行。 下面为代码，不很复杂，：） 复制代码 代码如下:OnErrorResumeNext "替换某文件夹及其子文件夹下的所有快捷方式的指向路径 strFolderPath="D:ProgramFilesTrueLaunchBarShortcutFileStyle""快捷方式的路径 strToReplace="SOFTWARE""被替环...

VBS常用脚本 好东西

2017年02月06日 78 阅读

将 域用户或租添加到本地组 SetobjGroup=GetObject（WinNT://./Administrators） SetobjUser=GetObject（WinNT://testnet/Engineers） objGroup.Add（objUser.ADsPath） 修改本地管理员密码 Setobjcnlar=GetObject（WinNT://./administrator,user） objcnla.SetPasswordP@ssW0rd ...

Vbscript写注册表的方法

2017年02月06日 64 阅读

分类:程序 早些年用过DOS系统的用户都知道，MS-DOS操作系统允许普通用户编写批处理文件来实现简单的编程。它有效地简化了我们的工作，带给我们许多方便。当时甚至出现了一些专门编写批处理文件的程序员呢。 事实上，操作系统除了提供易于操作的使用界面外，还应当有一套内建的Script（脚本）语言才算完整。从某种角度来说，批处理文件可以说就是MS-DOS下的脚本语言。到了Windows时代，虽然Windows系统仍然保留了批处理，但是批处理在Windows中...

[vbs]每一行的最后一个字符转换成_

2017年02月06日 73 阅读

保存为do.bat复制代码 代码如下:@echooff rentmp.txttmp_bak.txt cd.>tmp.txt setlocalEnableDelayedExpansion for/f"tokens=*"%%iin（tmp_bak.txt）do（ setName=%%i echo！Name:~0,-1！_>>tmp.txt） starttmp.txt 使用方法：建个tmp_bak.txt，然后输入多行内容，运行do.bat即可...

FileSystemObject 示例代码

2017年02月06日 82 阅读

在本节描述的示例代码，提供真实的例子来示范在FileSystemObject对象模式中可用的许多功能。该代码显示了如何一起使用对象模式的所有功能，以及如何在您自己的代码中有效地使用这些功能。 请注意，由于该代码是极一般的，所以要使该代码能够真正在您的机器上运行，可能需要一些其他代码和小小的变更。这些改变之所以必要，是因为在ActiveServerPages和WindowsScriptingHost之间，为输入和输出给用户采用了不同的方法。 要在Ac...

bytes2BSTR

2017年02月06日 72 阅读

复制代码 代码如下:Functionbytes2BSTR（vIn） strReturn="" Fori=1ToLenB（vIn） ThisCharCode=AscB（MidB（vIn,i,1）） IfThisCharCode<&H80Then strReturn=strReturn&Chr（ThisCharCode） Else NextCharCode=AscB（MidB（vIn,i+1,1）） strReturn=strReturn&Chr（CLn...

vbs/js脚本编程教学（1）

2017年02月06日 80 阅读

脚本编程教学（1） 论坛上好多朋友都问关于脚本的问题，正好最近对脚本比较有兴趣，就写点东西吧。首先说明一下，我的所有代码都是 vbscript，jscript我没有研究过，不过我想也差不多。 关于最基础的语法比如变量的申明，分支，循环，函数的调用，等等这些我就不讲了，不懂得自己看一下。 1、我们的第一个vbs程序：还是那个老得掉牙的冬冬。 ************************hello.vbs*************************...

vbs/js脚本编程教学（2）

2017年02月06日 69 阅读

脚本编程教学2 我们来看一看怎么利用fso来进行文件操作。Fso时vbs里进行文件操作的核心。作为黑客，不管学习什么语言，对文件的操作都应该是要了如指掌的，所以请大家仔细学习。 不说废话，先看fso由哪几个对象组成： drive对象：包含储存设备的信息，包括硬盘，光驱，ram盘，网络驱动器 drives集合：提供一个物理和逻辑驱动器的列表 file对象：检查和处理文件 files集合：提供一个文件夹中的文件列表 folder对象：检查和处理文件夹 fol...

脚本编程3 关于文件的读写

2017年02月06日 74 阅读

使用vbscript来读写文件，十分的方便，废话少说，切入正题。 1、打开文件 使用opentextfile方法 setfs=createobject（“scripting.filesystemobject”） setts=fs.opentextfile（“c:1.txt”,1,true） 注意这里需要填入文件的完整路径，后面一个参数为访问模式 1为forreading 2为forwriting 8为appending 第三个参数指定如果指定文件不存在...

脚本编程 4 驱动器

2017年02月06日 76 阅读

驱动器的编程对黑客编程来说至关重要。好在vbs给我们提供了方便的集合，使得工作变得很简单。 1、检查驱动器 使用filesystemobject的driveexists方法 例如： setfs=createobject（"scripting.filesystemobject"） iffs.driveexists（"h"）then ...... 2、获得驱动器属性 可以使用getdrive方法，然后可以通过drive对象的属性或的驱动器的属性。常用属性有 d...

利用WSH里的MapNetworkDrive方法脚本蠕虫的传播方式

2017年02月06日 72 阅读

我近日在网络上看到了一些关于局域网脚本蠕虫的传播方式的一些讨论，这里提供一些思路。 1．利用WSH里的MapNetworkDrive方法。该方法是将网络驱动器映射到本地。 MapNetworkDrive方法： object.MapNetworkDrive（strLocalName,strRemoteName,[bUpdateProfile],[strUser],[strPassword]） 参数 object WshNetwork对象。 strLocalN...

VBS脚本病毒原理分析与防范

2017年02月06日 99 阅读

网络的流行，让我们的世界变得更加美好，但它也有让人不愉快的时候。当您收到一封主题为“ILoveYou”的邮件，用兴奋得几乎快发抖的鼠标去点击附件的时候；当您浏览一个信任的网站之后，发现打开每个文件夹的速度非常慢的时候，您是否察觉病毒已经闯进了您的世界呢？2000年5月4日欧美爆发的“爱虫”网络蠕虫病毒。由于通过电子邮件系统传播，爱虫病毒在短短几天内狂袭全球数百万计的电脑。微软、Intel等在内的众多大型企业网络系统瘫痪，全球经济损失达几十亿美元。而去年爆发...

ipclear.vbs源代码

2017年02月06日 72 阅读

复制代码 代码如下:OptionExplicit Dimsourcefile,ipaddress,objargs constdestfile="tempfile" ConstForWriting=2 DimText Dimfso,objNet,ServiceObj DimtxtStream,txtStreamOut SetobjArgs=WScript.Arguments IfobjArgs.Count=2Then sourcefile=objArgs（0...

whoami.vbs源代码

2017年02月06日 67 阅读

得到本机的电脑名复制代码 代码如下:DimobjNet SetobjNet=WScript.CreateObject（"WScript.Network"） Wscript.EchoobjNet.ComputerName&""&objNet.UserName...

RCLS.vbs使用帮助

2017年02月06日 67 阅读

******************************************************************************** RCLSv1.05 RemoteCleareventLogsScript,byzzzEVAzzz Welcometovisitewww.isgrey.com Usage: cscriptc:scriptpathRCLS.vbetargetIPusernamepassword[lognamelist...

Restart.vbs源代码可以重启远程电脑的vbs

2017年02月06日 75 阅读

复制代码 代码如下:"******************************************************************** "* "*File:Restart.vbs "*Created:March1999 "*Version:1.0 "* "*MainFunction:Shutsdown,PowerOff,LogOff,Restartsamachine. "* "*Restart.vbs/S<server>...

远程或本地获取系统信息的脚本RGIS.vbs

2017年02月06日 72 阅读

******************************************************************************* RGISv1.03 RemoteGetInfomationScript,byzzzEVAzzz Welcometovisitewww.isgrey.com&www.h4h4.com Usage: cscriptrgis.vbs[/rtargetIPusernamepassword][/ofilena...