salut
entraîne de réaliser mon projet de gestion je me trouve avecun problem pour filtre une msflexgrid
voici le code:
j aimerai comparer le mois de champ dat de la table gest avec le mois dans une datepicker
Code : Sélectionner tout - Visualiser dans une fenêtre à part
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20 Set rsafficher = New ADODB.Recordset rsafficher.Open "select * from Gest where Dat like '" & DTP_park.Month & "'", cn, 1, 2 If rsafficher.EOF Then MsgBox "Aucun Résultat trouver", vbInformation Else MSPark.FormatString = "|Date |N° | Caissier |N° Caisse| Nbr Tick| Nbr T.N|Nbr.O/M|T.Recette " MSPark.SelectionMode = flexSelectionByRow MSPark.Rows = 1 Set rs2 = New ADODB.Recordset rs2.Open "select * from GEST where Dat like '" & DTP_park.Month & "'", cn, 1, 2 Do While Not rs2.EOF MSPark.AddItem rs2.Fields!ID & vbTab & rs2.Fields!DAT & vbTab & rs2.Fields!Encs & vbTab & rs2.Fields!Oprt & vbTab & rs2.Fields!Cais & vbTab & rs2.Fields!NbrT & _ vbTab & rs2.Fields!NbrTN & vbTab & rs2.Fields!NbrOM & vbTab & rs2.Fields!Recette rs2.MoveNext Loop rs2.Close End If Else Form_Load
afin d'afficher dans la msflexgris les recette mensuelle.
idem pour la rectte journalière.
je bloque sur comment identifier le mois de champs dat (table access)
rs2.Open "select * from GEST where Dat like '" & DTP_park.Month & "'", cn, 1, 2
Partager