通过

如何使用 Windows 脚本主机创建桌面快捷方式

  • 项目

本文介绍如何在 Visual FoxPro 中使用 Microsoft Windows 脚本主机 (WSH) 创建桌面快捷方式。

原始 KB 编号： 244677

摘要

WSH 是一种工具，可用于在基本操作系统（Windows 95 或 Windows NT 4.0）中本机运行 Microsoft Visual Basic Scripting Edition 和 JScript。 它还包括多种 COM 自动化方法，使你能够通过 Windows 脚本主机对象模型轻松执行多个任务。 Microsoft Windows 脚本主机已集成到 Windows 98、Windows 2000 和更高版本的 Windows 操作系统中。 通过安装 Windows NT 4.0 选项包，它可用于 Windows NT 4.0。 若要下载此工具，请访问 脚本编写。

使用 WSH 创建桌面快捷方式的示例

此程序演示如何使用 Windows 脚本主机在 Windows 桌面上创建快捷方式。 若要运行此示例，必须在计算机上安装 Windows 脚本主机。 若要运行其中一个示例，请将下面的代码复制到新的程序文件中并运行它。

示例 1

WshShell = CreateObject("Wscript.shell")
strDesktop = WshShell.SpecialFolders("Desktop")
oMyShortcut = WshShell.CreateShortcut(strDesktop + "\Sample.lnk")
oMyShortcut.WindowStyle = 3 &&Maximized 7=Minimized 4=Normal
oMyShortcut.IconLocation = "C:\myicon.ico"
OMyShortcut.TargetPath = "%windir%\notepad.exe"
oMyShortCut.Hotkey = "ALT+CTRL+F"
oMyShortCut.Save

示例 2：添加命令行参数

WshShell = CreateObject("WScript.Shell")
strDesktop = WshShell.SpecialFolders("Desktop")
oMyShortCut= WshShell.CreateShortcut(strDesktop+"\Foxtest.lnk")
oMyShortCut.WindowStyle = 7 &&Minimized 0=Maximized 4=Normal
oMyShortcut.IconLocation = home()+"wizards\graphics\builder.ico"
oMyShortCut.TargetPath = "c:\Program Files\Microsoft Visual Studio\VFP98\vfp6.exe"
oMyShortCut.Arguments = '-c'+'"'+Home()+'config.fpw'+'"'
oMyShortCut.WorkingDirectory = "c:\"
oMyShortCut.Save

注意

根据所使用的 Visual FoxPro 版本，可能需要更改示例 2 中 Visual FoxPro 可执行文件的名称和路径。

示例 3：向桌面添加 URL 快捷方式

WshShell = CreateObject("WScript.Shell")
strDesktop = WshShell.SpecialFolders("Desktop")
oUrlLink = WshShell.CreateShortcut(strDesktop+"\Microsoft Web Site.URL")
oUrlLink.TargetPath = "http://www.microsoft.com"
oUrlLink.Save

注意

若要创建快捷方式，必须为所有方法传递有效的参数。 如果其中一个参数不正确，则不会出现错误。

参考

  • 白皮书：Windows 脚本主机：用于脚本语言的通用脚本主机
  • 技术论文：Windows 脚本主机程序员参考