請問大大: 為何不能打開資料庫內所有的資料表格 for (int i = 0; i < Database1->DataSetCount; i ) { if (Database1->DataSets[i]->ClassNameIs("TTable")) DataSets[i]->Open(); }

a120803, 您好 不了解您說不能打開資料庫內所有的資料表格是什麼意思？ (1)Database1->DataSetCount;要其值大於零的話，其connection的DataSet必須是Active = true;也就是必須是open的。以下是我由help檔查出的資料，供您參考。 Indicates the number of active datasets associated with the connection component.    (2)DataSets[i]->Open();應該是Database1->DataSets[i]->Open();吧?? 由( > 還是您是要經由這個 > ================================= <>涵養怒中氣。謹防順口言。留心忙裡錯。珍惜有時錢。 <>是非終日有，不聽自然無 <>天下本無事，庸人自擾之

謝謝大大: 我是想要一次開啟所有關閉的資料表格 不知如何寫啊

a120803, 您好 請問您是使用什麼資料庫？ 我找到了一個方法或許可以符合您的需求， 不過這方法是針對MSSQL的資料庫， 如果您也是用MSSQL的資料庫， 我再將Project上傳。 至於其他的資料庫， 就要等我有時間再測試看看囉！ ================================= <>涵養怒中氣。謹防順口言。留心忙裡錯。珍惜有時錢。 <>是非終日有，不聽自然無 <>天下本無事，庸人自擾之

謝謝大大: 我是用Visual Foxpro,另外MSSQL也可以上傳給我看看

a120803, 您好 如果是用MSSQL的話 有以下兩種方法：

(1)先設定好ADOConnection1的屬性，例如：ConnectionString(用來得知您的Database)，Connected=true(確定有連結上Database)
ADOConnection1->GetTableNames(ListBox1->Items, false); // 得知這個Database有多少Table及TableName
for (int i = 0; i < ListBox1->Items->Count; i  )
   ADOConnection1->DataSets[i]->Open();    (2)一樣要先設定好ADOConnection1的屬性，將ADOQuery2的Connection屬性設為ADOConnection1，然後由以下的code查詢出這個Database有多少Table及TableName
ADOQuery2->Close();
ADOQuery2->SQL->Clear();
ADOQuery2->SQL->Text = "SELECT TABLE_NAME FROM INFORMATION_SCHEMA.TABLES ";
ADOQuery2->Open();
for (int i = 0; i < ADOQuery2->RecordCount; i  )
{
   ADOConnection1->DataSets[i]->Open();
   ADOQuery2->Next();
}

以上兩種方法都可以一次將Database裡的所有Table都做Open的動作。 因為我不懂Visual Foxpro，所以不知道是否也可以透過TADOConnection元件來連結，如果可以的話，用(1)方法就可以解決了。 如果不行，而一定要用TDatabase元件的話，可能會有麻煩。我查過TDatabase元件，好像Table一定要Open，這樣TDatabase元件才會有紀錄，不然就無法得知。 如果有前輩有這方面經驗的，請指教。 ================================= <>涵養怒中氣。謹防順口言。留心忙裡錯。珍惜有時錢。 <>是非終日有，不聽自然無 <>天下本無事，庸人自擾之