Excel to Access

Question

(1)excel 2000 ,用ADO打开。private Const Provider = "Microsoft.Jet.OLEDB.4.0"
private Const ExtendedProperties = "Excel 8.0"    DBCn_xls.Provider = Provider
    DBCn_xls.Properties("Extended Properties") = ExtendedProperties
    DBCn_xls.Properties("Data Source") = sSaveAsFile
    DBCn_xls.Open
    
    Set DBRs_xls = DBCn_xls.Execute("Select * from `sheet1` ")然后应该知道怎么办了吧。

Answer 1

TO:fling_boy(andy__天意)但如果不是office 2000呢？单通过一个文件名我们是无法判断到底是Excel 97 还是2000或是XP，这种情况  private Const ExtendedProperties = "Excel 8.0"  如何是好？

Answer 2

我试了，出现下面的错误信息：
Run-time error '3343':Unrecognized database format 'D:\XXX\aaa.mdb'如何解决呢？

Answer 3

TO:fling_boy(andy__天意)还是有问题，可否给出详细思路
我Win98的机子上是VB6+Office XP，而另一台机子是Win2K AD +VB6+Office 2000

Answer 4

我机器上没有office xp，所以不知道它的版本号。
我知道office 97  用jet3.51 excel 7.0
      office 2k  用jet4.0  excel 8.0
xp你看看.

Answer 5

感谢fling_boy(andy__天意) 最后，我没用ado把问题搞定