经常会碰到这样的情况，一个foxpro的dbf文件有很多记录，但是我们又需要为每一个记录编上号，如果一个一个输入，那是非常麻烦的，所以我就写了这个foxpro编号小程序（扩展名为prg）：

    use xxx.DBF
     *(根据实际情况修改此库名)
   n=1
   do while n<=1000
               *(此数根据数据库中的记录数而定)
   repl   序号 with n
   n=n+1
   skip
   enddo