excl转换access数据库

来源：百度知道 编辑：UC知道 时间：2024/05/14 04:06:17
我有一张excl表想把他转换成ACCESS的形式请问怎么作
还请留下你的EAMIL方便我以后请教，谢谢！

新建一个access，然后导入excel

这个过程在程序中的实现，以下是代码：
procedure TFShowProc.ImportExcel(sPathNameStr: String);
var
AA: OleVariant;
sTempPath,sacTableName: String;
begin
sTempPath:='c:\windows\temp\temp.mdb';
sacTableName:='Temp'
try
//创建Access Application对象，并打开Access临时数据库
AA:=CreateOleObject('Access.Application');
//如果不存在这个文件，则创建，否则，打开这个文件
if not FileExists(sTempPath)
then AA.NewCurrentDatabase(sTempPath)
else AA.OpenCurrentDatabase(sTempPath,false);
//转化成Excel2000的格式，具体可查看Access帮助
AA.DoCmd.TransferSpreadsheet(acImport,acSpreadsheetTypeExcel8,sacTableName,sPathNameStr,true,'');
AA.CloseCurrentDatabase;
except
ShowMessage('文件格式有误，转