Maison > tutoriels informatiques > connaissances en informatique > Utilisation de la méthode ADO dans VB pour interroger les tables de données

Utilisation de la méthode ADO dans VB pour interroger les tables de données

王林
Libérer: 2024-01-17 10:15:23
avant
623 Les gens l'ont consulté

Utilisation de la méthode ADO dans VB pour interroger les tables de données

Comment utiliser la méthode ADO en VB pour interroger une donnée dans une table de données

Commandes faciles à utiliser.

La condition préalable est que le contrôle adodc soit connecté normalement à la base de données

Le contrôle datagrid est lié au contrôle adodc

Sous-commande privée1_Click()

'Connectez-vous à la base de données

Adodc1.ConnectionString = "Provider=Microsoft.Jet.OLEDB.4.0;Data Source=" & App.Path & "Database.mdb"

'Requête

Adodc1.RecordSource = "select * from table which name like '" & Text1.Text & "' et majeur comme '" & Text2.Text & "'"

Adodc1.Refresh

Fin du sous-marin

Comment VB utilise-t-il le contrôle ADO pour se connecter à la base de données à l'aide du code

Première citation ADO : Projet --Référence - Sélectionner les objets de données MS ActiveX

Code :

Dim Access_Con en tant que connexion

Définir Access_Con = Nouvelle connexion

Access_Con.ConnectionString = "Provider=Microsoft.jet.oledb.4.0;data source=" & App_Path & "FHLdata.mdb;"

Access_Con.Open

Dim rs As Recordset

Set rs = Nouveau jeu d'enregistrements

rs.Ouvrez "sélectionner * dans la gestion des utilisateurs", Access_Con

''''Les résultats de la requête seront en rs, vous pouvez lier rs à la grille de données pour afficher les données, etc.

Utilisez le contrôle ADO pour vous connecter à la base de données Access en VB

Sélectionnez le projet de données lors de la création d'un nouveau projet. À ce stade, les contrôles nécessaires à la programmation de la base de données ont été chargés dans la boîte à outils sur le côté gauche de l'environnement de débogage intégré VB6.

Ensuite, ajoutez le contrôle ADODC et le contrôle DATAGRID dans le formulaire FORM1, sélectionnez ADODC1 pour la propriété DATASOURCE de DATAGRID1, ouvrez la page de propriétés du contrôle ADODC1 pour utiliser la chaîne de connexion, sélectionnez Générer, sélectionnez Fournisseur OLE DB MICROSOFT jet 4.0 dans l'option fournisseur. , puis appuyez sur Se connecter à la base de données, etc. Il existe une longue chaîne dans la fenêtre de texte vide utilisant la chaîne de connexion sur la page de propriétés du contrôle ADODC1. Notez que cette chaîne peut être copiée dans le code du programme pour la programmation. Il existe une fenêtre d'écriture de texte de commande (SQL) dans la source de données de la page de propriétés du contrôle ADODC1 pour écrire le langage de requête SQL. Les instructions SQL de cette fenêtre peuvent être copiées dans le code du programme pour la programmation.

La structure principale du langage de requête SQL est :

Sélectionnez le champ de requête à partir du nom de la table Où instruction de condition de requête [instruction de tri ou instruction de regroupement]

Les champs de requête doivent être séparés par des virgules (espagnoles) ou remplacés par un signe *. Il est recommandé d'utiliser au mieux l'instruction de tri dans la requête ci-dessus.

Le langage de requête SQL vous dira s'il y a une erreur lors de l'exécution du programme, apportez simplement les modifications correspondantes. J'appuie généralement d'abord sur la connexion ci-dessus et j'utilise "SELECT * FROM TabelName" pour le débogage SQL. J'utilise une boutonnière pour copier la chaîne de connexion et le langage de requête SQL qui doivent être copiés dans l'événement CLICK. contrôle du bouton. Enregistrez-le pour une utilisation ultérieure. Supprimez ensuite le trou ADODC1, ajoutez le contrôle ADODC1 et ajoutez un autre contenu.

Ce qui suit est un exemple de code :

Sous-Formulaire Privé_Load()

Texte1 = ""

Avec Adodc1

Adodc1.ConnectionString = "Provider=Microsoft.Jet.OLEDB.4.0;Data Source=E:db1.mdb;Persist Security Info=False"

Adodc1.RecordSource = "sélectionnez le nom dans b1, commandez par nom"

Adodc1.Refresh

DataGrid1.Refresh

Fin avec

Fin du sous-marin

Sous-texte privé1_Change()

Adodc1.ConnectionString = "Provider=Microsoft.Jet.OLEDB.4.0;Data Source=E:db1.mdb;Persist Security Info=False"

Adodc1.RecordSource = "sélectionner le nom à partir de b1 où nom >='" & Text1 & "' trier par nom"

Adodc1.Refresh' met à jour la requête

DataGrid1.Refresh

Fin du sous-marin

Ce qui précède est le contenu détaillé de. pour plus d'informations, suivez d'autres articles connexes sur le site Web de PHP en chinois!

source:docexcel.net
Déclaration de ce site Web
Le contenu de cet article est volontairement contribué par les internautes et les droits d'auteur appartiennent à l'auteur original. Ce site n'assume aucune responsabilité légale correspondante. Si vous trouvez un contenu suspecté de plagiat ou de contrefaçon, veuillez contacter admin@php.cn
Tutoriels populaires
Plus>
Derniers téléchargements
Plus>
effets Web
Code source du site Web
Matériel du site Web
Modèle frontal