前几天有一位会员提出要一个简单的登录的界面代码，我提供一个，这时又想起一直困惑我的问题，就是存放用户名和密码的DBF文件数据的安全，因为会VFP的人可以轻松打开该文件，所以我想请大家帮我举例说明如何给数据加密，用算法就可以，不要用专用软件，因为算法我认为更安全。以下是我写的一段登录代码，用的是一个mima.dbf中存有用户名和密码，然后比较文本框中的数据，从而验证登录。

i=i+1
SELECT mima
LOCATE FOR mima.username=THISFORM.combo1.Value
DO CASE
CASE i<=3 AND FOUND() AND THISFORM.text1.Value=mima.password &&输入次数未超过3次且用户名正确、口令正确
operat=THISFORM.combo1.Value
INSERT INTO login(user_id,user_name,login_time) VALUES(mima.user_id,mima.user_name,DATETIME())
messagebox("正在登陆系统!",0+48+0,"登陆!")
thisform.release
do c:\gz\menu\menu.mpr
CASE i<=3 AND FOUND() AND THISFORM.text1.Value!=mima.password &&输入次数未超过3次且用户名正确、口令不正确
MESSAGEBOX("你输入的密码有误,请重新输入!","系统提示信息")
THISFORM.Text1.Value=""
THISFORM.Text1.Setfocus
CASE i<=3 AND NOT FOUND() &&输入次数未超过3次且用户名不正确
MESSAGEBOX("操作员选择有误,请重新输入!","系统提示信息")
THISFORM.combo1.Value=""
THISFORM.Text1.Value=""
THISFORM.combo1.Setfocus
CASE i>3 &&输入次数超过3次
MESSAGEBOX("您是非法用户，本系统将自动退出!","系统提示信息")
quit
ENDCASE