VB: afficher resultat de requête dans Form
ntomswans
Messages postés
4
Date d'inscription
Statut
Membre
Dernière intervention
-
ntomswans Messages postés 4 Date d'inscription Statut Membre Dernière intervention -
ntomswans Messages postés 4 Date d'inscription Statut Membre Dernière intervention -
Bonjour,
Je travaille sur VB (dans Visual Studio 2010), je dois réaliser une application de gestion des atravaux.
J'ai besoin de l'aide sur deux points:
1- Le code sql (dans VB) de création d'une requête " création de table". J'ai en faite un formulaire qui s'appelle "listes des Activités par profil de risque" je dois avoir sur ce form une ComboBox qui me permetra de choisir le profil de risque (de 1 à 14) pour lequel je veux afficher la liste des activités (car à chacun des 14 profils, de la table t_Profils correspondent plusieurs activités de la table t_Activité). apres avoir sélectionné l'item "1" par exemple, la requete devrait selectionner dans la table t_Activité la liste des activités correspondant au profil "1" et afficher la resultat sur le même Form ( sous forme de tableau???, datagrit??? dataset????) si on choisit plutot "2" dans le combo, la liste est remplacée par le resultat de la nouvelle requete et ainsi de suite.
2- Comment recuperer (code VB6) le resultat d'une requete clause SELECT, dans un Tableau et l'afficher dans un Form choisi.
NB: ma BD est faites sur Access 2007 et importé(créé connexion) dans VS 2010.
J'attends avec empressement votre aide.
Cordialement.
Je travaille sur VB (dans Visual Studio 2010), je dois réaliser une application de gestion des atravaux.
J'ai besoin de l'aide sur deux points:
1- Le code sql (dans VB) de création d'une requête " création de table". J'ai en faite un formulaire qui s'appelle "listes des Activités par profil de risque" je dois avoir sur ce form une ComboBox qui me permetra de choisir le profil de risque (de 1 à 14) pour lequel je veux afficher la liste des activités (car à chacun des 14 profils, de la table t_Profils correspondent plusieurs activités de la table t_Activité). apres avoir sélectionné l'item "1" par exemple, la requete devrait selectionner dans la table t_Activité la liste des activités correspondant au profil "1" et afficher la resultat sur le même Form ( sous forme de tableau???, datagrit??? dataset????) si on choisit plutot "2" dans le combo, la liste est remplacée par le resultat de la nouvelle requete et ainsi de suite.
2- Comment recuperer (code VB6) le resultat d'une requete clause SELECT, dans un Tableau et l'afficher dans un Form choisi.
NB: ma BD est faites sur Access 2007 et importé(créé connexion) dans VS 2010.
J'attends avec empressement votre aide.
Cordialement.
A voir également:
- VB: afficher resultat de requête dans Form
- Vb - Télécharger - Langages
- Vb cable - Télécharger - Audio & Musique
- Vb editor - Télécharger - Langages
- Vb runtime - Télécharger - Divers Utilitaires
- Vb express - Télécharger - Langages
3 réponses
Bonjour,
j'ai suivi les liens qui m'ont été proposés plus haut mais je n'ai toujours pas la solution à mon problème.
J'ai vraiment besoin d'aide SVP.
Merci
j'ai suivi les liens qui m'ont été proposés plus haut mais je n'ai toujours pas la solution à mon problème.
J'ai vraiment besoin d'aide SVP.
Merci
Voici ceque j'ai pu écrire:
Private Sub Cmb_ChoixProfil_SelectedIndexChanged(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Cmb_ChoixProfil.SelectedIndexChanged
chaine_connexion = "Provider=Microsoft.ACE.OLEDB.12.0;Data Source= E:\Documents and Settings\N.WANSI Claude\Mes documents\HazardousTaskManagement(HTM).accdb"
Conn = New OleDbConnection(chaine_connexion)
requete_sql = New OleDbCommand("SELECT Activité.* , Profil.ID_Profil FROM Profil INNER JOIN (Activité INNER JOIN [Activité/Profil] ON Activité.ID_Activité = [Activité/Profil].ID_Activité) ON Profil.ID_Profil = [Activité/Profil].ID_Profil WHERE (((Profil.ID_Profil)=1)) INSERT INTO ActivitéPourProfil_1;", Conn)
data_adapter = New OleDbDataAdapter()
data_adapter.SelectCommand = requete_sql
dataset = New DataSet()
data_adapter.Fill(dataset)
champs = dataset.Tables(0).Rows(0) 'Tables --> sélection de la table//Rows --> sélection de la ligne
variable = champs("ID_Activité")
End Sub
mais l'erreur suivant lorsque je choisi une valeur dans mon combo:
Erreur de syntaxe (opérateur absent) dans l'expression « (((Profil.ID_Profil)=1)) INSERT INTO ActivitéPourProfil_1 ».
et en plus je ne vois nulle part la table " ActivitéPourProfil_1" que croyais avoir créé avec le resultat du SELECT.
Merci.
Private Sub Cmb_ChoixProfil_SelectedIndexChanged(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Cmb_ChoixProfil.SelectedIndexChanged
chaine_connexion = "Provider=Microsoft.ACE.OLEDB.12.0;Data Source= E:\Documents and Settings\N.WANSI Claude\Mes documents\HazardousTaskManagement(HTM).accdb"
Conn = New OleDbConnection(chaine_connexion)
requete_sql = New OleDbCommand("SELECT Activité.* , Profil.ID_Profil FROM Profil INNER JOIN (Activité INNER JOIN [Activité/Profil] ON Activité.ID_Activité = [Activité/Profil].ID_Activité) ON Profil.ID_Profil = [Activité/Profil].ID_Profil WHERE (((Profil.ID_Profil)=1)) INSERT INTO ActivitéPourProfil_1;", Conn)
data_adapter = New OleDbDataAdapter()
data_adapter.SelectCommand = requete_sql
dataset = New DataSet()
data_adapter.Fill(dataset)
champs = dataset.Tables(0).Rows(0) 'Tables --> sélection de la table//Rows --> sélection de la ligne
variable = champs("ID_Activité")
End Sub
mais l'erreur suivant lorsque je choisi une valeur dans mon combo:
Erreur de syntaxe (opérateur absent) dans l'expression « (((Profil.ID_Profil)=1)) INSERT INTO ActivitéPourProfil_1 ».
et en plus je ne vois nulle part la table " ActivitéPourProfil_1" que croyais avoir créé avec le resultat du SELECT.
Merci.