Win7下Excel不能导入Access的问题

软件在xp下Excel能正常导入Access中
但在WIN7下一直提示：不可识别的数据库格式 "E:\test.xls"
Win7下安装的是Excel2003(典型安装)非绿色或是GHost版
程序片段:      conExcel.ConnectionString := 'Provider=Microsoft.Jet.OLEDB.4.0;Data Source=' +
      FilePath + ';Extended Properties=Excel 8.0;Persist Security info=False';
      conExcel.Open;//这里直接就异常报错了通过度娘知道还有其他的方式导入例如：
摘自：http://club.excelhome.net/thread-408936-1-1.html用 Microsoft OLE DB Provider for ODBC Drivers
ODBC 驱动程序的提供程序（本文为简便起见将其称为“ODBC 提供程序”）也只需要两条信息就可以连接到 Excel 数据源：驱动程序名，以及工作簿的路径和文件名。
使用没有 DSN 的连接字符串的 ODBC 提供程序 
Dim cn as ADODB.Connection
Set cn = New ADODB.Connection
With cn
.Provider = "MSDASQL"
.ConnectionString = "Driver={Microsoft Excel Driver (*.xls)};" & _
"DBQ=C:\MyFolder\MyWorkbook.xls; ReadOnly=False;"
.Open
End With然后自己修改的    conExcel.ConnectionString := 'Provider=ODBC' +
    ';Driver={Microsoft Excel Driver (*.xls)};DSN='''';DBQ='+FileName+';ReadOnly=False;';
    conExcel.Open;//能够打开，但是没法获取到数据。
    TableList := TStringList.Create;
    conExcel.GetTableNames(TableList);
    if TableList.Count = 0 then Exit;//TableList.Count一直是0个人怀疑ODBC的方式可能是字符串的问题。
有没有其他的方式导入，或是在WIN7有什么特殊的要求，请有经验的给指点下。
（不要一个个读取然后再插入数据库的方式，这种方式太慢了。）
分数不是问题