如何快速地从网页中获得Email地址
毕业论文2.91W
摘 要 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 映射网络驱动器
在实际开发MIS系统时,我们曾经碰到这样一个:该系统由内部30个不同的部门使用,由于管理的'需要,各部门的数据除了通过专用数据库接口提交到服务器以实现数据共享外,还须由系统自动将各部门数据以专门的HTML文件格式发送到指定的服务器目录下。服务器上对应设置了30个不同的共享目录。服务器上的共享目录分别映射为本地各部门的指定驱动器如W:)。显然,逐个部门进行手工映射比较繁琐。比较严重的情况是,如果用户由于误操作断开该映射,将导致应用系统无法运行。比较好的做法是在系统启动时自动映射网络驱动器,WSH为我们提供了非常简单的实现方法。下面是一个示例性程序:
procedure Create(Sender: TObject);
var
oWshNetwork:variant ;
begin
oWshNetwork:=CreateOleObject('ork');
etworkDrive('w:','ezssydmis','True','administrator','xyz');
End;
程序首先创建基于WSH的OLE对象,然后映射服务器ezss上的共享目录ydmis为W:。MapNetworkDrive方法的语法格式为:
MapNetworkDrive(strLocalName,strRemoteName,[bUpdateProfile],[strUser],[strPassword])
各参数含义简要说明如下:
strLocalName 映射到本地的驱动器名称。
strRemoteName 映射的远程共享名。
关键词 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 映射网络驱动器
在实际开发MIS系统时,我们曾经碰到这样一个:该系统由内部30个不同的部门使用,由于管理的'需要,各部门的数据除了通过专用数据库接口提交到服务器以实现数据共享外,还须由系统自动将各部门数据以专门的HTML文件格式发送到指定的服务器目录下。服务器上对应设置了30个不同的共享目录。服务器上的共享目录分别映射为本地各部门的指定驱动器如W:)。显然,逐个部门进行手工映射比较繁琐。比较严重的情况是,如果用户由于误操作断开该映射,将导致应用系统无法运行。比较好的做法是在系统启动时自动映射网络驱动器,WSH为我们提供了非常简单的实现方法。下面是一个示例性程序:
procedure Create(Sender: TObject);
var
oWshNetwork:variant ;
begin
oWshNetwork:=CreateOleObject('ork');
etworkDrive('w:','ezssydmis','True','administrator','xyz');
End;
程序首先创建基于WSH的OLE对象,然后映射服务器ezss上的共享目录ydmis为W:。MapNetworkDrive方法的语法格式为:
MapNetworkDrive(strLocalName,strRemoteName,[bUpdateProfile],[strUser],[strPassword])
各参数含义简要说明如下:
strLocalName 映射到本地的驱动器名称。
strRemoteName 映射的远程共享名。
-
倾听音乐、聆听音乐、静听音乐
音乐欣赏,是人的听觉器官接触音乐作品的音响运动形式而产生的一种能动的审美活动,也是一种通过音乐形象去体验和认识社会生活的积极的思维活动。通过音乐欣赏教学,可以接触古今中外的各种题材、体裁、风格的作品,从而开阔音乐视野,懂得一些基本的音乐知识,培养高尚的...
-
“多读”是语文教学的精髓
在文章中,不论是事情的记叙,人物和情境的描写,还是事物的介绍说明,观点的阐述和议论,都直接或间接,直露或含蓄地表达着作者的思想感情倾向,对学生起思想导航和激励作用,产生美感和丰富的想象,使学生不断地受到真善美的熏陶和感染。这在多数情况下都是通过朗读来实现的,忽...
-
供电企业班组员工绩效管理探讨
近年来,供电企业在不断创新与发展中,取得了不错的效益,随之而来的就是员工的绩效考核问题越发严重。为此,我们根据供电企业的特点,从整体方面对绩效考核探索出一个完善的考核模式。在现代信息社会,电成为了人们生活中必不可少的一部分,而供电企业也因为行业的增大而对...
-
浅议体育课多班同课窘境的应对策略论文
随着学校规模的不断扩大,在同一课次、同一场地上体育课的班级数也越来越多,而由于受场地、器材等因素的影响,造成了体育课多班同课教学的窘境。一、体育课多班同课教学窘境的原因1、体育设施配备滞后,同场教学有序开展受到制约。场地、器材配备与同课教学需求的差...