摘 要 WSH是一种基于32位Windows平台、应用于ActiveX脚本引擎、与编程语言无关的脚本宿主。本文通过几个实例介绍了如何在Delphi5.0中应用WSH技术。
关键词 Delphii WSH 脚本执行和辅助功能
1 引言
微软公司的WSH(Windows Scripting Host)是一种基于32位Windows平台、应用于ActiveX脚本引擎、与编程语言无关的脚本宿主。WSH具有良好的脚本语言支持特性，它支持VBScript、javascript、Perl、REXX等各种脚本语言。WSH的运行方式较为灵活，既可以在Windows中运行，也可以在DOS命令模式下启动。微软已经在Windows98、Windows2000中内置了WSH技术。
WSH对象模型主要包含了两类ActiveX接口:脚本执行和辅助功能。每类接口提供多种WSH对象，各对象有自己的方法和属性。脚本执行接口提供了许多属性和方法。这类接口允许脚本操作处理WSH，在屏幕上显示特定信息，执行一些基本功能（如创建Word应用程序对象）。辅助功能接口也提供了丰富的属性和方法供用户使用。利用这些属性和方法我们可以进行各种操作，例如：映射网络驱动器、连接远程打印机、获取编辑系统环境变量（如用户名、计算机名、域名等等）、操作注册表等。系统管理员可以利用这些辅助功能创建简单的登录脚本。程序编写者可以利用这些由WSH提供的对象接口在基于Windows的平台上执行各种自动化任务，例如：启动Word、Excel、Powerpoint任务，打开CAD文件等。
在Delphi5.0中应用WSH技术，不但可以利用WSH的强大功能增强应用程序的性能，还可以简化应用程序设计，使编程工作更为简单。某些原本只能由Windows API函数完成的工作现在可以使用更为简单明了的WSH完成。WSH为用户提供了多个对象，例如：WshShortcut、 WshShell、 WshArguments、 WshUrlShortcut、 Automation、WshEnvironment等等。我们可以利用它们进行各种应用。
2 WSH应用实例
2.1 映射网络驱动器
procedure TForm1.FormCreate(Sender: TObject);
var
oWshNetwork:variant ;
begin
oWshNetwork:=CreateOleObject('Wscript.Network');
oWshNetwork.MapNetworkDrive('w:','\\ezss\ydmis','True','administrator','xyz');