数据库查询(0分)

L

landylcq

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2003-04-02

• #1

怎样设计一个用户登入，就是说该用户必须是数据库中要存在的。
if ((dbedit1.text<>edit1.Text)or(dbedit2.text<>edit2.Text))
then
showmessage('对不起!该用户不存在')
else
showmessage('谢谢')

这个语句 好象不行 只能对当前的记录有效

 

春

春意

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2003-04-02

• #2

with ADOQuery1 do
begin
Close;
SQL.Clear;
SQL.Add('select * from 数据库');
Open;
if Not FieldValues['xm'] = Edit1.Text then
begin
ShowMessage('记得下次提问题要加分！');
Exit;
end;
Close;
end;

 

L

landylcq

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2003-04-02

• #3

谢谢 春意
但是运行时候会有提示错误

 

L

landylcq

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2003-04-02

• #4

运行时 会提示 microsoft jet数据库引擎找不到输入表 等等
是什么原因呢

 

M

merlinfang

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2003-04-02

• #5

我改改
with ADOQuery1 do
begin
Close;
SQL.Clear;
SQL.Add('select * from 数据库');
Open;
if (FieldValues['xm'] <> Edit1.Text)or(..) then
begin
ShowMessage('记得下次提问题要加分！');
Exit;
end;
Close;
end;