Tabel的名字后加$号,如Sheet1$。不过,我想你不是找不到TABEL,
正确的方法是:放一个ADOCONNECTION,
设置connectString := "Provider=Microsoft.Jet.OLEDB.4.0;
User ID=Admin;Data Source=F:/B1.xls;
Mode=Share Deny None;Extended Properties=excel 8.0;
Jet OLEDB:System database="";Jet OLEDB:Registry Path="";
Jet OLEDB
atabase Password="";Jet OLEDB:Engine Type=35;
Jet OLEDB
atabase Locking Mode=0;Jet OLEDB:Global Partial Bulk Ops=2;
Jet OLEDB:Global Bulk Transactions=1;Jet OLEDB:New Database Password="";
Jet OLEDB:Create System Database=False;Jet OLEDB:Encrypt Database=False;
Jet OLEDB
on't Copy Locale on Compact=False;
Jet OLEDB:Compact Without Replica Repair=False;Jet OLEDB:SFP=False "
就行了,用QUERY或TABLE都连接得上。其实只要设一个扩展属性就行了,
我想我可能说不清楚,所以把ConnectString给你,反正这样也行。
如果你不怕累,自己试试看。