程序:(用了ADOTable1,excel表。)
procedure TForm1.Button1Click(Sender: TObject);
begin
With ADOQuery1 do
begin
Close;
SQL.Clear;
SQL.Add('select sum(上期结算数量) as tot from 库存业务汇总表 ');
Edit1.Text:=tot;
open;
end;
end;
出错:
missing connection or connectionString
(tot:string;在前定义过)
procedure TForm1.Button1Click(Sender: TObject);
begin
With ADOQuery1 do
begin
Close;
SQL.Clear;
SQL.Add('select sum(上期结算数量) as tot from 库存业务汇总表 ');
Edit1.Text:=tot;
open;
end;
end;
出错:
missing connection or connectionString
(tot:string;在前定义过)
With ADOQuery1 do
begin
Close;
SQL.Clear;
SQL.Add('select sum(上期结算数量) as tot from 库存业务汇总表 ');
open;
Edit1.Text:=fieldByname('tot').asString;
end;
另外,你的ADOQUERY连接数据库有问题!!!
Edit1.Text:=fieldByname('tot').asString;