VBA连接FOXPRO DBF文件,该如何处理

fieldset{padding:10px;}

VBA连接FOXPRO DBF文件各位大虾,小弟用VBA连接VFP的DBF文件,总是报以下错误执行阶段错误,’-2147467259(80004005)’:Automation错误无法指出的错误原代码如下:Sub tt() Dim i As Integer Dim cn, rst, cnnstr Dim sql As String Set cn = CreateObject("ADODB.connection") Set rst = CreateObject("ADODB.recordset") cnnstr = "driver={microsoft visual foxpro driver};sourcetype=dbf;sourcedb=f:\;exclusive=no;" cn.Open cnnstr sql = "select count(*) from admit" rst.Open sql, cn Range("B4") = rst.Fields(0).Value rst.Close cn.Close Set rst = Nothing Set cn = NothingEnd Sub哪位大虾知道,先谢谢了,可以补加分的——解决方案——————————————————–你最好是指出运行到哪行出问题了,还是说根本开始不了,按F8一行行调试下rst.Open sql, cn,1,1(试一试加这个参数看看)——解决方案——————————————————–DBF格式是否正确,用VFP9的OLEDB试试不论你在什么时候结束,重要的是结束之後就不要悔恨

VBA连接FOXPRO DBF文件,该如何处理

相关文章:

你感兴趣的文章:

标签云: