cs_JeffC1977
Messages postés928Date d'inscriptionvendredi 10 novembre 2000StatutMembreDernière intervention23 septembre 2023
-
12 juil. 2005 à 19:05
Ricks27
Messages postés79Date d'inscriptionmardi 4 juin 2002StatutMembreDernière intervention29 juillet 2005
-
13 juil. 2005 à 10:48
Salut...
C'est la première fois que j'utilise un listview et je suis pas capable de faire apparaitre de l'info dans le Listview..
Je veux quand je fais une recherche.. Humm voici le code que j'utilise pour la recherche
(BD2.Open "SELECT * FROM [dossiers_actif] WHERE [DOSSIER] like '%" & txtRechercheNormale.Text & "%'", Connection, adOpenKeyset, adLockBatchOptimistic)
Cette recherche est effectuée à partir du fichier Dossier_Actif.mdb et dans la table Dossier_Actif
Je veux faire apparaitre l'information du dossier rechercher mais provenant de la table Travaux en cours 2005.
Bref je veux faire apparaitre dans mon programme les information du dossier rechercher provenant des 2 tables... La table Dossier_Actif sera visible à partir de textbox (Pour cela il n'y a pas de problème) et la table Travaux en Cours 2005 sera visible dans le listview.
J'ai essayé plusieurs truc mais je n'y arrive pas... J'.ai seuelemnt réussi à faire apparaitre le nom des colone...
Private Sub Init_ListView()
'Initialisation de la listview
ListView1.View = lvwReport
ListView1.ColumnHeaders.Clear
ListView1.ListItems.Clear
Dim Connection As New ADODB.Connection
Dim BD As New ADODB.Recordset
Dim BD2 As New ADODB.Recordset
Dim BD2005 As New ADODB.Recordset
Private Sub Form_Load()
'Type de bases de donnée pour la connexion (Pour Acces 2000 (4.0), pour la version 95 et 97 (3.51)
Connection.Provider = "Microsoft.jet.OLEDB.4.0"
'Chemin de la base de donnée (APP.PATH permet de ce mettre dans le chemin
'courant la ou ce trouve le projet)- Paramettrage de la chaine de connection
Connection.ConnectionString = App.Path & "\dossier_actif.mdb"
'Ouverture de la connection
Connection.Open
'Set BD = New ADODB.Recordset
'Ouverture de la requête sql dans le recordset
BD.Open "Select * from dossiers_actif", Connection, adOpenDynamic, adLockOptimistic
BD2005.Open "Select * from [TRAVAUX EN COURS 2005]", Connection, adOpenDynamic, adLockOptimistic
'Cette commande ne fonctionne pas (Init_ListView)
Init_ListView
Me.Show
Form_Activate
Call ListView
txtRechercheNormale.SetFocus
End Sub
Serait-il possible d'avoir un exemple de code pour pouvoir faire apparaitre l'info dans le listview....
Et comment code correctement le code que j'ai mit plus haut pour faire la recherche dans les 2 tables....
cs_JeffC1977
Messages postés928Date d'inscriptionvendredi 10 novembre 2000StatutMembreDernière intervention23 septembre 20234 12 juil. 2005 à 19:44
Ok merci je vais essayé ton truc....
et pour ma commande Recherche....
Comment je fais pour lui dire de chercher dans deux tables...
Est ce que je suis mieux de rajouter une table dans ma recherche comme ce code
(il manque l'ajout de ma deuxième table (chose que je recherche depuis plusieurs jours)
BD2.Open "SELECT * FROM [dossiers_actif] WHERE [DOSSIER] like '%" & txtRechercheNormale.Text & "%'", Connection, adOpenKeyset, adLockBatchOptimistic
Ou bien je me fais une chose comme ca...
BD2.Open "SELECT * FROM [dossiers_actif] WHERE [DOSSIER] like '%" & txtRechercheNormale.Text & "%'", Connection, adOpenKeyset, adLockBatchOptimistic
BD2005.Open "SELECT * FROM [travaux en cours 2005] WHERE [DOSSIER] like '%" & txtRechercheNormale.Text & "%'", Connection, adOpenKeyset, adLockBatchOptimistic
Bref je lui ipose 2 condition et dans mon listview j'utiliserai mon BD2005 recordset ????????
J'attends de tes nouvelles...
Aussi dans l'exmple que tu m'as donné...
For Each tmpVente In colVente
Set Item = lvVentes.ListItems.Add()
Item.text = tmpVente.NumFacture
Item.SubItems(1) = tmpVente.client.nom
Item.SubItems(2) = Format(tmpVente.DateVente, "dd/mm/yyyy")
Next
Le tmpVente c'est quoi et le ColVente c'est quoi....
Je veux direje le remplace avec quoi par rapport à mon code.... J'ai encore un peu de difficul;té avec les boucles.. et je ne les utilisent pas souvent....
'Permet de charger tout les clients de ma table "Clients" se trouvant dans la base de données
J'éspère que cela va t'aider.
En ce qui concerne le fait que tu ai besoin d'accéder aux données se
trouvant dans 2 tables, j'aurais besoin d'un peu plus d'information STP.
Les tables en question ont telle une intégrité référencielle, sont
elles liées? Si tel est le cas, il te suffirait de faire une jointure
entre les deux tables afin de récupérer les infos que tu as besoin.
Ricks27
Vous n’avez pas trouvé la réponse que vous recherchez ?