我做了一个登陆窗口,是用表里的数据来验证登陆,一直在循环,请帮忙看一下哪里错了
set talk off
close all
use 注册
do while not eof()
if thisform.text1.text=账户 and thisform.text2.text=密码 then
do form 主窗口.scx
skip
else
num=0
num=num+1
if num<=3 then
messagebox("你输入的账户或密码错误",65,"错误提示")
thisform.text1.value=""
thisform.text2.value=""
thisform.refresh
else
messagebox("登录失败!")
release thisform
endif
endif
enddo
thisform.release
use
set talk on
总是在不停的循环,机都卡死

[[it] 本帖最后由 LIANG5505 于 2008-9-25 14:57 编辑 [/it]]

我把这一段删了,还是一样死循环,一直弹出对话框
messagebox("你输入的账户或密码错误",65,"错误提示")

代码换成这个,还是死循环,一直出来对话框
set talk off
close all
use 注册
do while not eof()
if thisform.text1.text=账户 and thisform.text2.text=密码 then
do form 主窗口.scx
skip
else

messagebox("你输入的账户或密码错误",65,"错误提示")
 thisform.text1.value=""
thisform.text2.value=""
thisform.refresh

endif
enddo
thisform.release
use
set talk on

我想请问一下,我能登陆进去了,do form 主窗口.scx ,为什么还会有else 后面的对话框弹出.
这是什么问题,谢谢你们几个版主,呵呵

看到版主写的程序真的是很清淅啊,谢谢指教