Guide pratique pour interroger une base de données à l’aide de LINQ (Visual Basic)
Language-Integrated Requête (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 effectue des requêtes sur une base de données SQL Server.
Les exemples de cet article utilisent la base de données d'exemple Northwind. Pour obtenir la base de données, consultez Téléchargement d’exemples de bases de données.
Remarque
Votre ordinateur peut afficher différents noms ou emplacements pour certains des éléments de l’interface utilisateur Visual Studio dans les instructions suivantes. L’édition Visual Studio que vous avez et les paramètres que vous utilisez déterminent ces éléments. Pour plus d’informations, consultez Personnaliser l’IDE.
Pour créer une connexion à une base de données
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 .
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.
Indiquez une connexion valide à l'exemple de base de données Northwind.
Pour ajouter un projet qui contient un fichier LINQ to SQL
Dans Visual Studio, dans le menu Fichier, pointez sur Nouveau, puis cliquez sur Projet. Sélectionnez Visual Basic application Windows Forms comme type de projet.
Dans le menu du projet , cliquez sur Ajouter un nouvel élément. Sélectionnez le modèle d’élément Classes LINQ to SQL.
Nommez le fichier
northwind.dbml
. Cliquez sur Ajouter. Le Concepteur relationnel objet (Concepteur O/R) est ouvert pour le fichier northwind.dbml.
Pour ajouter des tables à interroger au Concepteur O/R
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 O/R, vous pouvez le rouvrir en double-cliquant sur le fichier northwind.dbml que vous avez ajouté précédemment.
Cliquez sur le tableau Clients et faites-le glisser dans le volet gauche du concepteur. Cliquez sur la table commandes et faites-la glisser vers la fenêtre gauche du concepteur.
Le concepteur crée de nouveaux objets
Customer
etOrder
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’objetCustomer
a une propriétéOrders
pour toutes les commandes associées à ce client.Enregistrez vos modifications et fermez l'outil de conception.
Enregistrez votre projet.
Pour ajouter du code pour interroger la base de données et afficher les résultats
À partir de la boîte à outils , faites glisser un contrôle DataGridView sur le Windows Form par défaut pour votre projet, Form1.
Double-cliquez sur Form1 pour ajouter du code à l’événement
Load
du formulaire.Lorsque vous avez ajouté des tables au Concepteur O/R, le concepteur a ajouté un objet DataContext pour votre projet. Cet objet contient le code que vous devez avoir pour accéder à ces tables, en plus des objets et collections individuelles 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
Appuyez sur F5 pour exécuter votre projet et afficher les résultats.
Voici quelques requêtes supplémentaires que vous pouvez essayer :
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