Discussion :

[GarsDuCalvados]

Bonjours,
je sais comment récupérer le résultat d'une requete suivant un numéros (pour un enregistrement unique ) :

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
4
5
6
7
8
9
10
11
12
'Requête SQL
sql = "SELECT heure, date_incident, evaluation_degat from incident where num_incident = " & Me!incident.Value & ""
 
' Exécution de la requète
Set rs = db.OpenRecordset(sql)
 
' On se place au premier enregistrement concerné
rs.MoveFirst
 
 
' Récupération du résultat
Me!heure_incident.Value = rs.Fields(0).Value

Mais comment je fais pour récupérer plusieurs résultats d'une requete (plusieurs enregistrement) comme par exemple pour :

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

Select count(*), type_incident from incident, type_incident where incident.type_incident=type_incident.num_incident;

Merci de votre aide.

[ClaudeLELOUP]

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
4
5
Do until Rs.eof    ' pour arrêter la boucle après épuisement des cas
                          'sélectionnés
' ici ce que tu dois faire : me.xxx= ......
Rs.MoveNext   ' pour passer au suivant
loop  ' continuer avec le suivant

[pc75]

Bonjour,

Si j'ai bien compris ta question, je dirai qu'il faut boucler sur ton recordset :

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
 
'Requête SQL
sql = "SELECT heure, date_incident, evaluation_degat from incident where num_incident = " & Me!incident.Value & ""
 
' Exécution de la requète
Set rs = db.OpenRecordset(sql)
 
if not rs.eof then
   ' On se place au premier enregistrement concerné
   rs.MoveFirst
   do while not rs.eof
      msgbox rs.Fields(0).Value
      rs.movenext
   loop
end if
 
' Récupération du résultat
Me!heure_incident.Value = rs.Fields(0).Value

[GarsDuCalvados]

j'ai une erreur sur ma requete :

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

sql = "Select count(*) as nb_total, sous_type_incident.libelle_incident from incident, sous_type_incident WHERE ((incident.date_incident) Between #" & Month(nom_date.Value) & "/" & Day(nom_date.Value) & "/" & Year(nom_date.Value) & "# And #" & Month(var_date.Value) & "/" & Day(var_date.Value) & "/" & Year(var_date.Value) & "#) And ((incident.nature_incident)=(sous_type_incident.libelle_incident))"

voici le message :

"Erreur d'execution '3122' :
Vous avez essayé d'executer une requete ne comprenant pas l'expression spécifié 'libelle_incident' comme une partie de la fonction d'agrégat."

[Tofalu]

En effet la requête est fausse.

Tous les champs du select qui ne sont pas utilisés dans une fonction d'aggragat( count, max, sum, min, avg) doivent figurer dans le group by

[GarsDuCalvados]

Ok merci. je vais testé.

[GarsDuCalvados]

Ok merci ça marche.

==> Encore désolé pour le mauvais choix du titre, merci à toi de l'avoir rectifier.

"Et un résolu .. et un "
@+