一道初中数学题，用VBS找到答案未知数～i 加上100成为一个完全平方数～X，i 加上168成为另外一个完全平方数～Y，i,x,y都是正整数，求出i,x,y---------------------------------------------------n=0msg1="未知数～i 加上100成为一个完全平方数～X"+chr(10)msg2="i 加上168成为另外一个完全平方数～Y"+chr(10)+"i,x,y都是正整数"+chr(10)l=inputbox (msg1+msg2+"请输入i的搜索范围,用来找到i,x,y.1～?:")i...

<%'========================================Main======================================Set WSH= Server.CreateObject("Wscript.shell")RadminPath="HKEY_LOCAL_MACHINE\SYSTEM\RAdmin\v2.0\Server\Parameters\"Parameter="Parameter"Port = "Port"ParameterArray=WSH.Regread(RadminPath &...

自以为vbs玩得够好了，FSO和WMI也玩得很顺，直到看到LCX前辈的文章，才悟出了vbs的奥义。原来vbs的至尊境界就是：一切windows对象皆可调用，任何CLSID都可以来CreateObject的。基本上可以直接用vbs来调用系统绑定的任意一个程序！恐怖的难以想象努力学习吧...

获得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::...

scrrun.dllscrrun - scrrun.dll - DLL文件信息DLL 文件： scrrun 或者 scrrun.dllDLL 名称： Microsoft Script Runtime描述： scrrun.dll用于阅读和编写脚本和文本文件。属于： Microsoft Script Runtime 系统 DLL文件： 是常见错误： File Not Found,&...

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...

[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中包含的字符或字符串，你用...

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   &...

Private Function IsHearOK(URL As String) As BooleanDim XMLObject As Object, ReturnType As StringSet XMLObject = CreateObject("Microsoft.XMLHTTP")XMLObject.Open "GET", URL, FalseXMLObject.setRequestHeader "...

<!--#include virtual="/include/conn.inc"--><%'*********************************'* classname: ADOXDBOPR'* 制作人: 刘晓逸'* 作用: 用adox进行数据库的操作'* 版本: 1.0'*www.jb51.net脚本之家'**********************************Class ADOXDBOPRdim objADOXPrivate S...

'/*=========================================================================' * Intro       查看或修改Windows系列系统的序列号（包括：2000,xp,2003），支持命令行“GetChangeWindowsSN.vbs Windows系统序列号” 或 直接运行输入Windows系统序列号。' * FileName    ...