在VBS中使用ShellExecute函数执行文件和打开网址的详细指南

在 VBS 中使用 Shell.Application 对象和 ShellExecute 函数进行文件和网址操作

简介

VBS 中的 Shell.Application 对象提供了 ShellExecute 函数，可用于执行文件或打开网址。此函数支持多种参数，包括文件路径、窗口样式、工作目录等，提供对应用程序行为的灵活控制。

ShellExecute 函数参数

ShellExecute 函数的语法如下：

ShellExecute(hwnd, Operation, File, Parameters, Directory, nShowCmd)

参数
hwnd	要执行文件的父窗口句柄。
Operation	要对文件执行的操作（例如，"open"、"print"）。
File	要执行文件的路径。
Parameters	要传递给文件的命令行参数。
Directory	文件执行的初始工作目录。
nShowCmd	指定窗口显示方式（例如，"Normal"、"Minimized"）。

窗口样式

窗口样式指定应用程序窗口的显示方式。常见的样式包括：

• SW_HIDE ：隐藏窗口。
• SW_MINIMIZE ：最小化窗口。
• SW_MAXIMIZE ：最大化窗口。
• SW_RESTORE ：还原窗口。
• SW_SHOW ：显示窗口。

工作目录

工作目录指定应用程序执行的初始目录。如果不指定，则使用当前工作目录。可使用以下代码设置工作目录：

Set objShell = CreateObject("WScript.Shell")
objShell.CurrentDirectory = "C:\My Documents"

等待进程完成

可使用以下代码等待进程完成：

objShell.ShellExecute "notepad.exe", "C:\My Documents\test.txt", "", "open", 1
While objShell.IsBusy Then
    WScript.Sleep 100
Wend

退出代码

可使用以下代码获取进程的退出代码：

nExitCode = objShell.ShellExecute "notepad.exe", "C:\My Documents\test.txt", "", "open", 1

示例

以下是一些使用 ShellExecute 函数的示例：

打开记事本并加载文件：

objShell.ShellExecute "notepad.exe", "C:\My Documents\test.txt", "", "open", 1

打开网站：

objShell.ShellExecute "http://www.google.com", "", "", "open", 1

打印文件：

objShell.ShellExecute "C:\My Documents\test.txt", "", "", "print", 1

常见问题解答

1. 如何在不显示窗口的情况下执行文件？

使用 SW_HIDE 窗口样式。

2. 如何指定工作目录？

在 Directory 参数中指定目录路径。

3. 如何等待进程完成？

使用 IsBusy 属性和 Sleep 函数。

4. 如何获取进程的退出代码？

使用 ExitCode 属性。

5. 如何打开网页并将浏览器最小化？

使用 SW_MINIMIZE 窗口样式。