在 VFP 中控制 IE


韦法运
  VFP5.0提供了非常完整的OLE设计技术,利用这一技术可以在程序中方便地调用其他对象完成特定功能,实现多个应用系统的集成,加强程序的功能,方便用户的操作,比如:调用WORD、EXCEL、IE等。本文介绍怎样在VFP中调用IE,从而实现对特定网站的访问,如设计一个表单,使用户单击主页按钮,程序就可以自动调用IE,访问《电脑爱好者》的主页。
  设计原理:IE是支持OLE自动执行的应用系统,安装成功后,在注册表中注册了自动执行类名,支持一些属性和方法,可以用VFP建立该OLE对象,并执行相关的属性和方法,从而实现控制。IE注册的类名为:InternetExplorer.Application(不同系统可能不同,可通过regedit.exe程序查阅Hkey_Classes_Root项目,找出类名),其相关的属性和方法如下:
属性:
Visible:是否显示IE,.T.为显示
FullBar:是否全屏显示,.T.为全屏显示
Width:IE宽度
Height:IE高度
Top:IE左上端点竖直坐标
Left:IE左上端点的水平坐标
方法:
GOHOME:访问预设的主页
GOSERACH:搜索功能
GOBACK:返回上一页
GOFORWORD:进入下一页
NAVIGATE():进入指定的网站
QUIT:退出IE
设计步骤:
(1)进入VFP,新建一表单,其INIT代码为:
public ie40 &&对象名ie40为公共变量
ie40=CREATEOBJECT("InternetExplorer.Application") &&建立IE自动执行对象
ie40.Visible=.T. &&显示IE
(2)表单中加入四个命令按钮。
其标题和CLICK事件代码为:
标题   CLICK代码
主页   ie40.NAVIGATE(''''http://www.cfan.cn.net'''') &&进入《电脑爱好者》主页
上一页   ie40.GOBACK &&返回上一页
下一页   ie40.GOFORWRD &&进入下一页
退出   ie40.QUIT
  release ie40
  thisform release &&退出IE,结束表单
  运行该表单,点击【主页】,即可进入《电脑爱好者》主页,点击【上一页】和【下一页】可以前后翻页,点击【退出】可以结束操作。该表单只是一简单示例,若加入其它属性和方法可以实现更多的控制。