这段代码的错误是什么?怎么改?
with ADOQuery1 do
begin
Active:=false;
ConnectionString:='Provider=Microsoft.Jet.OLEDB.4.0;Data Source=C:\My Documents\tongji.mdb;Persist Security Info=False';
with SQl do
begin
Clear; Add('INSERT INTO jieyue(A,B)');
Add('VALUES(:Bid,:Bname)');
end; Active:=true;
end;错误提示:
Current provider does not support returining multiple recordsets from a single executionadoquery1: CommandText does not return a result set怎么改?
with ADOQuery1 do
begin
Active:=false;
ConnectionString:='Provider=Microsoft.Jet.OLEDB.4.0;Data Source=C:\My Documents\tongji.mdb;Persist Security Info=False';
with SQl do
begin
Clear; Add('INSERT INTO jieyue(A,B)');
Add('VALUES(:Bid,:Bname)');
end; Active:=true;
end;错误提示:
Current provider does not support returining multiple recordsets from a single executionadoquery1: CommandText does not return a result set怎么改?
begin
Close;
ConnectionString:='Provider=Microsoft.Jet.OLEDB.4.0;Data Source=C:\My Documents\tongji.mdb;Persist Security Info=False';
SQL.Clear; SQL.Add('INSERT INTO jieyue(A,B)');
SQL.Add('VALUES(:Bid,:Bname)');
Parameters[0].value:=xxx;
Parameters[1].Value:=yyy;
Open;
end;
你的问题是参数未附值!
>>>原因是open换成execsql吧
parambyname('bid').value:=edit1.text;
parambyname('bname').value:=edit2.text;
SQL.Add('VALUES(:Bid,:Bname)');
并不能自动产生产生参数
,而是需要程序中创建.