OVH Cloud OVH Cloud

Filtrage de données ACCESS pour vb

12 réponses
Avatar
fabrizio-r
Bonjour a tous,

Voila j'aimerai savoir comment faire un filtrage de=20
donn=E9es enregistr=E9es dans une base ACCESS selon un=20
crit=E8re choisi et d'afficher cela =E0 partir de=20
Datacombobox et TextBox.

Je vous remercie d'avance

Fabrice.

2 réponses

1 2
Avatar
fabrizio-r
ce que je souhaite faire c eétablir le même comprtement
qu'ACCESS
j ai un formulaire avec plusieurs Datacombobox comme le
nom de client, la tâche à effectuer, la personne qui va
effectuer cette tâche.....

ce que je ve, c a partir d'un form différent, je
selectionne, par exemple, une personne qui doit effectuer
des tâches, et quand je clique sur OK, mon form précédent
m'affiche tous les enregistrements relatifs a cette
personne et seulement celle ci.

Fabrice

-----Message d'origine-----
Si je comprends bien, tu sélectionnes une donnée dans


datacombo et tu
filtres les données du recordset en fonction de la


sélection?
Si c'est bien ça, tu récupères la sélection dans une


variable du même type
(p. ex selection = datacombo1.boundtext ou


selectionÚtacombo1.text selon
la façon don tu utilises datacombo)
Puis rst.Filter="ChampAFiltrer = (ou like en


fonction ...) " & selection si
selection est numérique ou "ChampAFilter='" & selection


& "'" si selection
est du type string. Si selection est du type date tu


utilises #.
Exprime clairement ton problème.

JLK
"fabrizio-r" a


écrit dans le message
de news: 169ef01c41ca2$3f5ff730$
ce que je ne sais pas faire c'est filtrer mes
enregistrements par rapport à une donnée que j'aurai
saisi au préalable dans un Datacombobox.


fabrice
-----Message d'origine-----
Voici un petit bout de code que j'ai essayé pour toi
Dim cnx As New ADODB.Connection
Dim rst As New ADODB.Recordset
Private Sub Form_Load()
cnx.Provider = "microsoft.jet.oledb.4.0"
cnx.CursorLocation = adUseClient
cnx.ConnectionString = "c:ketxketaxis.mdb"
cnx.Open
rst.Filter = "client like 'a*'"
rst.Open "taxis", cnx
Set DataGrid1.DataSource = rst
set cnx = Nothing
set rst = Nothing
End Sub

La table 'Taxis' a un champ 'Client' (au fait le nom du


client) et je filtre
les tuples pour lesquels le nom commence par 'a' (note


la spéficité d'Access
avec * à la place de %).
Bien sûr je ne te conseille de déclarer rst et cnx en un


coup avec 'As New'
C'est la propriété Filter de l'objet Recordset qui


indique les données à
filtrer.

JLK

"fabrizio-r" a


écrit dans le message
de news: 196d301c41c94$47600870$
Bonjour a tous,

Voila j'aimerai savoir comment faire un filtrage de
données enregistrées dans une base ACCESS selon un
critère choisi et d'afficher cela à partir de
Datacombobox et TextBox.

Je vous remercie d'avance

Fabrice.


.





.



Avatar
fabrizio-r
j ai pas mal de problème a assimiler la chose, je ne vois
pas trop en fait
c assez complexe
n y a t il pas une solution plus simple pour faire ce que
je veu faire????

Fabrice

-----Message d'origine-----
Pour faire ce que tu veux regarder du coté de ".filter"


du recordset sous
jacent du controle que t utilises pour afficher les infos

Recupère le nom dans le combo puis ADOrs.Filter="Nom = "


& """ & NomPersonne
& """


"fabrizio-r" a


écrit dans le message
de news:19ecf01c41d4d$abeb5330$
j explique en détail mon problème

je dois effectuer une appli de gestion de tâche pour une
société de maintenance informatique
donc dans mon form, j ai diféérents DataCombobx avec le
nom du client, la tache de maintenance a accomplir, le
nom de la personne qui va faire la maintenance, date de
reception etc.....

Toute ces données etant stockéés dans une base de données
avec différentes tables,( client, membre_equipe).
j accède à ces données par ADO.

Je visionne ces données comme on les visionne dans
ACCESS, avec un formulaire et que l on clique sur
enregistrement suivant.

Ainsi, ce que je souhaite faire, c'est visualiser toutes
tâches a accomplir par une personne en particulier
j utilise un form, je saisi le nom de la personne faisant
parti de la société, réalisant la maintenance et qd je
clique sur OK je visualise toutes les tâches que seul lui
a à accomplir.

Fabrice.
-----Message d'origine-----
Si je comprends bien, tu sélectionnes une donnée dans


datacombo et tu
filtres les données du recordset en fonction de la


sélection?
Si c'est bien ça, tu récupères la sélection dans une


variable du même type
(p. ex selection = datacombo1.boundtext ou


selectionÚtacombo1.text selon
la façon don tu utilises datacombo)
Puis rst.Filter="ChampAFiltrer = (ou like en


fonction ...) " & selection si
selection est numérique ou "ChampAFilter='" & selection


& "'" si selection
est du type string. Si selection est du type date tu


utilises #.
Exprime clairement ton problème.

JLK
"fabrizio-r" a


écrit dans le message
de news: 169ef01c41ca2$3f5ff730$
ce que je ne sais pas faire c'est filtrer mes
enregistrements par rapport à une donnée que j'aurai
saisi au préalable dans un Datacombobox.


fabrice
-----Message d'origine-----
Voici un petit bout de code que j'ai essayé pour toi
Dim cnx As New ADODB.Connection
Dim rst As New ADODB.Recordset
Private Sub Form_Load()
cnx.Provider = "microsoft.jet.oledb.4.0"
cnx.CursorLocation = adUseClient
cnx.ConnectionString = "c:ketxketaxis.mdb"
cnx.Open
rst.Filter = "client like 'a*'"
rst.Open "taxis", cnx
Set DataGrid1.DataSource = rst
set cnx = Nothing
set rst = Nothing
End Sub

La table 'Taxis' a un champ 'Client' (au fait le nom du


client) et je filtre
les tuples pour lesquels le nom commence par 'a' (note


la spéficité d'Access
avec * à la place de %).
Bien sûr je ne te conseille de déclarer rst et cnx en






un
coup avec 'As New'
C'est la propriété Filter de l'objet Recordset qui


indique les données à
filtrer.

JLK

"fabrizio-r" a


écrit dans le message
de news: 196d301c41c94$47600870$
Bonjour a tous,

Voila j'aimerai savoir comment faire un filtrage de
données enregistrées dans une base ACCESS selon un
critère choisi et d'afficher cela à partir de
Datacombobox et TextBox.

Je vous remercie d'avance

Fabrice.


.





.





.



1 2