Sql serverv
420 mots
2 pages
Allons dans le vif du sujet : 1°) Técharger le connecteur MYSQL pour VB.NET sur http://dev.mysql.com/downloads/connector/net/6.1.html 2 °) Décompresser l'archive et l'installer 3 °) Ouvrir le projet et ajouter le connecteur installer. Chez moi , je vais à Projet --> Ajouter une référence --> Onglet GAC --> rechercher MYSQL.DATA et double cliquer dessus puis OK. Maintenant on peut passer à la connexion par le code. 4 °) en debut de la classe dans laquelle on veut faire la connexion ajouter ceci avant la déclaration de la classe imports System Imports MySql.Data.MySqlClient 5 °) Maintenant le code pour afficher les éléments de ma BD dans une LISTBOX Dim oConn As MySqlConnection oConn = New MySqlConnection() oConn.ConnectionString = "server =localhost;user = root;password = '';database= ecole" oConn.Open() Dim myCommand As New MySqlCommand Dim MyAdapt As New MySqlDataAdapter Dim myDataTable As New DataTable Dim strQuery As String strQuery = "SELECT inscription.nom, inscription.postnom FROM inscription" myCommand.Connection = oConn myCommand.CommandText = strQuery MyAdapt.SelectCommand = myCommand MyAdapt.Fill(myDataTable) For i As Integer = 0 To myDataTable.Rows.Count - 1 Dim nom As String Dim prenom As String nom = myDataTable.Rows(i)("nom").ToString prenom = myDataTable.Rows(i)("postnom").ToString 'MsgBox( myDataTable.Rows(i)("nom").ToString) ListBox1.Items.Add(nom + " " + prenom) Next oConn.Close 6 °) Comment insérer des données dans la table inscription de la base de données ecole ? Le code suivent m'as permis de recupérer 2 valeurs dans 2 champs de type TextBox et les insérer dans la table inscriptionDim oConn As MySqlConnection oConn = New MySqlConnection() oConn.ConnectionString = "server =localhost;user = root;password = '';database= ecole" oConn.Open() Dim nom As String Dim prenom As String nom = TxtNom.Text prenom = TxtPrenom.Text Dim myQuery As String myQuery ="insert into inscription(nom,postnom) values ('" & nom & "' ,'" & prenom & "')" Dim