Excel2007当做数据库处理出错
Set conn = CreateObject("ADODB.Connection")conn.Open "Provider=Microsoft.Jet.OLEDB.4.0;Data Source=C:\ZCTT\20100805100119.xls;Extended Properties=Excel12.0"
Set rs = CreateObject("ADODB.Recordset")
rs.Open "Select count(时间) from ",conn
Do
If Not rs.EOF Then
rd = rs("count(时间)")
rs.MoveNext
End If
Loop Until rs.EOF=True
conn.Close
Set rs =Nothing
E:\VBScript\Database.vbs(15): Exception: 找不到可安装的 ISAM。
驱动程序不正确
原帖由 木落 于 2010-8-6 08:28 发表 http://bbs.51testing.com/images/common/back.gifSet conn = CreateObject("ADODB.Connection")
conn.Open "Provider=Microsoft.Jet.OLEDB.4.0;Data Source=C:\ZCTT\20100805100119.xls;Extended Properties=Excel12.0"
Set rs = CreateObject("ADODB.Recordset") ...
驱动程序不正确:Microsoft.Jet.OLEDB.4.0是打开EXCEL2003以前的版本的EXCEL的驱动,打开EXCEL2007要用Microsoft.Jet.OLEDB.12.0
修改代码中的Provider=Microsoft.Jet.OLEDB.4.0为Provider=Microsoft.Jet.OLEDB.12.0
若提示“未找到提供程序,该程序可能未正确安装”,这是因为未安装AccessDatabaseEngine.exe,自己下个安装一下就可以了
注:支持的操作系统: Windows Server 2003 Service Pack 1; Windows Vista; Windows XP Service Pack 2
[ 本帖最后由 feiyunkai 于 2010-8-6 17:49 编辑 ] 恩 不错 ,如果WPS的EXCEL格式呢,有试过吗?QTP默认格式不兼容WPS
页:
[1]