能自由阅读两种不同结构数据库的小工具
如果要对两种不同版本的数据库进行查寻，总免不了要在ＤＯＳ和Ｗｉｎｄｏｗｓ两种状态之间进进出出，而且还要反复进入Ｆｏｘｂａｓｅ和Ｆｏｘｐｒｏ环境。总感觉太麻烦了，也太浪费时间，于是我自编了一个可同时看两种版本数据库的小工具，用了一年多，感觉很好，因此奉献出来，好让大家也方便方便。
由于版面关系，我在这里只列出了大家常用的字符型和数值型两种数据的读法，其它几种数据的读法留给各位读者，做为一个小小的启发吧。
下面这个小工具就叫ＶＩＥＷ－ＤＢＦ．Ｃ吧！
#3 使用方法为：ＶＩＥＷ－ＤＢＦ 欲查寻的库名
＃ｉｎｃｌｕｄｅ ＂ｓｔｄｉｏ．ｈ＂
ｍａｉｎ（ａｒｇｃ，ａｒｇｖ）
ｉｎｔ ａｒｇｃ；
ｃｈａｒ ＊ａｒｇｖ［］；
｛ＦＩＬＥ ＊ｆｐ；／＊定义指针＊／
ｃｈａｒ ｓｔｒ［１１］，ｓ，＊ｚｄｍ［１２８］［１１］，ｊｌ［１２８］；／＊定义字段名及记录内容的数组＊／
ｌｏｎｇ ｉｎｔ ｉ＝１，ｊ＝１，＊ｚｄｃ［１２８］，ｌ＝１，ｂｂｈ，ｌｓ；／＊定义字段长度及各计数器变量＊／
ｉｆ（（ｆｐ＝ｆｏｐｅｎ（ａｒｇｖ［１］，＂ａ＋ｂ＂））＝＝ＮＵＬＬ）｛
ｐｒｉｎｔｆ（＂不能打开文件＼ｎ＂）；
ｅｘｉｔ（１）；｝ｅｌｓｅ
｛ｂｂｈ＝ｇｅｔｃ（ｆｐ）；／＊从打开的文件中读字符，检测版本号，如果是Ｆｏｘｂａｓｅ的库则ｂｂｈ为０３，如果是Ｆｏｘｐｒｏ ｆｏｒ Ｗｉｎｄｏｗｓ的库则ｂｂｈ为３０＊／
ｆｓｅｅｋ（ｆｐ，３２Ｌ，０）；／＊跳过库文件头，直接找各字段名＊／
ｉｆ（ｇｅｔｃ（ｆｐ）！＝０ｘ０Ｄ）／＊找第一个字段名＊／
｛ｆｓｅｅｋ（ｆｐ，－１Ｌ，１）；／＊指到地址０处，读第一个字段名＊／
ｆｇｅｔｓ（ｚｄｍ［ｉ］，１１，ｆｐ）；
ｆｓｅｅｋ（ｆｐ，６Ｌ，１）；／＊查找第一个字段的长度＊／
ｚｄｃ［ｉ］＝ｆｇｅｔｃ（ｆｐ）＋１；／＊读单字节，把字段长度赋予数组＊／｝
ｗｈｉｌｅ（（ｓ！＝０ｘ０ｄ）＆＆！ｆｅｏｆ（ｆｐ））｛／＊依次找其它字段名＊／
ｉ＝ｉ＋１；
ｆｓｅｅｋ（ｆｐ，１５Ｌ，１）；／＊找第一个字节，看是否为０ｘ０Ｄ，因为０Ｄ是字段名与各记录之间的分界标志＊／
ｓ＝ｆｇｅｔｃ（ｆｐ）；
ｆｓｅｅｋ（ｆｐ，－１Ｌ，１）；／＊返回到第一个字节＊／
ｉｆ（ｓ！＝０ｘ０Ｄ）｛
ｆｇｅｔｓ（ｚｄｍ［ｉ］，１１，ｆｐ）；／＊读字段名并赋值给数组＊／
ｆｓｅｅｋ（ｆｐ，６Ｌ，１）；／＊找这个字段的长度＊／
ｚｄｃ［ｉ］＝ｆｇｅｔｃ（ｆｐ）＋１；／＊将长度赋值给数组＊／｝｝
ｆｏｒ（ｊ＝１，ｊ＜ｉ；ｊ＋＋）；／＊计数器计数，以便控制＊／｝
ｆｆｌｕｓｈ（ｆｐ）；／＊以下显示字段及记录的内容＊／
ｉ＝１；
｛ｉｆ（ｂｂｈ＝＝０ｘ０３） ｆｓｅｅｋ（ｆｐ，１ｌ，１）；／＊如果ｂｂｈ是０３，那么这个库是Ｆｏｘｂａｓｅ数据库，指针从当前位置向后移动１位＊／
ｅｌｓｅ ｆｓｅｅｋ（ｆｐ，２５４ｌ，１）；／＊如果ｂｂｈ是３０，那么这个库为Ｆｏｘｐｒｏ ｆｏｒ Ｗｉｎｄｏｗｓ数据库，指针从当前位置向后移动２５４位＊／｝
ｗｈｉｌｅ（！ｆｅｏｆ（ｆｐ）＆＆（ｆｇｅｔｃ（ｆｐ）！＝０ｘ１Ａ））｛／＊１Ａ是数据库的记录结束标志，应令指针到此停止，以免显示出无用的信息来＊／
ｃｈａｒ ｇ；
ｉ＝１；
ｐｒｉｎｔｆ（＂记录号：％ｄ＼ｎ＝＝＝＝＝＼ｎ＂，ｌ）；
ｗｈｉｌｅ（ｉ＜ｊ）｛
ｆｇｅｔｓ（ｊｌ，（ｉｎｔ）ｚｄｃ［ｉ］，ｆｐ）；／＊注意文件指示器的位置在本字串的下一位置＊／
ｐｒｉｎｔｆ（＂％－１２ｓ＝％ｓ＼ｎ＂，ｚｄｍ［ｉ］，ｊｌ）；／＊字段名长度取１２个字符宽，并以右空格补齐，使屏幕更加清晰＊／
ｉ＝ｉ＋＋；｝
ｐｒｉｎｔｆ（＂＼ｎ＼ｎ回车＝＞继续显示，ＥＳＣ退出……＂）；
ｗｈｉｌｅ（ｂｉｏｓｋｅｙ（１）！＝０） ｂｉｏｓｋｅｙ（０）；／＊清除键盘缓冲区内容＊／
ｇ＝ｂｉｏｓｋｅｙ（０）；／＊读键盘Ｓ是ｉｎｔ＊／
ｉｆ（ｇ＝＝０ｘ１ｂ） ｅｘｉｔ（０）；
ｐｒｉｎｔｆ（＂＼ｎ＼ｎ＂）；
ｌ＝ｌ＋＋；｝
ｆｃｌｏｓｅ（ｆｐ）；｝
以上程序用Ｔｕｒｂｏ Ｃ ２．０编译通过，在３８６以上机器上运行无误。