Data Source=192.168.136.2"
改为你服务器上的各称!!!

解决方案 »

  1.   

    Dim myconn As OleDb.OleDbConnection = New OleDbConnection("Provider=SQLOLEDB.1;User ID=sa;pwd=20s;database=badlibrary;Data Source=192.168.136.2")改成Dim myconn As OleDb.OleDbConnection = New OleDbConnection("Provider=sqloledb;" _ 
            & "server=192.168.136.2;" _
            & "Initial Catalog=badlibrary;" _
            & "User Id=sa;" _
            & "Password=20s;")
            MessageConnection.open()
    Data Source是用来连接 access的