我想问一个关于VFP数据库的问题,下面一段事件中有两处错误,请帮忙看看哈。

来源:百度知道 编辑:UC知道 时间:2024/07/04 07:25:31
&&功能:如果用户输入的用户名和口令一致,则在提示信息后关闭该表单;
&&否则重新输入用户名和口令。
&&**********Error**********************
if thisform.text1 =thisform.text2
wait "欢迎使用……" window timeout 1
&&**********Error**********************
thisform.close
else
wait "用户名或口令不对,请重新输入……" window timeout 1
endif

看了一下你的程序 想问一下 你的text1 和text2 里分别存储什么信息的,如果你的用户信息是在程序里设立的并且是固定的,那么你的信息是否都在text1 中 就是说你的text1中是否有用户名和密码 如果是这样的话 那么把语句改成if alltrim(thisform.text1.value) =alltrim(thisform.text2 .value)

thisform.close 改成thisform.release

如果你的用户名和密码在表里存储就没这个简单了
那就要 假设你的用户信息在表yh.dbf中(将combo1绑定用户名字段并且去掉combo的text属性 也就是让他只可选不可自行输入)
select yh
locate for alltrim(thisform.combo1.value)==alltrim(yh.yhm)
if alltrim(thisform.text2.value)==alltrim(yh.mm)
messagebox("输入的密码正确!",0+64,"哈哈")

else
messagebox("输入的密码有误!",0+64,"哈哈")

endif
还不懂的话给我短信好了

&&**********Error**********************
if thisform.text1=username and thisform.text2=password
wait "欢迎使用……" window timeout 1
&&**********Error**********************
thisform.release
else
wait "用户名或口令不对,请重新输入……" window timeout 1
endif