DBF 数据库连接或读取时出错

Question

提示:
实时错误'-2147217887(80040e21)';
ODBC 驱动程序不支持被需要的属性.我的代码:
 Option Explicit
 Dim Conn As New ADODB.Connection
 Dim Rs  As New ADODB.Recordset
Private Sub connectbt_Click()
    Dim strSQL As String
    Conn.ConnectionString = "provider=msdasql;DRIVER=Microsoft Visual FoxPro Driver;UID=;Deleted=yes;Null=no;Collate=Machine;BackgroundFetch=no;Exclusive=No;SourceType=DBF;SourceDB=E:\vb\barcode;"
    Conn.Open
    strSQL = "select * from styles"
    Rs.Open strSQL, Conn, adOpenDynamic, adLockOptimistic
    Text1.Text = Rs(0)
    Text2.Text = Rs(1)
End Sub

Answer 1

DBF / FoxPro 
 ODBC 
你的连接字符有问题，参考下面的连接 standard:"Driver={Microsoft dBASE Driver (*.dbf)};DriverID=277;Dbq=c:\mydbpath;"  OLE DB, OleDbConnection (.NET) 
 standard:"Provider=Microsoft.Jet.OLEDB.4.0;Data Source=c:\folder;Extended Properties=dBASE IV;User ID=Admin;Password=" 

Answer 2

Conn.ConnectionString = "Provider=MSDASQL.1; " & _
        "Persist Security Info=False; " & _
        "Driver={Microsoft Visual FoxPro Driver}; " & _
        "SourceDB=E:\vb\barcode\;" & _
        "SourceType=DBF;" & _
        "Exclusive=No;"注意：
SourceDB=E:\vb\barcode\;

Answer 3

错误提示行: >> Rs.Open strSQL, Conn, adOpenDynamic, adLockOptimistic

Answer 4

'这样试试：
rs.open strsql,conn,adopenkeyset,adlockreadonly

Answer 5

'这样再试试：
删除RS定义，重新引用ADO，再定义RS

Answer 6

上面问题已解决,这个原来也有重启再打开就正常的奇怪现象..CSDN结贴时出错,管理显示有结得分,这里却显示不到,帮忙的朋友究竟有没得分了?
~~~~呵呵!!