Twitter iPhone pliant OnePlus 11 PS5 Disney+ Orange Livebox Windows 11

erreur d'exécution 2001

5 réponses
Avatar
Alain V
Bonjour à tous,

Petit problème avec Access 2000.
Dans un formulaire, l'évènement Form Open exécute l'action suivante:

Me.logo.picture=CurrentProjectPath...

pour charger un logo dans l'entète de mon formulaire.

Lorsque je double clique sur le formulaire ou dans le Switchboard pour
ouvrir ce formulaire et uniquement dans certains cas (vitesse du double clic
je pense)
j'ai un message "erreur d'exécution 2001" - "opération annulée" sur cette
ligne de commande.
J'ai essayé de désactiver le double clic par un cancel=true dans l'évènement
double clic, mais le problème subsiste.

Avez vous une idée pour solutionner ce Pb?

Merci

Alain

5 réponses

Avatar
Raymond [mvp]
Bonjour.

Pour changer le logo dans l'entete de ton formulaire, passe par une api que
tu trouveras sur la page:
http://officesystem.access.free.fr/apichangericone.htm

--
@+
Raymond Access MVP
http://OfficeSystem.Access.free.fr/
http://OfficeSystem.Access.free.fr/runtime/
http://users.skynet.be/mpfa/ pour débuter sur le forum


"Alain V" a écrit dans le message de news:

Bonjour à tous,

Petit problème avec Access 2000.
Dans un formulaire, l'évènement Form Open exécute l'action suivante:

Me.logo.picture=CurrentProjectPath...

pour charger un logo dans l'entète de mon formulaire.

Lorsque je double clique sur le formulaire ou dans le Switchboard pour
ouvrir ce formulaire et uniquement dans certains cas (vitesse du double
clic je pense)
j'ai un message "erreur d'exécution 2001" - "opération annulée" sur cette
ligne de commande.
J'ai essayé de désactiver le double clic par un cancel=true dans
l'évènement double clic, mais le problème subsiste.

Avez vous une idée pour solutionner ce Pb?

Merci

Alain




Avatar
Alain V
Bonjour Raymond,

Ce que j'insère dans mon formulaire, ce sont des fichiers JPEG ou BMP que je
place dans un contrôle de type image.
Je n'ai pas bien compris ce que tu voulais que je fasse avec l'api pour
changer le logo du formulaire.
De plus, je n'arrive pas à la faire fonctionner. Il ne se passe rien.

Merci

Alain

"Raymond [mvp]" a écrit dans le message de
news: evZOe$
Bonjour.

Pour changer le logo dans l'entete de ton formulaire, passe par une api
que tu trouveras sur la page:
http://officesystem.access.free.fr/apichangericone.htm

--
@+
Raymond Access MVP
http://OfficeSystem.Access.free.fr/
http://OfficeSystem.Access.free.fr/runtime/
http://users.skynet.be/mpfa/ pour débuter sur le forum


"Alain V" a écrit dans le message de news:

Bonjour à tous,

Petit problème avec Access 2000.
Dans un formulaire, l'évènement Form Open exécute l'action suivante:

Me.logo.picture=CurrentProjectPath...

pour charger un logo dans l'entète de mon formulaire.

Lorsque je double clique sur le formulaire ou dans le Switchboard pour
ouvrir ce formulaire et uniquement dans certains cas (vitesse du double
clic je pense)
j'ai un message "erreur d'exécution 2001" - "opération annulée" sur cette
ligne de commande.
J'ai essayé de désactiver le double clic par un cancel=true dans
l'évènement double clic, mais le problème subsiste.

Avez vous une idée pour solutionner ce Pb?

Merci

Alain








Avatar
Raymond [mvp]
Tu as dis que tu voulais: pour charger un logo dans l'entète de mon
formulaire, j'ai pensé que tu voulais changer le logo du formulaire
lui-meme.
pour pouvoir utiliser les fichier jpg il faut que photo editor soit
installé.
lis la fiche :
http://officesystem.access.free.fr/images.htm
--
@+
Raymond Access MVP
http://OfficeSystem.Access.free.fr/
http://OfficeSystem.Access.free.fr/runtime/
http://users.skynet.be/mpfa/ pour débuter sur le forum


"Alain V" a écrit dans le message de news:
Okasc$
Bonjour Raymond,

Ce que j'insère dans mon formulaire, ce sont des fichiers JPEG ou BMP que
je place dans un contrôle de type image.
Je n'ai pas bien compris ce que tu voulais que je fasse avec l'api pour
changer le logo du formulaire.
De plus, je n'arrive pas à la faire fonctionner. Il ne se passe rien.

Merci

Alain


Avatar
Alain V
Re,

Voilà mon code:

Private Sub Form_Open(Cancel As Integer)

CommandBars("menu bar").Enabled = False
Dim txt As String
txt = CurrentProject.Path & "ImagesLogoLogo.jpg"
Me.Logo.Picture = txt

End Sub

Il me semble que cela est correct.
L'image est liée au chargement du formulaire.
Cela fonctionne à peu près tout le temps.
Et pourtant dans certains cas de double clic pour ouvrir le formulaire,
j'obtiens l'erreur d'exécution 2001.

Dans tes exemples sur ton site, la seule différence que je vois c'est le
Me.Image1.HyperlinkAddress = Me.Photo pour pouvoir ouvrir la photo avec
Photo Editor. Dans ce cas je n'en ai pas besoin.

A+

Alain

"Raymond [mvp]" a écrit dans le message de
news:
Tu as dis que tu voulais: pour charger un logo dans l'entète de mon
formulaire, j'ai pensé que tu voulais changer le logo du formulaire
lui-meme.
pour pouvoir utiliser les fichier jpg il faut que photo editor soit
installé.
lis la fiche :
http://officesystem.access.free.fr/images.htm
--
@+
Raymond Access MVP
http://OfficeSystem.Access.free.fr/
http://OfficeSystem.Access.free.fr/runtime/
http://users.skynet.be/mpfa/ pour débuter sur le forum


"Alain V" a écrit dans le message de news:
Okasc$
Bonjour Raymond,

Ce que j'insère dans mon formulaire, ce sont des fichiers JPEG ou BMP que
je place dans un contrôle de type image.
Je n'ai pas bien compris ce que tu voulais que je fasse avec l'api pour
changer le logo du formulaire.
De plus, je n'arrive pas à la faire fonctionner. Il ne se passe rien.

Merci

Alain






Avatar
Raymond [mvp]
Dim txt As String
txt = CurrentProject.Path & "ImagesLogoLogo.jpg"
Me.Logo.Picture = txt


Si logo est un cadre d'image, ça doit fonctionner correctement.
essaie de placer un DoEvents devant et derrière pour laisser respirer
access, c'est tout.

--
@+
Raymond Access MVP
http://OfficeSystem.Access.free.fr/
http://OfficeSystem.Access.free.fr/runtime/
http://users.skynet.be/mpfa/ pour débuter sur le forum


"Alain V" a écrit dans le message de news:

Re,

Voilà mon code:

Private Sub Form_Open(Cancel As Integer)

CommandBars("menu bar").Enabled = False
Dim txt As String
txt = CurrentProject.Path & "ImagesLogoLogo.jpg"
Me.Logo.Picture = txt

End Sub

Il me semble que cela est correct.
L'image est liée au chargement du formulaire.
Cela fonctionne à peu près tout le temps.
Et pourtant dans certains cas de double clic pour ouvrir le formulaire,
j'obtiens l'erreur d'exécution 2001.

Dans tes exemples sur ton site, la seule différence que je vois c'est le
Me.Image1.HyperlinkAddress = Me.Photo pour pouvoir ouvrir la photo avec
Photo Editor. Dans ce cas je n'en ai pas besoin.

A+

Alain