关于导入的构想，却．．．．．．(50分)

想在前台实现一个可以让用户选择Excel表，然后导入数据库中相应表的功能
：
我用一个OpenDialog来确定我想打开哪一个Excel表

用如此语句却：
procedure TForm1.Button1Click(Sender: TObject);
var fName:variant;

begin
ExApp:=CreateOleObject('Excel.Application');
Exapp.visible:=true;
ExWB:=ExApp.WorkBooks.Open(fName);
ExSheet:=ExWB.ActiveSheet;
showmessage(ExSheet.Cells[1,1].value);//
ExWB.close;
Exapp.quit;


ExSheet:=unassigned;
ExWB:=unassigned;
ExApp:=unassigned;

显示出了一个Excel空白窗口

如果我在这个Excel窗口中打开了我想选择导入的表
我要如何在Delphi又实现将他导入固定的库呢？
我这个打开的Excel表如何和我的Delphi前台连接诶呢？

＊＊其实我是想实现：：：选择一个Excel表，然后确定一个ADOTable和他连接，
然后用RadioGroup确定一个数据库里的表，用这类语句直接将他的每一列和每一行的数据都导入数据库相应被选择的表中
For i:=0 adptable1.fieldcount-1 do
adotable2.field.value:=adotable1.field.value

我不知道该如何去实现了
请高手门教一下吧！！！！！！！！！

用ADOTable可以和Excel表相连，你查一下以前的贴子吧，有详细的叙述。

我已经详细查看过了
但是和我的情况的都不太符合
我不明白，我这样打开了ExceL表以后，怎么拉执行Table？
他如何．．．．．．

大概过程如下：
1。在窗体上放一个TADOTable组件，双击它的ConnectionString属性，然后选择使用
Microsoft Jet 4.0 OLER DB Provider驱动程序
2。该驱动程序一般是连接ACCESS数据库，但在此选择EXCEL文件。
3。在“数据库连接属性”对话框中，单击“所有”选项卡，双击“Extended Properties“
属性，输入其值”EXCEL 8.0“（这一步是关键）
4。测试连接成功。
5。点击TADOTable组件，在Object Inspector中选择TableName属性，在下拉列表中选择第一个
表，
6。双击ACTIVE属性。注意在这种情况下EXCEL文件是以独占方式打开的
其它的就不用我说了吧 。^_^ good luck

micro73：
　　我知道你的哪一种方法
但是我导入的Excel表是动态的，是不定的，是任意的
仿佛用你的哪种静态的连接方法就行不通了．

其实你只要稍微改变一下就可以作为动态的使用了，你说是吗？

接受答案了.