每樣事物都會有自己的薄弱環節，當然VFP也不例外。在VFP中有一個十分薄弱的環節就是數據庫的保密性差。由於.DBF文件都是敞開式的，甚至用DOS中最簡單的TYPE命令都可以瀏覽，因此，小編從以下兩方面對數據進行加密：
1、在向自由表中增加數據時，就進行加密，即更新自由表時就對數據進行加密，在讀取數據時再解密。
2、用VFP提供的低級文件函數進行加密，加密後的文件無法打開、瀏覽，使用時，再執行該加密程序即可將加密的自由表還原。
＊＊加密數據庫程序（同時也是解密程序）＊＊
set talk off
close all
clea
@10,10 say ″請輸入要加密的自由表名(含擴展名):″ get file1 defa ′ ′
read
handle=fopen(″＆file1″,2)
if handle<0
@14,10 say ″不能打開文件!″
=inkey(0)
retu
endif
j=0
do while .not.feof(handle)
bb=fread(handle,1)
cc=chr(mod(asc(bb)＋128,256))
=fseek(handle,j)
=fwrite(handle,cc)
?asc(bb),asc(cc)
j=j＋1
enddo
=fclose(handle)
close all
return
還有更多數據庫教程知識可登陸e良師益友網。