Probleme Connexion BDD access dans mon SELECT en VB ????

Question

Bonjour à tous ,

Je fais un programme sur visual basic 2008 
j'ai une base de données access 2000
dans mon prog je fais un SELECT où mes resultats doivent s'afficher dans une listbox avec un recordset
mais quand je lance mon application y me dit que la connexion avec la base n'est pas ouverte

J'arrive vraiment pas à trouver l'erreur 

Voila mon code :

Dim LB_ListeMachines As New ListBox
        Dim rs As Recordset
        Dim db As Database
        Dim bd As DBEngine

        Try
            bd = New DBEngine
            db = bd.OpenDatabase("C:\...\Debug\BaseDeDonnées.mdb")
 
            Affiche.CommandText = "Select NomMachine from Machines WHERE Secteur='Extraction'"
            
            rs = db.OpenRecordset(Affiche.CommandText)
            Affiche.ExecuteNonQuery()
            While Not rs.EOF
                LB_ListeMachines.Items.Add(rs.Fields("NomMachine").Value)
                rs.MoveNext()
            End While


        Catch ex As Exception 'message d'exception si erreur 
            MessageBox.Show("Impossible d'établir la connexion à la base !!" & ex.Message)
        End Try

        MyConnection.Close()


Merci d'avance

lolokun · Answer

bonjour,

Voici un site qui pourra t'être utile pour les chaînes de connexion


L'expérience, c'est une connerie par jour, mais jamais la même..

nico8001 · Answer

Ok merci je vais aller faire un tour dessus

Mayzz · Answer

Un petit conseil, en .Net on utilise ADO.Net voici un lien qui t'expliquera comment gérer les données en .Net


Si le déboguage est l'art d'enlever les bogues, la programmation doit être l'art de les créer.

Probleme Connexion BDD access dans mon SELECT en VB ????

3 réponses

Votre réponse

Discussions similaires