判别dBASEⅢ数据库文件是否为空的几种方法

Author: 郑明达 Date: 1994-01-07

        现假设有数据库文件GD.DBF,库中还没有记录。
        .USE GO
        .GO BOTT
        .?RECNO()
        1
        屏幕显示结果为1(但实际并没有记录)。继续操作如下:
        .APPEND BLANK
        .GO BOTT
        .?RECNO()
        1
        通过上述比较,不难进一步认识到这点。这就为用程序来判断一个数据库文件是否为空带来不便,经过在实践中的多次摸索,笔者找到了几种测试方法,现介绍给同行爱好者,愿共同交流。
        一、利用统计令COUNT来完成。
        具体方法是:打开数据库文件后,利用统计命令COUNT来计算库中的记录个数,判别其返回值是否为0,如果其值等于0,则说明该数据库文件为空,否则就说明本数据库文件中已有记录。
        本方法特点是:检测的同时可得到数据库文件中已有记录的个数,但当数据库文件中记录较多时,会浪费机器的运行时间。
        二、利用测试函数BOF()来完成。
        具体方法是:打开数据库后,测试BOF()的值是否等于.T.,如果其值为.T.,则说明该数据库文件为空;否则(即基值等于.F.),就说明本数据库文件已有记录。
        以上两法是用状态检测函数来完成的,与方法一相比,较为有效。 (郑明达)