Bonjour,

Comme vous avez pu le voir je suis débutant en VB.NET.
Avant de venir poser ma question ici, je me suis beaucoup baladé sur Internet et sur ce site afin de trouvez des réponses mais mon code ne marche toujours pas.

Je souhaite dans un premier temps uniquement me connecter à ma BdD Access (Créée sous Access 2007) à partir de VB 2010. Pour la suite (modification de ma base de données) je souhaite m'y aventurer seul après afin de découvrir.

Voilà mon code:


Code : Sélectionner tout - Visualiser dans une fenêtre à part
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
Imports System.Data.OleDb
 
Public Class Form1
 
    Private Sub Button_test_Click(ByVal sender As Object, ByVal e As System.EventArgs) Handles Button_test.Click
 
        Dim c_string As String = "Provider = Microsoft.Jet.OLEDB.12.0 ; Data Source = C:\testBD.accdb"
        'Dim cmd As New OleDb.OleDbCommand
        Dim MyConnection As New OleDb.OleDbConnection(c_string)
 
        Try
            MyConnection.Open()
            MessageBox.Show("Connexion réussie", "Test")
        Catch ex As Exception
            MessageBox.Show("Connexion ratée", "Test")
        End Try
        MyConnection.Close()
 
    End Sub
 
End Class
Comme vous vous y attendez, ma MessageBox m'affiche "Connexion ratée"
Si quelqu'un pouvait m'aider, je suis grandement preneur.
Merci d'avance.

Adrien