一个小小问题，大家来指点一下

[cdsun]

我用ADO连接数据库成功，并且成功的写入了

但是会出现这样的一个错误ADOQuery1:CommendText dose not return a result set
请问这是为什么。这是什么错。

谢谢了

[WWWWA]

adoquery1.ExecSQL;不能用OPEN

[cdsun]

具体怎么说呢？

楼上的能不能详细指点一下
代码是这样的
procedure TForm1.Button1Click(Sender: TObject);
begin
if Edit1.Text='' then
begin
showmessage('请先输入姓名在提交');
exit;
end;
if Edit2.Text='' then
begin
showmessage('请先输入性别在提交');
exit;
end;
if Edit3.Text='' then
begin
showmessage('电话是必填项');
exit;
end;
if Edit4.Text='' then
begin
showmessage('地址是必填项');
exit;
end;
if Memo1.Text='' then
begin
showmessage('请先简单介绍一下自己吧？');
exit;
end;
adoquery1.close;
adoquery1.sql.clear;
adoquery1.sql.text:='insert into delphi (name,sex,tel,address,memo1) values ("'+edit1.Text+'","'+edit2.Text+'","'+edit3.Text+'","'+edit4.Text+'","'+Memo1.Text+'")';
adoquery1.open;
end;

[lion_lh]

你的ADOQuery1的CommendText没有返回结果集
执行插入或删除修改是没有结果集返回的，不要用open；用ExecSQL
执行select 就用open

[WWWWA]

adoquery1.open;改为adoquery1.ExecSQL

[lion_lh]

adoquery1.close;
adoquery1.sql.clear;
adoquery1.sql.text:='insert into delphi (name,sex,tel,address,memo1) values ("'+edit1.Text+'","'+edit2.Text+'","'+edit3.Text+'","'+edit4.Text+'","'+Memo1.Text+'")';
adoquery1.ExecSQL;

[cdsun]

谢谢各位了

能不能在帮小弟一个忙

我想做一个查询，还是数据库access的
我添加了一个adoconnection\adoquery\dbgrid
请问怎么才能让dbgrid和adoquery联系起来
也就是说让adoquery查询出来的数据在dbgrid里面显示

或者还有其它的办法，大家给出点注意

[WWWWA]

加入DATASOURCE，DATASET=ADOQUERY1，DBGRID1的DATASOURCE：＝DATASOURCE1

[cdsun]

我加入了

可是搜索数据库里面已经有的数据就是没有搜索出来阿

这是怎么搞得

[cdsun]

我的代码是这样的
procedure TForm2.Button1Click(Sender: TObject);
begin
adoquery1.close;
adoquery1.sql.clear;
adoquery1.sql.text:='select * from delphi where name='''+edit1.text+'''';
adoquery1.open;
end;
请问这样有没有问题呢

[flounder45123]

在使用ADOQuery时，进行update等操作时，要用ADOQuery1.ExecSQL语句来提交，而不能用ADOQuery1.open

[cdsun]

我改了阿
可是仍然没有数据出来，这是怎么会是

[fhuibo]

Good 没有问题

[cdsun]

谢谢大家了
我都解决了
结账了