Discussion :

[ThieBEN]

Bonjour
Quand j'ouvre mon formulaire, j'ai le message suivant : Erreur d'exécution 2220 ne peut ouvrir le fichier '-1'. Quand je débogue il me renvoit sur ce code

Code :

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

1
2
3
Private Sub Form_Current()
Me.Image21.Picture = Me.photo
End Sub

Avez vous une solution merci.

[Domi2]

Bonjour,

Et dans le champ Photo, tu as quoi, exactement ?

Si tu n'as pas le chemin complet de la photo, y compris l'extension, cela va poser problème.

Domi2

[ThieBEN]

J'ai le chemin complet de la photo y compris l'extension.
En revanche, j'ai remarqué que le formulaire quand il n'y avait pas le chemin de la photo dans la champ photo, ne m'affichait pas la photo par défaut.

[Domi2]

Re,

Ton champ photo ne doit pas être Null. Si tu n'as pas de photo pour un enregistrement, le champ photo contiendra le chemin d'une photo par défaut, par exemple "C:\Lechemindesphotos\PhotoDefaut.jpg".

Regarde ici, tu as un excellent tutoriel sur le sujet.

Domi2

[ThieBEN]

Je connais le tuto caféine. Mon formulaire fonctionne sur mon ordinateur. C'est quand je ZIP la base pour l'envoyer, j'ai fais des essais, je l'ai envoyé sur un autre ordi, je l'ai dézipé et là ça beugue.
Mon image par défaut, je l'ai dans le controle photo du formulaire je l'ai mis par défaut comme ça s'il n'y pas d'enregistrement il doit m'afficher la photo par défaut. et la il me met '-1' je ne comprends pas. Ca ne marcherai que sur mon ordi? BIZARRE merci de ton aide

[Domi2]

Re,

La photo par défaut, elle est sur ton ordinateur et sur celui que tu testes ?

Domi2

[ThieBEN]

Elle est sur celui que je teste.

[Domi2]

Re,

Tu as essayé de remettre ta photo par défaut en mode création du form ?

Domi2

[ThieBEN]

Oui je l'ai fait plusieurs fois sans succés. J'ai tout vérifié

[Domi2]

Re,

Sorry, mais je ne vois pas...

Je suis déjà un peu étonné que cette méthode puisse fonctionner. Note, je ne prétend pas détenir la vérité, et si cela donne le résultat attendu, tant mieux...

Tu as essayé de supprimer l'image de ton contrôle est de renseigner le champ photo avec le chemin de la photo par défaut ?

Ou mieux en modifiant un peu ton code ?

Extrait du tutotiel cité ci-avant (modifier les noms et les chemins)

Code :

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

1
2
3
4
5
6
7
' si la photo n'est pas définie, on affiche la photo blank.jpg
' CurrentProject.Path : est le chemin de l'application
If Len(Me.Photo) > 0 Then
    Me.imgPhoto.Picture = Me.Photo
Else
    Me.imgPhoto.Picture = CurrentProject.Path & "\images\blank.jpg"
End If

Domi2

[ThieBEN]

Oui et il me l'affiche mais dès que je veux passé à l'enregistrement suivant ça marche pas. Chez moi j'ai exactement la même base et ça marche très bien. D'ailleurs je voulais en faire profiter le forum dans les contributions. Mais là je suis un peu largué

[Domi2]

Re,

J'ai fait un edit sur mon précédent message.

Domi2

[ThieBEN]

J'ai essayé aussi sans résultat ça bloque parcequ'il ne trouve pas le chemin de ma photo par défaut.

[ThieBEN]

Je renvoi le ZIP sur mon ordi et je te tiens au courant.

[ThieBEN]

Alors là je ne comprends rien. je viens de dézipé et sur mon ordi ça marche nikel. j'avoue être dépassé par les évenements d'où peut provenir ce problème. c'est exactement la même base et elle ne marche pas sur les autres ordi même en modifiant les chemins des photos.
si tu as une solution ça serait bien. merci d'avance

[francishop]

Bonjour;

C'est une mde?
Tous le même access?
Je rencontre quelques plaisanteries du même genre avec 2002/2003

Cordialement.

Ps: Il me semble être parti dans la mauvaise direction avec l'image par défaut.
Il affiché qu'il n'y a pas l'image stipulée dans ton fichier photo. Si c'est le cas soit t'ajoutes la photo soit tu vides le champ. Ou alors il faudrait faire une condition genre " Si je te dis qu'une image existe et qu'en réalité ="" Alors "Image par défaut" . Ce que j'aimerai faire. Il va falloir s'y mettre..

[ThieBEN]

Ce qui est bizarre c'est quand le formulaire photo est dans la base complète que j'utilise ça marche quelque soit l'ordinateur. j'avais décidé de séparé le formulaire et ses tables + le fichier contenant les photos pour en faire profiter d'autres sur le forum et c'est là que je me suis rendu-compte du problème.
Par contre, je la mets où la condition

Code :

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

="" Alors "Image par défaut"

. MERCI

[Domi2]

Bonjour,

Tu dois tester ton champ Me.photo (celui qui contient le chemin complet, avec l'extension, de la photo) sur la propriété Current (activation) du formulaire.

Si tu n'as pas de photo rattachée à l'enregistrement courant, alors tu affiches la photo par défaut.

Toujours extrait du tutoriel de Caféine :

Code :

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

1
2
3
4
5
6
7
' si la photo n'est pas définie, on affiche la photo blank.jpg
' CurrentProject.Path : est le chemin de l'application. A Adapter en fonction de te propre chemin vers la photo par défaut
If Len(Me.Photo) > 0 Then
    Me.Image21.Picture = Me.Photo
Else
    Me.Image21.Picture = CurrentProject.Path & "\images\blank.jpg" 'ici, ton chemin
End If

Domi2

[francishop]

Bonjour;

Bonjour
Quand j'ouvre mon formulaire, j'ai le message suivant : Erreur d'exécution 2220 ne peut ouvrir le fichier '-1'. Quand je débogue il me renvoit sur ce code

Code :

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

1
2
3
Private Sub Form_Current()
Me.Image21.Picture = Me.photo
End Sub

J'ai essayé de reproduire et j'obtiens exactement la même chose. Quand j'écrivais :

Il me semble être parti dans la mauvaise direction avec l'image par défaut.

j'étais sur la bonne piste. Effectivement j'ai bien l'image par défaut dans le bon dossier. J'ai bien le fichier image au bon endroit.
Dans ma table à l'endroit du chemin, sur le premier enregistrement j'ai mis : "-1"

Cordialement.

[ThieBEN]

Bonjour,
Ce matin j'ai refait un test j'ai envoyé par mail le ZIP sur mon ordi du bureau. J'ai dézipé et j'ai commencé par changer les chemins des photos. Dans le contrôle photo j'ai changé le chemin dans la propriété valeur par défaut. Ensuite j'ai changer les chemins dans la table photos et la table paramètres en prenant soin à chaque fois de bien mettre le chemin complet et l'extension. J'ai changer la lettre du disque dans le code du bouton de commande qui permet de choisir et d'insérer une photo à partir du dossier photo. Ensuite j'ai ouvert le formulaire photo et là plus aucun problème ça marche nikel. Je pense que le problème venait des chemins je devais faire de mauvaises manipulations. En tout cas merci à tous de votre aide et retrouvé ma base gestion photos dans les contributions.
Cordialement ThieBEN