在Visual FoxPro 5.0中激活Internet Explorer

    技术2022-05-11  45

    目前,Internet/ Intranet技术已日趋成熟,构造企业级Intranet已被越来越多的 企业所采纳。Intranet是采用Internet技术构造企业内联网络,它既可以实现企业 内部的信息共享,也可以通过Internet与外部世界交流信息,具有很大的灵活性。 当前,很多应用系统的开发建构在Intranet/Web结构上,这使得客户端的用户能够 通过浏览器查询或访问Web服务器端的数据库、浏览HTML页面。浏览器是与用户相 关的界面,虽然Web服务器后端应用程序与浏览器没有直接的交互,应用程序却通 过回送一个完整的HTML页面进行显示,以一种非交互的方式提供了界面。 Microsoft正在将Web浏览器界面直接并入将来的Windows操作系统版本中。在 Internet Explorer 4.0中,Web浏览器与其它用于文件浏览及显示桌面应用程序的 界面部件之间没有什么差别。浏览器正在成为无所不在的应用程序,它提供了漫游 Web、局域网、甚至是用户自己的计算机和应用程序所需的全部功能。 Visual FoxPro 使组织数据、定义数据库规则和建立应用程序等工作变得简单易行。 Visual FoxPro的集成化的开发环境不但拥有功能强大的面向对象程序设计工具以 及客户/服务器能力,而且支持 OLE 及 ActiveX。如果你在系统中安装了Internet Explorer,而且它是缺省的浏览器,用下面的方法,就能通过Visual Foxpro控制 Web浏览器访问Web站点。 建立一个Visual Foxpro表单,其中,启动Internet Explorer的代码为: oie = CreateObject("InternetExplorer.Application"), CreateObject函数从一个OLE应用中创建一个对象。关闭Internet Explorer 的代码为: If Type('oie') = "O" oie.Quit Release oie EndIf

    Oie类的主要成员函数为:oie.Navigate(String URL)联向URL指定的某个接点;oie.GoHome与Internet Explorer的主页对应;oie.GoSearch与Internet Explorer的搜索对应;oie.GoBack与Internet Explorer的后退对应;oie.GoForward与InternetExplorer的前进对应。Oie类的主要成员变量为:oie.Top,oie.Left窗口左上角坐标;oie.Height窗口高度;oie.Width窗口宽度;oie.StatusText窗口状态条显示信息;oie.StatusBar窗口是否有状态条;oie.FullScreen窗口是否全屏显示;oie.ToolBar窗口是否有工具条;oie.Visible窗口是否可见;oie.MenuBar窗口是否有菜单。通过设置这些成员变量,可以控制Internet Explorer的窗口大小、位置及各种状态。这样,我们就可以生成一个在Visual FoxPro中激活并控制Internet Explorer的程序,该程序可以作浏览器用。在Visual Foxpro 5.0及Internet Explorer 4.0环境下实现。


    最新回复(0)