BCB 创建ACCESS数据库表时出现记录过大的问题
有这样几句代码:
CreateAccessDB(fileName) ; TStringList*slt = GetModelStringList(); AnsiString creatStr = "("; for(int i=0;i<slt->Count;i++) { if(i != slt->Count-1) { creatStr += slt->Strings[i] + " Varchar(100)," ; } else { creatStr += slt->Strings[i] + " Varchar(100))" ; } } ADOQuery3->Close(); ADOQuery3->SQL->Text = "create table " + modelName +creatStr ; try{ADOQuery3->ExecSQL();} catch(...){Application->MessageBoxA("创建模板失败","提示");return;}
CREATE TABLE 图书(title Varchar(100),creator Varchar(100),subject Varchar(100),description Varchar(100),publisher Varchar(100),contributor Varchar(100),pubdate Varchar(100),format Varchar(100),identifier Varchar(100),source Varchar(100),language Varchar(100),relation Varchar(100),coverage Varchar(100),rights Varchar(100),txts Varchar(100),files Varchar(100),videos Varchar(100),pics Varchar(100))