ACCESS导出为TEXT的方法有哪些???急(100分)

  • 主题发起人 主题发起人 redlegend_126_c
  • 开始时间 开始时间
R

redlegend_126_c

Unregistered / Unconfirmed
GUEST, unregistred user!
我知道TEXT 导入到ACCESS比较快的方法是用SQL
那如何从ACCESS中导出为TEXT呢?并且可以自己设置导出的文本格式!!
 
你的问题中也有你的答案了.
 
uses ComObj;

//db: 数据库名称(完整路径);tbl: 表名;bak: 备份文件名称(完整路径);
//pwd: 数据库密码(可选,没有密码可以不管)
procedure BackupMDB(const db, tbl, bak: WideString; const pwd: WideString = '');
var
ac: OleVariant;
begin
ac := CreateOleObject('Access.Application');
try
ac.OpenCurrentDatabase(db, False, pwd);
ac.DoCmd.TransferText(2, Null, tbl, bak, True);
finally
if not VarIsEmpty(ac) then
begin
ac.Quit;
ac := Unassigned;
end;
end;
end;
 
后退
顶部