如何得到数据集:
序号 表名 纪录条数
1 A 表A记录条数
2 B 表B记录条数
3 C 表C记录条数
4 D 表D记录条数
... ... ...
... ... ...
SQL语句如何写?
...全文
3316打赏收藏
用Ado+sql server如何写SQL语句?
表1的内容为: 序号 表名 1 A 2 B 3 C 4 D ... ... ... ... 其中表A、表B、表C.....的结构相同, 如何得到数据集: 序号 表名 纪录条数 1 A 表A记录条数 2 B 表B记录条数 3 C 表C记录条数 4 D 表D记录条数 ... ... ... ... ... ... SQL语句如何写?
with adoquery1 do
begin
sql.clear;
sql.add('select 序号,表名 from 表1');
close;
open;
end;
i:=1;
while not adoquery1.eof do
begin
adoquery2.SQL.Clear;
ADOQuery2.SQL.Add('select count(*) as total from '+ADOQuery1.FieldByName('表名').Value);
stringgrid1.RowCount:=stringgrid1.RowCount+1;
stringgrid1.Cells[0,i]:=adoquery1.Fields[0].AsString;
stringgrid1.Cells[1,i]:=adoquery1.Fields[1].AsString;
建一临时表;
ADOQuery1.SQL.Add('select * from 表1');
ADOQuery1.Active ;= False;
While not ADOQuery1.Eof do
begin
ADOQuery2.SQL.Add('select count(*) as total from '+ADOQuery1.FieldByName('表名').AsString);
ADOQuery2.Active := True;
xuhao := ADOQuery1.FieldByName('序号').AsString;
biaoming := ADOQuery1.FieldByName('表名').AsString;
tiaoshu := ADOQuery2.FieldByName('total').AsString;
将结果插入临时表中;
end;
create table #T(T00 varchar(50),
T01 integer)
insert into #T(T00,T01) values (select 表名 from 表1,select count(1) from (select 表名 from 表1))
select 序号 表名 T01 from 表1 join #T on 表1.表名 = #T.T00
drop #T