簡體   English   中英

如何為W10 64位MS-Access odbc創建具有正確驅動程序的user-dsn

[英]How to create user-dsn with correct driver for w10 64bit ms-access odbc

我正在閱讀《使用vba,xml和ASP進行Access 2016編程示例》這本書。該書教會了我VBA,但我仍然是一個菜鳥。本章涵蓋設置用戶dns的基礎知識。通過ms-access vba成為用戶,以通過此user-dns連接到.dbf文件。我使用的是Windows 10 64位和Office 2016 64位。該書中的代碼導致錯誤:“驅動程序體系結構和應用程序與DNS不一致。Google或本書也沒有提供合適的解決方案。我認為這與Windows或Office的位版本有關。

這本書提到了下面的代碼,並描述了打開配置屏幕,odbc,用戶dns,選擇“ Microsoft dBase驅動程序(* .dbf)”並將其命名為“ MyDbaseFile”並完成的過程。

與book和Windows 10的區別在於,ODBC設置有兩個窗口,一個是32位,另一個是64位。 僅在32位窗口中,我可以找到描述的驅動程序名稱。 在64位窗口中找不到它。 該書僅描述了一個窗口,因此我認為該窗口基於W7或其他。

書中的總代碼:

Sub Open_AndRead_dBaseFile()
    Dim conn As ADODB.Connection
    Dim rst As ADODB.Recordset

    Set conn = New ADODB.Connection
    conn.Open "Provider=MSDASQL;DSN=MyDbaseFile;"

    Debug.Print conn.ConnectionString

    Set rst = New ADODB.Recordset
    rst.Open "CUSTOMER.dbf", conn

    Do Until rst.EOF
        Debug.Print rst.Fields(1).Value
        rst.MoveNext
    Loop

    rst.Close
    Set rst = Nothing
    conn.Close
    Set conn = Nothing

End Sub

期望在VBA編輯器的即時窗口中顯示customer.dbf的內容。 如前所述,錯誤消息增加了,代碼行增加了:

conn.Open "Provider=MSDASQL;DSN=MyDbaseFile;"

重新安裝了32位辦公室,現在就像一個魅力。

暫無
暫無

聲明:本站的技術帖子網頁,遵循CC BY-SA 4.0協議,如果您需要轉載,請注明本站網址或者原文地址。任何問題請咨詢:yoyou2525@163.com.

 
粵ICP備18138465號  © 2020-2024 STACKOOM.COM