如何把数据写入dbf文件中?
dbf文件已经动态创建了,如下:
DM->Table1->Active = false; DM->Table1->TableType = ttFoxPro; DM->Table1->TableName = "d:\\jicai\\test.dbf"; DM->Table1->FieldDefs->Clear(); DM->Table1->FieldDefs->Add("测试字段1",ftString,13,false); DM->Table1->FieldDefs->Add("测试字段2",ftString,13,false); DM->Table1->CreateTable();
DM->ADOQ_Test->Close(); DM->ADOQ_Test->SQL->Clear(); DM->ADOQ_Test->SQL->Add("insert into test(测试字段1,测试字段2) select 测试字段1,测试字段2 from source_table"); DM->ADOQ_Test->ExecSQL();
Provider=MSDASQL.1;Mode=ReadWrite;Extended Properties="Driver={Microsoft Visual Foxpro Driver};UID=;PWD=;SourceDB=d:\\jicai;SourceType=DBF;Exclusive=No;BackgroundFetch=Yes;Collate=;"