Bonjour à tous!
Voila j'essaye de faire une petite appli de reservation pour un théatre (devoir de vacances).
J'ai fait pour cela une table sous access avec en gros les colonnes pieces,datedébut,datefin
Dans mon form j'ai fait une combo qui charge en dur au démarrage les 12 mois de l'année
J'essaye de faire en sorte que lorsqu'on sélectionne un mois dans la combo
ca affiche le nom de la piece dans la listbox.
Mon problème c'est que si la piece dure trois mois il faut qu'on puisse la voir à chaque mois sélectionné, logique!
mais je n'arrive qu'a soit afficher la piece pour le premier ou le dernier mois , soit à l'afficher autant de fois qu'il ya de mois ou elle est jouée
Voici ce que j'ai fais :
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
 
rst.Open "SELECT * FROM LstSpectTab", cnx, adOpenDynamic, adLockOptimistic
 
If Not rst.EOF Then
  Do Until rst.EOF
    strDateDebut = rst.Fields("date_debut").Value
    strDateFin = rst.Fields("date_fin").Value
    pieceTemp = rst.Fields("pieces").Value
 
    If Month(strDateDebut) = Me.cboMois.ListIndex + 1 Or _
       Month(strDateFin) = Me.cboMois.ListIndex + 1 Then      
      Me.lstSpectMois.AddItem pieceTemp
    End If       
    rst.MoveNext
  Loop
End If