procedure TForm1.Button3Click(Sender: TObject);
var
str:string;
begin
str := 'select * from sell';
AdoQuery1.Sql.Add(str);
AdoQuery1.open;end;end.
报错为“[Microsoft][ODBC Microsoft Access driver]FROM子句语法错误。”
没觉得有错啊
var
str:string;
begin
str := 'select * from sell';
AdoQuery1.Sql.Add(str);
AdoQuery1.open;end;end.
报错为“[Microsoft][ODBC Microsoft Access driver]FROM子句语法错误。”
没觉得有错啊
var
str:string;
begin
str := 'select * from sell';
AdoQuery1.Close;//加上这句
AdoQuery1.Sql.Add(str);
AdoQuery1.open;end;end.
//你在连接数据库的时候选对了吗?
//Access和Sqlserver等需要的数据库驱动都是不同的//为了使代码保险,该一下你的代码
procedure TForm1.Button3Click(Sender: TObject);
var
str:string;
begin
str := 'select * from sell';
AdoQuery1.Close;//加上这句
AdoQuery1.Clear;//再加上这句
AdoQuery1.Sql.Add(str);
AdoQuery1.open;end;end.
指的是DATASOURSE吗 没选
你说的加那句 不是那个问题
编译报错后Dephli就要死了
加上这句 报错没定义“Clear”
ADOConnection1的ConnectionString是设置为你要连接的数据名等属性.
var
str:string;
begin
str := 'select * from sell';
AdoQuery1.Close;//加上这句
AdoQuery1.sql.Clear;//再加上这句
AdoQuery1.Sql.text:=str;
AdoQuery1.open;end;
AdoQuery1.Close;
AdoQuery1.sql.Clear;
AdoQuery1.Sql.Add('select seller from sell where productNO=''' + str + '''');
AdoQuery1.open;为什么我执行上面程序后 TDBGrid 上的内容没有变啊
跟踪执行了上面的程序了的
var
str:string;
begin
AdoQuery1.close;
AdoQuery1.sql.clear;
str := 'select * from sell';
AdoQuery1.Sql.Add(str);
AdoQuery1.open;end;
begin
ADOQuery1.Connection:=ADOConnection1;
DataSource1.DataSet:=ADOQuery1;
AdoQuery1.close;
ADOQuery1.SQL.Clear;
AdoQuery1.Sql.Add( 'select * from sell');
AdoQuery1.open;
end;