我想通过ado打开(ArcGIS中的).dbf文件,可总是出错:
主要代码如下:
    Set adoConn = New ADODB.Connection
    Set rsAttribute = New ADODB.Recordset    ' 调用Open 方法打开数据库
    Dim strPath, strSQL
    strPath = "C:\arcgis\arcexe82\ArcObjects Developer Kit\samples\Data\Greeley"
    strSQL = "poles.dbf"
    adoConn.open "Driver={Microsoft Visual FoxPro Driver};" & _
                       "SourceType=DBF;" & _
                       "SourceDB=" & strPath & _
                       "Exclusive=No;"
    rsAttribute.open strSQL, adoConn, 2, 2每次运行到最后一步时,会出这样的错:
Run-time error '-2147217887(80040e21)':
ODBC driver does not support the requested properties.
请问,这个问题如何解决?
谢谢!

解决方案 »

  1.   

    Dim Rs As ADODB.Recordset
    Dim DBpath As StringDBpath = "D:\资料\VB资料\dbfTomdb"
    Set Conn = New ADODB.Connection
    Conn.Open "Driver={Microsoft FoxPro VFP Driver (*.dbf)};UID=;PWD=;SourceDB=" & DBpath & ";SourceType=DBF;Exclusive=No;"sql = "select * from A.DBF"
    Set Rs = New RecordsetRs.Open sql, Conn, adOpenDynamic, adLockOptimistic
    用这个吧!!!
      

  2.   

    Dim conn As New ADODB.Connection
    conn.ConnectionString = "provider=msdasql;DRIVER=Microsoft Visual FoxPro Driver;UID=;Deleted=yes;Null=no;Collate=Machine;BackgroundFetch=no;Exclusive=No;SourceType=DBF;SourceDB=C:\fox;"
    conn.Open
      

  3.   

    rsAttribute.open strSQL, adoConn
      

  4.   

    zmh8b(tony)的方法应该可行,楼主不妨试试
    不过我不清楚arcgis是什么?