Bonjour.
Eh oui j'ai encore un petit pb de requête:
Set rs9 = db.OpenRecordset("SELECT [DateO], [SituationCliniqueO], [ReevaluationEtatCliniqueO], [ControleLaboO], [ResultatsControleO] FROM [ORDONNANCE] WHERE [ORDONNANCE].[CodePA]=" & LTrim$(Str$(codePatient)) & " AND [ORDONNANCE].[CodeO]=" & LTrim$(Str$(codeOrdonnance)) & ";", , dbForwardOnly)
Mais cette fois ci la requete marche. Par contre c'est lexploitation des résultats ou j'ai un léger souci.
ControleLaboO de type Oui/Non c'est donc un booléen.
Et je voudrais récupérer sa valeur pour un bouton Option: si ControleLaboO est à Oui OptionButton.Value=true.
Je l'ai écris sous cette forme:
If (rs9!ControleLaboO) <> "" Then
ControleLaboOrdonnance = rs9!ControleLaboO
End If
Là, ControleLaboOrdonnance (variable temporaire de type String) prend la valeur "Vrai".
Avec ca, j'essaie de cocher l'option correspondante:
If ResultatsControleOrdonnance = "Vrai" Then
Ordonnance.ORD_ControleOui.Value = True
End If
Mais rien à faire, ca ne marche pas. Quelqu'un peut-il m'aider?
Merci d'avance
tapas64