【聚杰网数据库编程】恢复丢失了的FPT文件

---

用户在进行vfp6.0数据库操作时，由于操作不慎，可能将含有备注型字段或通用型字段的某自由表的.fpt文件丢失，只保留了.dbf文件，由于.fpt文件是用于存放备注型字段或通用型字段数据的，自由表一旦丢失了.fpt文件，用户就不能打开该自由表，更谈不上对该自由表进行操作，能否打开此自由表，对表中其余字段的数据进行操作，是许多用户所关心的问题。本人在教学实践中找到了下述方法，可立即解决这个问题。
１.用create命令临时创建一个库文件，只需定义一个字段，且类型设为memo，不必输入任何记录，关闭文件后，再将其备注文件改名或复制成已丢失的备注文件，就可立即打开该自由表。
２.利用vfp6.0的低级文件操作直接修复丢失了的.fpt文件，为方便用户操作，作者用vfp6.0编写了一段通用程序，用户运行此程序修复自由表时，只要根据提示输入丢失了.fpt文件的自由表的表名（不带扩展名）即可。
程序清单如下：
accept 请输入丢失了.fpt文件的自由表的名称（不带扩展名）： to namef
namef=allt(namef)+.fpt
hand=fcreate(namef)
abc=repl(chr(0),3)+chr(8)+repl(chr(0),3)+@+repl(chr(0),504)
=fwrite(hand,abc)
=fclose(hand)
return
以上方法已在vfp5.0、vfp6.0上通过，在foxprow中也同样适用。