. Au cœur de toutes les méthodes d'accès aux données s 'Visual Basic.Net réside ADO.Net . Cette technologie d'accès aux données a été libéré dans le cadre initial. Net. Il se connecte à plusieurs serveurs de bases de données , y compris Microsoft Access, offre plus de flexibilité et permet la gestion des erreurs forte. Connexion à Microsoft Access peut être illustrée par la création d'une application console simple qui répertorie les noms à partir d'une base de données de contacts . Instructions
1

Ouvrez Microsoft Access (2000 ou plus ) et créer une nouvelle base de données appelée contacts . Créer un tblContacts table et ajouter deux champs de texte, nom et prénom . Saisissez quelques noms dans la table , puis fermez Access .
2

Ouvrez Visual Basic.Net (toute version ) et créer une nouvelle application de console. Ajoutez la ligne suivante avant le Module déclaration

importations System.Data.OLEDB

Module Module1

L'espace de noms OleDb fournit des références aux objets d'accès aux bases de données.
< Br > Hôtels 3

Ajoutez la ligne suivante avant la déclaration

importations System.Data.OLEDB

Module Module Module1

l'espace de noms OleDb fournit des références à la base de données . des objets d'accès
4

insérer une chaîne de connexion après la déclaration du module

connString privé As String = " Provider = Microsoft.ACE.OLEDB.12.0 ; Data Source = d : \\. contacts.mdb ; "

la chaîne de connexion décrit comment OleDb va communiquer avec la base de données . Lla exemple utilise le fournisseur Microsoft ACE pour communiquer avec la base de données

d'accès D: \\ contacts.mdb . Modifier l'emplacement pour refléter la base de données que vous avez créé à l'étape 1 .
5

Copier le code ci- dessous dans la méthode Main. Commencer par déclarer le searchString variable, qui contient la commande SQL pour sélectionner les données .

Sub Main ( )

de searchString As String = "select Prénom, Nom De tblContacts "
< p> searchString & = "Trier par Nom, Prénom ; ».
6

établir une connexion avec la base de données Access en utilisant l'objet OleDbConnection

conn As New OleDbConnection
< p> essayer et

conn.ConnectionString = connString

conn.Open ()

Catch ex As Exception

Console.WriteLine ( "Impossible d'ouvrir la base de données »)

Console.WriteLine ( ex.Message )

Return of

Fin essayer et

utiliser toujours des exceptions structurées ( try /catch ) pour piéger et rapport erreurs générées par les objets d'accès aux données .
7

Créer commandement et objets de l'adaptateur de données et de les utiliser pour récupérer les résultats de recherche dans une nouvelle structure de DataSet.

ds As New DataSet

essayer et

cmd As New OleDbCommand ( searchString , conn)

cmd.CommandType = CommandType.Text

dap As New OleDbDataAdapter
< p> dap.SelectCommand = cmd

dap.Fill (ds)

Catch ex As Exception

Console.WriteLine (" Impossible d'exécuter la recherche Essayez
8

boucle à travers les lignes de l'ensemble de données pour récupérer les champs Prénom et Nom . Depuis accéder à une valeur null, une exception, toujours test pour les valeurs nulles avant de les récupérer .

Console.WriteLine (" Contacts :") .

Pour chaque ligne comme DataRow En ds.Tables (0) Rows

Si row.IsNull ( " Prénom ") = False Then

Console.Write (ligne ( " Prénom ") & " " )

End If

Si row.IsNull ( "Nom" ) = True Si

Suivant

WriteLine ( "trouvé" et ds.Tables (0) . Rows.Count.ToString et "contacts" )

End Sub
< p > End Module