vbs教程-wscript.Shell对象(1/5)

上一篇 / 下一篇  2011-10-04 16:00:33 / 个人分类:VBS


一、导航

序号

方法

描述

1

AppActivate

激活一个应用程序窗口

2

CreateShortcut

创建一个对象引用,指向一个快捷方式或URLshortcut

3

ExpandEnvironmentStrings

扩展正在运行的进程所请求的环境变量,返回结果字符串

4

LogEvent

Windows NT事件日志WSH.log文件中记录一个事件

5

Popup

显示一个弹出式的消息框,其中包含strText中的消息

6

RegDelete

从注册表中删除strName指定的键或值

7

RegRead

返回名为strName的注册键或值

8

RegWrite

设置strName指定的注册键或值

9

Run

建立新的进程,执行strCommand

10

SendKeys

模仿键盘事件,将一个或多个击键事件发送到活动窗口

序号

属性

描述

1

Environment

返回WshEnvironment对象

2

SpecialFolders

用于访问某些Windows外壳文件夹

二、方法

1AppActivate

描述:激活一个应用程序窗口。

语法:AppActivate.title

参数:title必选项。一个字符串表达式,指定在要激活的应用程序窗口的标题栏的标题。可以使用由Shell函数返回的任务ID代替标题来激活应用程序。

说明:AppActivate语句将焦点转移到指定的应用程序或窗口,但并不影响它是否为最大化或最小化。当用户采取措施移动焦点或关闭窗口时,焦点将从被激活的应用程序窗口上移走。使用Shell函数可启动应用程序并设置窗口的样式。

为了确定激活哪个应用程序,需要将title与每个正在运行的应用程序的标题字符串进行比较。如果没有发现精确的匹配,则标题字符串以"title"开始的应用程序被激活。如果仍未找到应用程序,则标题字符串的尾部为title的应用程序被激活。如果title指定的应用程序有多个实例,则任选其中一个实例予以激活。

例子:

这两个任务的功能相同——即启动Windows计算器和发出键击来执行一些简单计算。

set WshShell = WScript. CreateObject("WScript. Shell")

WshShell. Run "calc"

Wscript.sleep 100

WshShell. AppActivate "Calculator"

Wscript.sleep 100

WshShell.SendKeys "1{+}"

Wscript.sleep 500

WshShell.SendKeys "2"

Wscript.sleep 500

WshShell.SendKeys "~"

Wscript.sleep 500

WshShell.SendKeys "*3"

WScript.Sleep 500

WshShell.SendKeys "~"

WScript.Sleep 2500

2CreateShortcut

描述:创建一个对象引用,指向一个快捷方式或URLshortcut

语法:object.CreateShortcut(strPathname)

参数:object必选项。WScript.对象。

              strPathname必选项。被创建的快捷方式的路径与文件名。

说明:CreateShortcut方法创建了一个WshShortcut对象并将其返回。 该方法可用于创建新的快捷方式,或者打开原来的快捷方式以修改其属性。一个Windows快捷方式必须有扩展名 “.lnk”。如果快捷方式标题以.url结束,则创建一个WshURLShortcut对象。

例子:这个任务的功能相同——创建一个快捷方式,指向当前执行的脚本;一个URL快捷方式。

set WshShell = WScript.CreateObject("WScript.Shell")

strDesktop = WshShell.SpecialFolders("Desktop")

set ShellLink = WshShell.CreateShortcut(strDesktop & "\Shortcut Script.lnk")

   oShellLink.TargetPath = WScript.ScriptFullName

   oShellLink.WindowStyle. = 1

   oShellLink.Hotkey = "CTRL+SHIFT+F"

   oShellLink.IconLocation = "notepad.exe, 0"

   oShellLink.Description = "Shortcut Script"

   oShellLink.WorkingDirectory = strDesktop

   oShellLink.Save

set UrlLink = WshShell.CreateShortcut(strDesktop & "\Microsoft Web Site.url")

oUrlLink.TargetPath = "http://www.microsoft.com"

oUrlLink.Save

3ExpandEnvironmentStrings

描述:扩展正在运行的进程所请求的环境变量,返回结果字符串。

语法:object.ExpandEnvironmentStrings(strString)

参数:object必选项WshShell对象。

            strString需要扩展的环境变量的名称。

说明:变量被"%"字符括起来。 环境变量的名称是不区分大小写的。

例子:

下例展开WinDir环境变量并将其显示在一个消息框中:

set WshShell = CreateObject("WScript.Shell")

WScript.Echo "WinDir" & WshShell.ExpandEnvironmentStrings("%WinDir%")

会显示"c:\windows"


TAG:

 

评分:0

我来说两句

日历

« 2024-05-18  
   1234
567891011
12131415161718
19202122232425
262728293031 

数据统计

  • 访问量: 13922
  • 日志数: 20
  • 建立时间: 2011-09-11
  • 更新时间: 2012-03-18

RSS订阅

Open Toolbar