计算机应用 | 古代文学 | 市场营销 | 生命科学 | 交通物流 | 财务管理 | 历史学 | 毕业 | 哲学 | 政治 | 财税 | 经济 | 金融 | 审计 | 法学 | 护理学 | 国际经济与贸易
计算机软件 | 新闻传播 | 电子商务 | 土木工程 | 临床医学 | 旅游管理 | 建筑学 | 文学 | 化学 | 数学 | 物理 | 地理 | 理工 | 生命 | 文化 | 企业管理 | 电子信息工程
计算机网络 | 语言文学 | 信息安全 | 工程力学 | 工商管理 | 经济管理 | 计算机 | 机电 | 材料 | 医学 | 药学 | 会计 | 硕士 | 法律 | MBA
现当代文学 | 英美文学 | 通讯工程 | 网络工程 | 行政管理 | 公共管理 | 自动化 | 艺术 | 音乐 | 舞蹈 | 美术 | 本科 | 教育 | 英语 |

如何快速地从网页中获得Email地址毕业论(2)

2015-07-15 01:31
导读:bUpdateProfile 如果本参数设置为TRUE,这种映射将存储在用户Windows系统的profiles文件夹下作为用户配置保留。 strUser、strPassword 指定受托共享的用户名和密码。

    bUpdateProfile 如果本参数设置为TRUE,这种映射将存储在用户Windows系统的profiles文件夹下作为用户配置保留。
strUser、strPassword 指定受托共享的用户名和密码。
    若要断开该映射,可以使用RemoveNetworkDrive方法,例如oWshNetwork.RemoveNetworkDrive('w:')。
2.2 创建应用程序快捷方式图标
    WSH可以帮助我们非常容易地创建应用程序快捷方式图标,这使得我们能够自由地在安装程序中选择发布程序快捷图标的创建方式。至于应用程序快捷方式图标放置在哪个地方,则完全由我们来决定。实际上,WSH允许我们自由地将应用程序快捷方式图标放置在桌面、开始菜单、程序组、发送到、网上邻居、我的文档等各种地方。在WindowsNT中,还可以放置在所有用户的启动组、开始菜单或桌面上。实际操作时,WSH首先利用WshSpecialFolders.Item("strFolderName")属性返回指定文件夹(如桌面)的路径,然后利用CreateShortcut方法创建快捷方式。当然,我们也可以指定该快捷方式的热键、目标路径、工作路径、窗口状态等等。下面是一个示例:
procedure TForm1.Button1Click(Sender: TObject);
var
  oWshShell,strShortcut,oMyShortcut:variant ;
begin
    oWshShell:=CreateoleObject('Wscript.Shell');
    strShortcut:=oWshShell.SpecialFolders.Item('DeskTop');
    oMyShortcut:=oWshShell.CreateShortcut(strShortcut+'\MIS辅助教学.lnk');
      oMyShortCut.Hotkey:='ALT+CTRL+C';
        oMyShortcut.TargetPath:= 'd:\mis\mis.exe';
    oMyShortCut.WorkingDirectory="d:\mis\"
    oMyShortCut.WindowStyle=1
    oMyShortCut.Save;
(科教作文网http://zw.ΝsΕAc.com发布)

end;
上述程序代码在桌面创建了一个“MIS辅助教学”应用程序快捷方式图标。窗口状态(WindowStyle)设置为普通,Save()方法用于保存该快捷方式图标。另外,我们可以根据需要将Item("strFolderName")中的strFolderName修改为AllUsersDesktop、AllUsersStartMenu、AllUsersPrograms、AllUsersStartup、Desktop、Favorites、Fonts、MyDocuments、NetHood、PrintHood、Programs、Recent、SendTo、StartMenu、Startup等串值,以便在不同的地方创建应用程序快捷方式图标。
2.3 实现Word、Powerpoint、Excel自动
   尽管Delphi5.0已经提供了Office组件,也提供了这方面的应用实例,但在处理一个已经存在的Office文档时仍然不够方便。WSH可以灵活地处理Office文档,这使得我们几乎可以在应用程序中无缝集成Office功能。在创建基于Office应用程序的OLE对象后,编程人员可以利用Office录制宏的功能,非常方便地获得有关处理命令,减少了开发难度。这样一来,在应用程序中实现Word、Powerpoint、Excel自动化,就非常容易了。下面是一个处理Word文档的简单示例:
procedure TForm1.Button1Click(Sender: TObject);
var
  oWord:variant ;
begin
上一篇:资讯伦理守则现况:以社会层级 下一篇:没有了