[求助]毕业设计遇到的小问题(四)
额,总算是做完,最后一个问题了,我的查询这里出了问题,
我用的grid控件,把查询结果显示在这个控件中,单独执行这个表单查询的数据能正常返回,但是连编后执行就不行了,查询返回为空白,我想可能是没有关闭数据表的原因,但是我这些数据表只有单一的grid控件调用,没有其他调用
这是进入这个可查询界面前的最后一个按钮的代码,在主程序中用的是Pageframe控件。
hide window screen &&隐藏vf主窗口
*判断密码是否正确
i=i-1
locate all for alltrim(thisform.text1.value)==alltrim(yonghu.用户名)
DO CASE
CASE i>=1 and found() and alltrim(thisform.text2.value)==alltrim(yonghu.密码)
use
Do form .\main\cxzjm.scx &&调用程序主界面
thisform.release
CASE i>0 AND NOT FOUND()
MESSAGEBOX("密码错误,请重输!","警告")
THISFORM.Text1.Value=""
THISFORM.Text2.Value=""
CASE i=0
MESSAGEBOX("禁止进入系统!","警告")
THISFORM.Release
quit
ENDCASE
[此贴子已经被作者于2007-4-20 13:33:34编辑过]