delete 语句使用后，怎么数据显示不了呢？(50分)

L

ldaan3

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2002-08-11

• #1

procedure TForm1.Button3Click(Sender: TObject);
var
s:string;
begin
adoquery1.Close;
adoquery1.SQL.Clear;
s:='delete from an where a1=3333';
showmessage(s);
adoquery1.SQL.Add(s);
adoquery1.ExecSQL;
end;

语句执行没问题，不过执行后dbgrid里面什么数据都没有，
怎么显示啊？

 

S

smallbs

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2002-08-11

• #2

这条语句没有返回数据集，dbgrid里面当然没有数据了！
(显示数据用
adoquery1.SQL.Add（'select ....');
adoquery1.active:=true

 

L

liuxudong

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2002-08-11

• #3

你的DBGRID的DATASOURCE的DATASET连接的是不是ADOQUERY1呀，如果是 重新SELECT一些

 

L

ldaan3

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2002-08-11

• #4

to：smallbs
不行啊！
弹出框，说是错误。
to：liuxudong
这个当然是了。
各位仁兄，救命啊！

 

S

smallbs

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2002-08-11

• #5

这两条语句不能写在一起执行的

 

L

ldaan3

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2002-08-11

• #6

to : smallbs
是什么意思啊，看不太明白，直接给出procedure 好吗？

 

S

smallbs

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2002-08-11

• #7

procedure TForm1.Button1Click(Sender: TObject);
begin
adoquery1.SQL.Add('delete from an where a1=3333');
adoquery1.ExecSQL;
adoquery1.SQL.clear;
adoquery1.SQL.Add（'select * from an');
adoquery1.active:=true;
end;