自以为vbs玩得够好了,FSO和WMI也玩得很顺,直到看到LCX前辈的文章,才悟出了vbs的奥义。原来vbs的至尊境界就是:一切windows对象皆可调用,任何CLSID都可以来CreateObject的。基本上可以直接用vbs来调用系统绑定的任意一个程序!恐怖的难以想象努力学习吧...
http://www.jb51.net//article/15165.htm
获得SQL数据/日志空间使用,已使用的和未使用的空间的脚本getSQLinfo.vbs'script to get SQL DATA/LOG Space Used, Space unused, and Space Free 'Author: Felipe Ferreira, Daniel Magrini'Date: 05/07/07'Version 2,0'@@TO CHANGE::...
http://www.jb51.net//article/15162.htm
scrrun.dllscrrun - scrrun.dll - DLL文件信息DLL 文件: scrrun 或者 scrrun.dllDLL 名称: Microsoft Script Runtime描述: scrrun.dll用于阅读和编写脚本和文本文件。属于: Microsoft Script Runtime 系统 DLL文件: 是常见错误: File Not Found,&...
http://www.jb51.net//article/15154.htm
1、用FSO的SpecialFolder常数FSO的SpecialFolder常数依赖的函数为GetSpecialFolder(SpecialFolder),很遗憾的是,SpecialFolder常数只有3个,0-2,0对应WindowsFolder,就是你的Windows文件夹,如果你的系统装在C盘的话,那么返回的就是"C:\Windows"这个路径字符串。1对应SystemFolder,GetSpecialFolder(1)返回"C:\Windows\system32"。2代表临时文件夹,就不要我多说了吧?下面给出取临时文件夹路径字符串的实例:Dim fsoSet fs...
http://www.jb51.net//article/15153.htm
[code]do while true set WshShell = WScript.CreateObject("WScript.Shell") IF WshShell.AppActivate("D:\") Then MsgBox "ok" wscript.quit End If loop [/code]试都不要试,就知道这段代码是错误的。因为WshShell.AppActivate考虑的是窗体的Caption中包含的字符或字符串,你用...
http://www.jb51.net//article/15152.htm
Set fso = CreateObject("Scripting.FileSystemObject")Set ws = WScript.CreateObject("WScript.Shell")Count = 0Do Until Count< -1 chksize = fso.GetFolder("C:\Program Files\eMule\Temp").Size &...
http://www.jb51.net//article/15150.htm
<!--#include virtual="/include/conn.inc"--><%'*********************************'* classname: ADOXDBOPR'* 制作人: 刘晓逸'* 作用: 用adox进行数据库的操作'* 版本: 1.0'*www.jb51.net脚本之家'**********************************Class ADOXDBOPRdim objADOXPrivate S...
http://www.jb51.net//article/15051.htm
'/*=========================================================================' * Intro 查看或修改Windows系列系统的序列号(包括:2000,xp,2003),支持命令行“GetChangeWindowsSN.vbs Windows系统序列号” 或 直接运行输入Windows系统序列号。' * FileName ...
http://www.jb51.net//article/14983.htm
js/vbs/vbscript加密代码:<body style="font:12px"><fieldset><legend align="center">源码变异处理 </legend><table><tr valign=top><td><br><button onclick=encJSHTM()> JS 网页加密 </button><br><button onclic...
http://www.jb51.net//article/14972.htm
VBS调用WMI秒杀IE把以下文件存为KillIE.vbs,当要关闭所有用IE打开的网页时,双击执行便可,Set wmi=GetObject("winmgmts:\\.")Set pro_s=wmi.instancesof("win32_process")For Each p In pro_s if p.name="iexplore.exe" then p.terminate()Next这所以要提取是因为:本人一般打开的网页都很多,关也要关半天,有了这个实在是太好了。 ...
http://www.jb51.net//article/14964.htm
'Dim QQUIN Set objWMIService = GetObject _ ("winmgmts:\\" & "." & "\root\cimv2") &...
http://www.jb51.net//article/14963.htm
