'说明 : 通过VBS脚本查看 系统C盘 剩下的空间 
'Creator : Eric1991 
'Date ： 2013-11-4 
Set objWMIService = GetObject("winmgmts:") 
Set objLogicalDisk = objWMIService.Get("Win32_LogicalDisk.DeviceID='c:'") 
Wscript.Echo cint(objLogicalDisk.FreeSpace / 1024 / 1024 / 1024) & "GB" 

利用VBS实现显示系统服务列表
'执行方法：直接双击vbs文件或者通过cmd.exe下cscript.exe"指定脚本的路径"'利用Vbs脚本实现显示系统服务里表'Creator：Eric1991Date:2013-11-10:25strComputer="."SetobjWMI

VBS获取文件MD5值（无组件）
下面这个代码不需要组件一样可以获取MD5值。OptionExplicitDimwiDimfileDimfile_sizeDimfile_attributesDimfile_versionDimfile_hashSetwi=CreateObject("WindowsInstaller.Installer")file="111

VBS调用Photoshop批量生成缩略图的代码
模仿腾讯新闻页，给KingCms添加了新闻页图片点播的代码，代码要求的图片点播格式如下：0###http://www.website.org/UploadFile/123.jpg@@@/small/123.gif@@@8标题一***http