Discussion :

[rominous41]

bonjour ,

voici mon code

Code :

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

1
2
3
4
5
6
7
8
9
10
11
12
 
Private Sub Report_GotFocus()
    Dim sql As Recordset
    Dim sql1 As Recordset
    Set sql = CurrentDb().OpenRecordset("select reso from adh_sal")
    Set sql1 = CurrentDb().OpenRecordset("select logo from GE  where nom = '" & sql!reso & "'")
    Me.logo = sql1!logo
    sql.Close
    sql1.Close
    Set sql = Nothing
    Set sql1 = Nothing
End Sub

je récupère donc le logo stocké dans la table GE puis je dis que l'emplacement nommé logo dans mon état est le logo récupéré par ma requête mais j'ai une erreur qui se déclenche

erreur 438
propriété ou méthode non géré par cet objet

comment puis-je contourner l'erreur ??

merci d'avance
bonne journée a tous

[marot_r]

Un objet report est assez statique lorsqu'il est ouvert. Ton code ne réagi que lorsque tu clique pour activer le rapport et tente d'assigner la valeur à un des contrôles cela ne me semble pas possibleé

Généralement quand on veut un élément dynamiquement sur un rapport on choisi OnPrint ou OnFormat.

A+

[Invité]

Bonjour

Qu'y a-t-il exactement dans sql1!logo ?

Logo est bien un contrôle Image ? Si c'est le cas, il faut utiliser la propriété Picture de celui-ci pour charger l'image.

Philippe