Connexion Vb.net - Bdd - et windows 7

azertyty -  
 Kryos -
Bonsoir,

J'explique simplement mon problème, je souhaite me connecter avec vb.net à une base de données hébergée par wamp sur un pc sous windows 7.

J'ai donc ce code simplissime:
MySQL_Conn.ConnectionString = "DRIVER={MySQL ODBC 5.1 Driver};" _
                                    & "SERVER=" & Server & ";" _
                                    & "DATABASE=" & Db & ";" _
                                    & "UID=" & User & ";" _
                                    & "PWD=" & Pwd & ";" _
                                    & "OPTION=3"

(où Server, Db, etc... sont passés en paramètres à ma fonction de connexion)

Le soucis, c'est qu'au moment de la connexion, mon appli me sort une SQLException:

"source de données introuvable et nom de pilote non spécifié"

J'ai pourtant ajouté des références dans mon projet vb.net (Microsoft ActiveX Data Object).

J'avais déjà fais ça sur un xp il y a quelques temps, mais là, sur un 7, je ne vois pas...

Quelqu'un aurait-il une idée??

Merci!

1 réponse

  1. Kryos
     
    Tu as bien téléchargé l'ODBC connector ?

    Sinon tu as un connecteur en .NET (http://dev.mysql.com/downloads/connector/net/)
    0
    1. azertyty
       
      Je savais bien que j'avais oublié de préciser un truc....
      Mais oui j'ai déjà installé l'ODBC connector
      0
    2. azertyty
       
      pas d'autre idée?
      0
    3. Kryos
       
      Essaie le connecteur que je t'ai donné.
      Tu fait un module pour la connexion :
      Imports MySql.Data.MySqlClient 
      
      Public Module SQL 
      
          Public Connexion As New MySqlConnection 
      
          Public Sub Connect() 
              Connexion.ConnectionString = "server=IP DE LA DB";" & "uid=USER";" & "pwd='PASSWORD';" & "database=NOMDELADB;" 
              Connexion.Open() 
          End Sub 
      
      End Module 
      


      Et puis pour te connecter :
      Try 
                      SQL.Connect() 
                      Catch ex As Exception 
                      MsgBox(ex.Message, MsgBoxStyle.Critical) 
                  End Try
      0