首先我们看一个输入字母的例子: 复制代码 代码如下: set s = WScript.CreateObject('WScript.Shell') app=s.Run ('C:\windows\notepad.exe') code='biweilun' WScript.Sleep 1000 s.AppActivate app s.SendKeys code Wscript.quit 这段vbs会SendKeys方法的朋友就知道,作用是打开一个记事本,然后把'biweilun'这串字符输入 发布时间:2013-07-09 作者: 佚名 views(175)
''/*========================================================================= ''*Intro让IIS建立的站点默认是.net2.0的,而不是.net1.1的,没有使用WMI,所以在操作前先得停止IIS相关服务 ''*FileNameChangeMetaBaseScriptMaps.vbs ''*Authoryongfa365 ''*Versionv1.0 ''*WEBhttp://www.yongfa365.com 发布时间:2013-07-09 作者: 佚名 views(192)
''/*========================================================================= ''*Intro网上找了一圈,都不怎么好,有一个比较不错的,汉化作者汉化时加了个自己的介绍文件,这个文件比程序本身还大,感觉不爽,于是本人的VBS版MAC修改代码便诞生了,在使用过程中如果出现不能上网的情况得返回一下网卡驱动(有些机器比较 发布时间:2013-07-09 作者: 佚名 views(238)
复制代码 代码如下: ''xp_taskbar_desktop_fixall.vbs - Repairs the Taskbar when minimized programs don''t show. ''?Kelly Theriot and Doug Knox - 8/22/2003 加工 加龙ddf3 ''翻译:Smallfrogs。翻译内容:将英文提示改为简体中文 '' 发布时间:2013-07-09 作者: 佚名 views(209)
GetOwner.VBS用法,在命令行下:GetOwner.vbs 目录名会在相应目录下生成一个TXT.TXT文件,内里列出该目录下所有文件和文件夹的类型,大小,和所有者 注意:大小以MB为单位,小于1MB的就显示为0MB, 以下是代码: G = WScript.arguments(0) Set oFSO = CreateObject('Scripting.FileSystemObject') set txt = oFSO.CreateTextFile(G&' 发布时间:2013-07-09 作者: 佚名 views(864)
其实,很简单,只要将这些驱动程序的inf文件所在的文件夹注册到注册表中。 比如: 我们把自己电脑上的驱动程序,通过驱动精灵之类的软件从系统中分离出来以后,如果想在下一次安装系统的时候,自动安装这些驱动程序。我们可以把这些分离出来的驱动程序对应的文件夹写入注册表,然后重新启动电脑,电脑会自动搜索硬件并安装驱 发布时间:2013-07-09 作者: 佚名 views(290)
1、读注册表的关键词和值: 可以通过把关键词的完整路径传递给wshshell对象的regread方法。例如: 复制代码 代码如下: set ws=wscript.createobject('wscript.shell') v=ws.regread('HKEY_LOCAL_MACHINE\SOFTWARE\Microsoft\Windows\CurrentVersion\Run\nwiz') wscript.echo v 2、写注册表 使用wshshell对象的regwrite方法 发布时间:2013-07-09 作者: 佚名 views(357)
Set ie = CreateObject('InternetExplorer.Application') ie.Navigate 'http://www.jb51.net' Wscript.Sleep 1000 ie.Toolbar = 0 ie.visible=False ie.Document.f1.word.value = kw If ie.Document.f1.word.value='' Then Wscript.Quit 上面是在网上看到的,Navigate Toolbar vis 发布时间:2013-07-09 作者: 佚名 views(381)
|