Comment : interroger une base de données à l'aide de LINQ (Visual Basic)

Language-Integrated Query (LINQ) facilite l’accès aux informations de base de données et l’exécution de requêtes.

L’exemple suivant montre comment créer une application qui exécute des requêtes sur une base de données SQL Server.

Les exemples de cette rubrique utilisent l’exemple de base de données Northwind. Si cette base de données n’est pas disponible sur votre ordinateur de développement, vous pouvez la télécharger à partir du Centre de téléchargement Microsoft. Pour obtenir des instructions, consultez Téléchargement d’exemples de bases de données.

Pour créer une connexion à une base de données

1. Dans Visual Studio, ouvrez Explorateur de serveurs/Explorateur de bases de données en cliquant sur Explorateur de serveurs/Explorateur de bases de données dans le menu Affichage .

2. Cliquez avec le bouton droit sur Connexions de données dans Explorateur de serveurs/Explorateur de bases de données, puis cliquez sur Ajouter une connexion.

3. Spécifiez une connexion valide à l’exemple de base de données Northwind.

Pour ajouter un projet qui contient un fichier LINQ to SQL

1. Dans Visual Studio, dans le menu Fichier,pointez sur Nouveau, puis cliquez sur Projet. Sélectionnez Application Windows Forms Visual Basic comme type de projet.

2. Dans le menu Projet , cliquez sur Ajouter un nouvel élément. Sélectionnez le modèle d’élément Classes LINQ to SQL.

3. Nommez le fichier northwind.dbml. Cliquez sur Add. Le Concepteur relationnel objet (Concepteur O/R) est ouvert pour le fichier northwind.dbml.

Pour ajouter des tables à interroger au Concepteur O/R

1. Dans Explorateur de serveurs/Explorateur de bases de données, développez la connexion à la base de données Northwind. Développez le dossier Tables .

   Si vous avez fermé le concepteur objet relationnel, vous pouvez le rouvrir en double-cliquant sur le fichier northwind.dbml que vous avez ajouté précédemment.

2. Cliquez sur la table Customers et faites-la glisser vers le volet gauche du concepteur. Cliquez sur la table Orders et faites-la glisser vers le volet gauche du concepteur.

   Le concepteur crée de nouveaux objets Customer et Order pour votre projet. Notez que le concepteur détecte automatiquement les relations entre les tables et crée des propriétés enfants pour les objets associés. Par exemple, IntelliSense montre que l’objet Customer a une propriété Orders pour toutes les commandes liées à ce client.

3. Enregistrez vos modifications et fermez le concepteur.

4. Enregistrez votre projet.

Pour ajouter du code pour interroger la base de données et afficher les résultats

1. À partir de la boite à outils, faites glisser un contrôle DataGridView sur le Windows Form par défaut pour votre projet, Form1.

2. Double-cliquez sur Form1 pour ajouter un code à l’événement Load du formulaire.

3. Lorsque vous avez ajouté des tables au concepteur objet relationnel, ce dernier a ajouté un objet DataContext pour votre projet. Cet objet contient le code nécessaire pour accéder à ces tables, en plus des objets individuels et des collections pour chaque table. L’objet DataContext de votre projet est nommé en fonction du nom de votre fichier .dbml. Pour ce projet, l’objet DataContext est nommé northwindDataContext.

   Vous pouvez créer une instance du DataContext dans votre code et interroger les tables spécifiées par le concepteur O/R.

   Ajoutez le code suivant à l’événement Load pour interroger les tables exposées en tant que propriétés de votre contexte de données.

   Dim db As New northwindDataContext
   
   Dim londonCusts = From cust In db.Customers
                     Where cust.City = "London"
                     Select cust
   
   DataGridView1.DataSource = londonCusts
   

4. Appuyez sur F5 pour exécuter votre projet et afficher les résultats.

5. Voici quelques questions supplémentaires que vous pouvez essayer de poser :

   Dim londonCustOrders = From cust In db.Customers,
                               ord In cust.Orders
                          Where cust.City = "London"
                          Order By ord.OrderID
                          Select cust.City, ord.OrderID, ord.OrderDate
   
   DataGridView1.DataSource = londonCustOrders
   

   Dim custs = From cust In db.Customers
               Where cust.Country = "France" And
                   (cust.CompanyName.StartsWith("F") Or
                    cust.CompanyName.StartsWith("V"))
               Order By cust.CompanyName
               Select cust.CompanyName, cust.City
   
   DataGridView1.DataSource = custs
   

Voir aussi

• LINQ
• Requêtes
• LINQ to SQL
• DataContext, méthodes (Concepteur O/R)