首页产品库评测行情新闻|手机数码笔记本台式机DIY硬件数字家庭数码相机办公外设|软件下载游戏开发|社区

更多

数码相机
MP4
LCD
机箱
音箱

软件资讯设计 工具 系统 开发 安全 办公 陶吧 IT教育 Vista频道 | 下载中心酷我音乐盒 腾讯QQ
天极网 > 开发频道>Delphi开发嵌入式IE浏览器监控程序

Delphi开发嵌入式IE浏览器监控程序

2005-06-16 14:19作者:丁献礼出处:电脑爱好者责任编辑:方舟


  2.注册/卸载COM对象

  注册COM对象包括注册COM对象,以及将COM对象的有关信息写入到IE浏览器扩展功能指定的注册表位置,下面分别对其注册方法进行介绍。卸载方法分别和注册方法相对应。

  (1)注册/卸载COM对象。一种方法是在Delphi开发环境下运行Run|Register ActiveX Server/Run|Unregister ActiveX Server自动完成COM对象的注册/卸载;另一种方法是通过调用MS Windows操作系统提供的regsvr32.exe命令进行注册。

  (2) 注册/卸载COM对象的有关信息到IE浏览器扩展功能指定的注册表位置。将COM对象的CLSID写入到IE浏览器扩展功能指定的注册表位置后,当IE浏览器启动时,就通过该CLSID查找COM对象有关信息(如文件路径),从而实现了COM对象嵌入式功能扩展。为了实现这个目的,只需要在注册表的[HKEY_LOCAL_MACHINE\Software\Microsoft\ Windows\CurrentVersion\Explorer\Browser Helper Objects]项下,建立一个名称为COM对象的CLSID的注册表项目即可。

  3.开发监控模块

  监控模块主要完成对IE浏览器的监控功能,在Invoke()函数中触发BeforeNavigator2事件时调用执行,主要包括ChkUrl()、WriteSite()、WriteLog()和GetIP()四个功能函数,分别完成检查URL(及IP地址)、记录URL和IP地址、记录系统日志、根据URL取得IP地址的功能,分别简单介绍如下,具体实现详见程序源代码。

  (1)ChkUrl()函数:它是监控模块的核心函数,也是模块的入口函数。ChkUrl()函数首先取得用户请求的URL,并且调用GetIP()函数取得其对应的IP地址,然后到系统中查找该URL及IP是否已经存在,如果存在则根据系统保存的结果禁止/允许用户访问,否则就根据系统的当前工作状态(禁止/允许)动态处理,同时调用WriteSite()函数将该URL和IP地址保存到系统中。最后调用WriteLog()函数记录系统日志。

  (2)WriteSite()函数:完成将URL和IP地址保存到系统中的功能,同时记录系统当前日期和时间。

  (3)WriteLog()函数:将有关信息形成系统日志并且保存下来,主要有网络URL和IP地址、用户名称、访问日期和时间、处理结果(禁止/允许访问)等信息。

  (4)GetIP()函数:提供根据URL取得对应IP地址的功能,通过调用TNMHTTP组件的相关功能实现:首先将URL赋值给TNMHTTP组件的Host属性,然后调用ResolveRemoteHost()方法,就可以从其RemoteIP属性中获得对应的IP地址。

  4.开发维护程序

  维护程序主要实现系统参数维护和日志管理两方面功能,在启动时需要管理员登录。

  (1)系统参数维护:启用/停止系统监控功能等,程序界面如图3所示。

ie浏览器

  (2)系统日志管理:日志的查询、打印等功能(见图4)。

ie浏览器

  总结和系统进一步完善计划

  本文详细介绍了嵌入式IE浏览器监控程序的开发方法和实现过程,该系统以COM对象的形式嵌入到IE浏览器中,可以实现对IE浏览器(即用户)的监控功能。

关注此文的读者还看过:

返回开发频道首页

共2页。 上一页12

软件频道最新更新

热点推荐

IT嘉年华

编辑推荐

软件下载

热门
推荐

网友关注

软件
资料
游戏

装机推荐

文章排行

本周
本月
最新更新
天极服务|关于我们|About us|网站律师|RSS订阅|友情合作|加入我们|天极动态|网站地图|意见反馈|MSN/QQ上看天极
Copyright (C) 1999-2012 Yesky.com, All Rights Reserved 版权所有 天极网络