Datagrid, afficher une requete via une connexion odbc en vb.net

Soyez le premier à donner votre avis sur cette source.

Snippet vu 19 752 fois - Téléchargée 33 fois

Contenu du snippet

Le code ci dessous se connecte à une base de donnée via un DSN et affiche ensuite une requête SQL dans un datagrid.
Le code parle de lui même !!

Source / Exemple :


Dim m_Connex As New Odbc.OdbcConnection                    'Objet qui définit la connexion
Dim myCommand As New Odbc.OdbcCommand       'Objet Command qui représente une requête SQL

'Objet DataAdapter qui va permettre d'adapter la commande à un dataset pour ensuite pouvoir la mettre dans un datagrid
Dim myAdapter As New Odbc.OdbcDataAdapter      
Dim myDataset As New DataSet                              'Objet DataSet
Dim myDataTable As DataTable                               'Objet DataTable

m_Connex.ConnectionString = "DSN=monDSN;UID=monUID;PWD=monPWD"
m_Connex.Open()
myCommand.CommandText = "SELECT * FROM CLIENT"   'Je défini ma requête SQL
'2- myCommand.CommandText = "SELECT * FROM CLIENT c, COMMANDE co WHERE co.CLI_CMD = c.ID_CLI AND c.NOM_CLI = 'KILL'"
myCommand.Connection = m_Connex

myAdapter.SelectCommand() = myCommand   'L'objet adapter prend en compte mon objet command
myAdapter.Fill(myDataset, "CLIENT")                'Ici, il faut remettre le nom de la table comme deuxième paramètres
'Même pour une requête imbriquée, il suffit de passer une des tables de la requête en paramètres, cela ne change donc rien

myDataTable = myDataset.Tables("CLIENT")    'Ici, je défini mon objet DataTable, il faut remettre le nom de la table ici aussi
Datagrid1.DataSource = myDataTable              'Ma source de donnée de mon datagrid est mon DataTable

'On ferme tout
myDataTable.Dispose()
myAdapter.Dispose()
myCommand.Dispose()
m_Connex.Close()

Conclusion :


Il n'y a pas de gestion d'erreurs !! (Pas besoin LoOoOoL)
N'oubliez pas de remplacer les valeurs des variables "monDSN", "monUID" et "monPWD" par les vôtres !!!
Par contre j'ai pas encore essayer des requêtes utilisant plusieurs tables !!

A voir également

Ajouter un commentaire

Commentaires

sakota10
Messages postés
4
Date d'inscription
dimanche 22 août 2010
Statut
Membre
Dernière intervention
25 juin 2012
-
S'il vs plaît! comment pourrais-je afficher les données dans un DataGridView?
soyez indulgent. Merci.
sakota10
Messages postés
4
Date d'inscription
dimanche 22 août 2010
Statut
Membre
Dernière intervention
25 juin 2012
-
bj
je debute en VB.net.
pihp
Messages postés
8
Date d'inscription
mardi 14 janvier 2003
Statut
Membre
Dernière intervention
9 septembre 2008
-
Parfais, Merci
surfzoid
Messages postés
467
Date d'inscription
vendredi 15 août 2003
Statut
Membre
Dernière intervention
21 avril 2010
-
Il utiliser faut, par clavier le, Studio visual et souris click projet nouveau
tarikbolbol
Messages postés
4
Date d'inscription
dimanche 21 mars 2010
Statut
Membre
Dernière intervention
22 avril 2010
-
comment on relier une table base de donnée (sqlserver 2005) avec une datagrid pour ajouter dans datagrid et enregistrer dictement a la base tres urgent svp et merciii

Vous n'êtes pas encore membre ?

inscrivez-vous, c'est gratuit et ça prend moins d'une minute !

Les membres obtiennent plus de réponses que les utilisateurs anonymes.

Le fait d'être membre vous permet d'avoir un suivi détaillé de vos demandes et codes sources.

Le fait d'être membre vous permet d'avoir des options supplémentaires.