我在AP端CREATE 一個VIEW之後 連結CLIENT端的一個QUERY 而我程式內 ，因應我要多少個TABLE 及相關的條件 動態產生TABLE 我要如何在程式內RUNTIME 用SQL語法，將這一個QUERY內的資料， 根據條件分到其它動態TABLE

Duplicated !! 

------
Fishman

Hi seedbcc,    資料表不存在時：

Create table NewTable as select * from OldTable where ....

資料表存在時：

Insert into NewTable 
       (Field1,
        Field2,
        Field3,
        ...)
select
        Field2,
        Field,
        Field3,
        ...
from    OldTable
where   .....    or
欄位型態、大小、數量、順序一致時可簡化為
insert into NewTable 
select  *
from    OldTable

發表人 -

------
Fishman

請教您給的方法 是可以寫在程式中嗎 還是sql語法內

Hi seedbcc,    Add them in SQL Command & use ExecSQL to execute them. ---------------------------------- 小弟才疏學淺，若有謬誤尚請不吝指教 ----------------------------------

------
Fishman

我是要把從ap端傳給來的table 在程式中使用sql語法 分給 用動態產生的table或是query??

Hi seedbcc,    那這樣呢？

procedure TForm1.Button1Click(Sender: TObject);
var
  DataSet : TDataSet;
begin
  ClientDataSet1.Close;
  ClientDataSet1.CreateDataSet;
  ClientDataSet2.Close;
  ClientDataSet2.CreateDataSet;
  ClientDataSet3.Close;
  ClientDataSet3.CreateDataSet;
  ClientDataSet4.Close;
  ClientDataSet4.CreateDataSet;
  Table1.First;
  while not Table1.Eof do
    begin
      case Table1.FieldByName('xxx').AsInteger of
        1 : DataSet := ClientDataSet1;
        2 : DataSet := ClientDataSet2;
        3 : DataSet := ClientDataSet3;
        4 : DataSet := ClientDataSet4;
        .....
        else
          DataSet := NIL;
        end;
    end;
    if DataSet <> NIL then
      begin
        with DataSet do
          begin
            Append;
            FieldByName('Field1').Value := Table1.FieldByName('Field1').Value;
            .....
            Post;
          end;
      end;
end;

< >< > ---------------------------------- 小弟才疏學淺，若有謬誤尚請不吝指教 ----------------------------------

------
Fishman

無法用sql語法分給各別的動態query或table嗎?