Microsoft Access est un petit moteur de base de données utilisé par les débutants ou pour les sites de petite taille. Vous pouvez utiliser Visual Basic (VB) pour interroger la base de données directement dans votre code. Ceci est bénéfique pour ceux qui veulent offrir un site web dynamique pour leurs lecteurs . Pour interroger la base de données , vous devez créer une connexion , envoyer la requête et affecter les résultats de votre propre variable Visual Basic. Instructions
1
Double -cliquez sur le formulaire Visual Basic pour ouvrir le code du fichier et chargez-le dans votre éditeur VB . Faites défiler jusqu'à la section de votre code VB où vous voulez placer la connexion de base de données et requêtes.
2
Créer votre connexion à la base . La variable de connexion contient le serveur et base de données auquel vous souhaitez vous connecter. Le code suivant crée une connexion:
conn As String = "Data Source = localhost ; Initial Catalog = Northwind ; Integrated Security = true"
de sqlcon As SqlConnection = New SqlConnection ( conn) Photos
sqlcon.Open ()
le texte "localhost" se connecte à l'ordinateur local sur lequel le code du site est situé . Si votre serveur de base de données sur un autre ordinateur , tapez le nom de l'ordinateur au lieu de "localhost ". Remplacer " Northwind " avec le nom de votre base de données.
3
interroger les tables et récupérer vos informations de base de données . Le code suivant vous montre comment interroger Access en utilisant la connexion créée à l'étape trois :
variables As String = "Miami"
strSelect As String = " SELECT * FROM clients WHERE Ville = '"& variable & "' "
dscmd As New SqlDataAdapter ( strSelect , sqlcon )
ds As New DataSet ()
dscmd.Fill (ds , " clients » )
Dans le code ci-dessus, une requête est envoyée à la base de données Access en utilisant la variable nommée " variable ". Cette variable contient la ville "Miami ". Cette variable est envoyé à la base de données Access . La requête est envoyée et maintenue dans une variable de données nommé "ds ".
4
impression sur le premier disque pour tester votre nouveau code. Le code suivant affiche le nom du premier enregistrement dans les résultats de la requête :
MsgBox ds.Tables.Item ( " last_name " )
