if not ADOQuery1.Recordset.EOF and not ADOQuery1.Recordset.bOF then
Application.MessageBox('登陆成功!','提示信息',mb_ok)
else
Application.MessageBox('您输入的用户名或密码错误,请检查!','提示信息',mb_ok);
部分源码如上,为什么执行完else以后的语句,又会提示,“当前记录已经删除...”等等。我的本意是找不到记录的话就提示一下。本人初学,谢谢!!!
Application.MessageBox('登陆成功!','提示信息',mb_ok)
else
Application.MessageBox('您输入的用户名或密码错误,请检查!','提示信息',mb_ok);
部分源码如上,为什么执行完else以后的语句,又会提示,“当前记录已经删除...”等等。我的本意是找不到记录的话就提示一下。本人初学,谢谢!!!
解决方案 »
- Delphi 调用ShellExecuteEx 打开外部文件时会卡住,具体代码见内
- 内核编程群20264887,感兴趣可以加入(想进来问个问题就走的免入,谢谢).
- 求助,向各位大哥请教 sql server 2000 的时间格式处理
- 大家帮我看看我和这个女孩子还有戏没?说得好我把分都给你……
- 如何将string 类型转换为pchar类型?
- 谁知道WIN2000下QQ运行机制!
- 我做了一个小软件,怎么样设置可以使得有的模块启动慢时,鼠标变为砂漏??
- 请问如何在delphi程序中为一个mdb文件设置密码?
- 轻松咖啡:程序员的....很想知道
- 存储过程在返回纪录集的同时能否返回一些参数,如果可以该怎么做?
- query.moveby(2)后,为什么读不出当前记录的字段值?!
- 简单的数据库操作,可能逻辑有问题?
begin
Application.MessageBox('您输入的用户名或密码错误,请检查!','提示信息',mb_ok);
exit;
end;
if not adoquery1.isempty then
就行了。楼主的错的原因是。and 两边要用 () and ()
if not ( ADOQuery1.Eof ) and (ADOQuery1.Bof) then
not a and not b等价于
(not a)and (not b)
不知道我是不是误解了Open2ye大侠的意思,呵呵
Application.MessageBox('登陆成功!','提示信息',mb_ok)
else
Application.MessageBox('您输入的用户名或密码错误,请检查!','提示信息',mb_ok);
sql用select count(*) as aaa from mytable
用adoquery1.fieldbyname('aaa').as integer取得记录数,再判断