|
. 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
End Module
|
