EXCEL 向delphi 数据库　导入数据(50分)

本人想接一个小单，但对方提出要用
EXCEL 向delphi５．０ 数据库Paradox７导入数据,请各请相HELP,谢谢！

可以采用文本文件作为中转
procedure ExcelSheetSaveAsTextFile(ExcelFile, TextFile: string; SheetName: string);
var
ExcelApp: Variant;
begin
ExcelApp := CreateOleObject('Excel.Application');
ExcelApp.Visible := False;
ExcelApp.DisplayAlerts := False;
try
ExcelApp.WorkBooks.Open(ExcelFile);
if SheetName <> '' then
ExcelApp.ActiveWorkBook.Sheets[SheetName].Select;
ExcelApp.ActiveSheet.SaveAs(TextFile, xlText);
finally
ExcelApp.ActiveWorkBook.Saved := True;
ExcelApp.WorkBooks.Close;
ExcelApp.Quit;
ExcelApp := Unassigned;
end;
end;

由于我较忙，故直到现在才和你交流，希望大家再给我些提示。

读一格，写一字段，可惜我也比较忙。。。

你可以参照PL/SQL中的导入功能，

我试了一下，发现主要是数据类型不同，EXCEL的格式，DELPHI5.0没有。总是出错。

非也，你自己用对象的方式去处理，只要对了Execl的版本，就没问题。
这年头居然还有人用Delphi5.0。。。

多人接受答案了。