如何取得Access 的數據表結構呢(100分)

  • 主题发起人 主题发起人 goddy
  • 开始时间 开始时间
G

goddy

Unregistered / Unconfirmed
GUEST, unregistred user!
如何取得Access 的數據表結構呢
 
我这有个生成器,你要吗?
 
要啊,能講一下原理嗎,我也想寫一個啊
 
我是下栽的,我不知道原理,我想无非是连接数据库,找到系统表,生成SQL的问题了。在
ORACLE下我会,别的数据库我就不知道了。
 
先用TADOConntion.GetTableNames取的全部表名
然后用TADOTable逐个打开表,TADOTable.FieldDefs为表结构
 
//取全部表名
var
tablename:TStrings;
begin
tablename:=TStringList.Create;
ADOConnection.GetTableNames(tablename,false);
end;
//取的每个表的表结构
for i:=0 to adotable1.FieldCount-1 do
begin
listbox1.Items.Append(Fields.FieldName);
listbox2.Items.Append(inttostr(Fields.DataSize-1));
listbox3.Items.Append(Fields.DataType);
end;
 
最笨的方法:
with query1 do
begin
close;
sql.clear;
sql.add('select * into newtable from oldtable');
prepare;
execsql;
close;
sql.clear;
sql.add('delect from newtable');
prepare;
execsql;
end;
 
你可以使用MICROSOFT提供的ADOX(ActiveX(R) Data Objects Extensions),它提供了对数据库结构信息进行查询和创建的功能,
尤其对ACCESS和SQL SERVER数据库有很好的支持,可在李维的《DELPHI5.X ADO/MTS/COM+高级程序设计》中找到相关sample,
MSDN上也有VB的sample
 
接受答案了.
 
后退
顶部