Vb.net 将visual basic 2008 express程序连接到64位操作系统中的microsoft access 2003

我正在进行一个实验项目，在尝试将microsoft access数据库连接到visual basic 2008 express中的我的程序时遇到了一个问题，并且在尝试连接时不断收到以下消息

“Microsoft.Jet.OLEDB.4.0C:\Users\lewis\Documents\programming\programs\cadet stores program\squadron stores system V1.1\squadron stores system V1.1\stores database\213 squadron stores.mdb”提供程序未在本地计算机上注册。”

经过一些研究，我发现可能存在一个问题，因为我使用的是带有32位软件的64位操作系统。如有任何帮助或建议，我将不胜感激

这是我目前尝试使用的方法：

Dim con As New OleDb.OleDbConnection
    Dim dbProvider As String
    Dim dbSource As String

    dbProvider = "Provider=Microsoft.Jet.OLEDB.4.0"
    dbSource = "C:\Users\lewis\Documents\programming\programs\cadet stores program\squadron stores system V1.1\squadron stores system V1.1\stores database\213 squadron stores.mdb"

    con.ConnectionString = dbProvider And dbSource
    con.Open()

我现在重新编写了如下所示的语法：

Private Sub Form1_Load(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles MyBase.Load

    Dim con As New OleDb.OleDbConnection
    Dim connString As String

    connString = "Provider = Microsoft.Jet.OLEDB.4.0;"
    connString &= "C:\Users\lewis\Documents\programming\programs\cadet stores program\squadron stores system V1.1\squadron stores system V1.1\stores database\213 squadron stores.mdb;"
    con.ConnectionString = connString

    con.Open()

    MessageBox.Show("Conection open")

End Sub

但是，我现在收到以下错误消息：

“初始化字符串的格式不符合从索引35开始的规范。”

现在连接正常了非常感谢您的帮助

非常感谢

刘易斯这完全是错误的：

' And does not concatenate strings
con.ConnectionString = dbProvider And dbSource

你的意思可能是：

con.ConnectionString = dbProvider & ";" & dbSource

或

---

我使用的是带有32位软件的64位操作系统

如果这意味着您的项目是32位的，您应该不会有问题，但有关

的信息，您的连接字符串严重混乱，提供程序和数据源部分只是一起运行。使用.Hi hans我似乎无法使用这种格式的语法。您是否有可能给我举个例子来获得更好的想法。如果您无法从我提供的链接中正确获得它，那么我严重怀疑我是否可以做得更好。如果你不记录你的连接字符串，没有人能看到你做错了什么。我添加了我试图使用的语法，我还将程序的目标cpu切换到86xy。你真的需要放慢速度。当您编写这样的代码时，您还没有完全准备好处理数据库项目，这将是一场持续的斗争。在本地图书馆或书店找到一本关于vb.net编程的入门书，做练习。您忘记了连接字符串的“DataSource=”部分。

connString = "Provider=Microsoft.Jet.OLEDB.4.0; "   ' end with a ;
connString &= "Data Source = C:\Users\lewis..."

con.ConnectionString = connString