神龙汽车公司组织系统部  黎云华
---- 问题的提出？

---- 随着Internet的日益普及，到Internet网上冲浪的人是越来越
多了，对于手头并不是很宽裕的网民特别是在家里上网的网民来
说，如果能及时知道自己上网已经花了多少钱，那么，每次到ISP那
缴纳费用时，至少可以做到心中有数。下面介绍一种非常方便的方
法，根据这个方法的原理，用VB、Delphi之类的软件很容易很快编
写出一个不错的个人Internet上网计费软件。

---- 工作原理

---- 现在一般个人上网，都是运行Windows 95/98平台，采用Modem
拨号上网方式，在Windows 95/98中，配置“拨号服务器”时，拨号
服务器有一个属性，就是是否记录日志文件，其默认值是“否”。
对于它，平常我们可能都没太注意。我们把它改成“是”，这样，
在每次上网后，Windows 95就会在其安装目录下（通常就是C盘的
Windows目录），把上网连通的时间以及上网过程中发生的事件记录
在ppplog.txt日志文件中。

---- ppplog.txt是一个标准的文本文件,在此文件中,上网发生的每
个事件记录占有一行,格式为:

日期 时间 发生的事件
|---------|-----------|-|---------------------|
12-19-1998 21:54:31.25
- Microsoft 拨号网络适配器日志已打开。
12-19-1998 21:54:31.25
- 服务器类型是 PPP (点到点协议)。
.
.
.
12-19-1998 22:44:49.08
- Microsoft 拨号网络适配器日志已关闭。
---- 上述内容是简体中文Windows 98的ppplog.txt文件格式，对于
Windows 95，基本格式是一样的，只是事件部分是英文的。

日期 时间 发生的事件
|---------|-----------|-|---------------------|
12-15-1998 16:34:27.71
- Remote access driver log opened.
12-15-1998 16:34:27.71
- Installable CP VxD SPAP is loaded
12-15-1998 16:34:27.71
- Server type is PPP (Point to Point Protocol).
.
.
.
12-15-1998 16:58:30.05
- Remote access driver log closed.
---- 对应于一次正常的上网过程，Windows 95/98必定会在ppplog.
txt文件中记录下包括什么时候日志文件已打开以及什么时候日志文
件已关闭的完整过程，这样，我们每次上网后读取ppplog.txt文
件，把含有“日志已打开”字符串的事件记录的时间作为我们计时
的起点,读取日期、时间，把含有“日志已关闭”字符串的事件记录
的时间作为我们计时的结束（对于Windows 95，字符串分别取”log
opened”和”log closed”），读取日期、时间，算出其时间差，
以该时间差作为时长,按照市话费每三分钟算一次，每次0.24元，
Internet费，每一分钟算一次,每次0.10元(我们这的收费标准),便
可以算出每次的花费费用了。我们可以把每次计算的结果保存在一
个数据库中，那么就可以随时查询自己的花费情况了。

---- 具体实现

---- 下面是我的具体实现过程，程序用Delphi编程实现。

---- 1、配置拨号服务器以便记录日志文件

---- 1.1、从任务栏上选取“开始”-〉“设置”-〉“控制面
板”。

---- 1.2、点击“网络”图标，出现网络配置对话框。

---- 1.3、在网络组件中选择“拨号服务器”，按“属性”按钮，
出现“拨号服务器”属性对话框。

---- 1. 4、选择其“高级”选项，然后选择“记录日志文件”项，
在其右边的设置值中选择 “是”。按“确定”按钮，接着系统提示
需要重新启动机器，重新启动后，设置就起作用了，以后每次上
网，都会把上网时间记录在日志文件ppplog.txt文件中。

---- 2、 建立一数据库internet.db

---- 数据库用来保存每次的计费数据，方便查询。

---- 利用Delphi软件包中的DataBase DeskTop程序建立

---- 数据库中包含有下列字段：

字段名 类型 说明
Begindate Date 起始日期
Begintime Time 起始时间
Enddate Date 结束日期
Endtime Time 结束时间
Timelen Number 时