Logo GNT
Actualités Tests & Guides Bons Plans
GTA 6 iPhone 17 Copilot Switch 2 Temu ChatGPT Tesla
OVH Cloud OVH Cloud
Entraide Applications Microsoft Office Access Version Access

Version Access

20 réponses
Avatar
zoom61
J'ai développé une application Access 2002 sur un poste et elle fonctionne
très bien. Il n'y a qu'un fichier.
Hors je veux l'installer sur un autre poste, et là tous les boutons de mes
formulaires ne fonctionnent et cela me jette brutalement d'Access. En sachant
que l'installation d'Access a été faite et refaite.
Que dois-je faire pour pouvoir utiliser mon application sur un autre poste
qui a Access 2002 ?
Signaler un problème avec ce contenu

10 réponses

Supprimer
Cette action est irreversible, confirmez la suppression du commentaire ?
Signaler le commentaire

Veuillez sélectionner un problème

Nudité
Violence
Harcèlement
Fraude
Vente illégale
Discours haineux
Terrorisme
Autre
1 2
Avatar
zoom61
Salut,

La déclaration des variables dans le code est correct.

J'ai déjà essayé d'importer ma base dans une base vierge, et le problème est
le même...

Merci.
Avatar
Raymond [mvp]
Bonjour.

c'est un formulaire, sûr. il faut essayer de le repérer à la mise en route.
ensuite ré-importer dans une base vierge sans ce formulaire. dans cette
opération, ne jamais cliquer sur sélectionner tout car dans ce cas il prend
tout même un objet invisible qui reste dans la base et qui met la panique,
cliquer sur chaque objet par séries de 15 par exemple.

--
@+
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


"zoom61" a écrit dans le message de news:

Salut,

La déclaration des variables dans le code est correct.

J'ai déjà essayé d'importer ma base dans une base vierge, et le problème
est
le même...

Merci.


Avatar
zoom61
Salut,

J'ai fait comme tu as dit, créer une nouvelle base, importer par paquet de
10. Et refait le formulaire défectueux et cela ne fonctionne toujours pas.

Merci.
Avatar
Raymond [mvp]
passe moi ta base en zip par mail. enlève le XYZ. (le point aussi) dans mon
adresse. je sens que je vais trouver quelque chose. il fait soleil, +10°c ,
le temps idéal.

--
@+
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


"zoom61" a écrit dans le message de news:

Salut,

J'ai fait comme tu as dit, créer une nouvelle base, importer par paquet de
10. Et refait le formulaire défectueux et cela ne fonctionne toujours pas.

Merci.


Avatar
zoom61
Salut,

Je ne peux te l'envoyer car c'est une application spécifique avec des
éléments qui ne doivent pas sortir de l'entreprise.

Désolé...

Merci.
Avatar
Raymond [mvp]
désolé pour toi, tu te coupes d'éventuelles aides précieuses. il n'y a pas
besoin d'envoyer les contenus des tables.

--
@+
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


"zoom61" a écrit dans le message de news:

Salut,

Je ne peux te l'envoyer car c'est une application spécifique avec des
éléments qui ne doivent pas sortir de l'entreprise.

Désolé...

Merci.


Avatar
zoom61
Salut,

Avec le code du formulaire peut m'aider :

Le code du bouton est le suivant :
DoCmd.SetWarnings False
DoCmd.OpenQuery "requête1"
DoCmd.OpenQuery "requête2"
DoCmd.SetWarnings True
MaJ
Me.Refresh

Le code MaJ est le suivant :
DoCmd.SetWarnings False
DoCmd.OpenQuery "requête_a"
DoCmd.OpenQuery "requête_b"
DoCmd.SetWarnings True
If (Forms![Formulaire1]![SFormulaire1].Form!Test1 = 1) Then
Forms![Formualire1]![SFormulaireA].Visible = True
End If
If (Forms![Formulaire1]![SFormulaire1].Form!Test1 = 0) Then
Forms![Formulaire1]![SFormulaireA].Visible = False
End If
If (Forms![Formulaire1]![SFormulaire2].Form!Test2 = 1) Then
Forms![Formualire1]![SFormulaireA].Visible = True
End If
If (Forms![Formulaire1]![SFormulaire2].Form!Test2 = 0) Then
Forms![Formulaire1]![SFormulaireA].Visible = False
End If
...
Forms![Formulaire1]![SFormulaireA].Requery
Forms![Formulaire1]![SFormulaire1].Requery
Forms![Formulaire1]![SFormulaire2].Requery
...

Voici à quoi ressmemble mon code, et d'où vient mon problème. Suivant le
bouton que je sélectionne, cela met à jour une table, et ensuite, cela rend
visible ou pas le sous-formulaire correspondant.

Merci.
Avatar
Raymond [mvp]
Si tu es sûr que ça vient de ce code (pa convaincu du tout), met un point
d'arrêt sur chaque ligne et dégogue ta base ligne à ligne.
supprime le DoCmd.SetWarnings False pour laisser les messages système.
le focus se trouve où lorsque tu mets invisible ? faudrait le mettre sur un
objet visible.
--
@+
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


"zoom61" a écrit dans le message de news:

Salut,

Avec le code du formulaire peut m'aider :

Le code du bouton est le suivant :
DoCmd.SetWarnings False
DoCmd.OpenQuery "requête1"
DoCmd.OpenQuery "requête2"
DoCmd.SetWarnings True
MaJ
Me.Refresh

Le code MaJ est le suivant :
DoCmd.SetWarnings False
DoCmd.OpenQuery "requête_a"
DoCmd.OpenQuery "requête_b"
DoCmd.SetWarnings True
If (Forms![Formulaire1]![SFormulaire1].Form!Test1 = 1) Then
Forms![Formualire1]![SFormulaireA].Visible = True
End If
If (Forms![Formulaire1]![SFormulaire1].Form!Test1 = 0) Then
Forms![Formulaire1]![SFormulaireA].Visible = False
End If
If (Forms![Formulaire1]![SFormulaire2].Form!Test2 = 1) Then
Forms![Formualire1]![SFormulaireA].Visible = True
End If
If (Forms![Formulaire1]![SFormulaire2].Form!Test2 = 0) Then
Forms![Formulaire1]![SFormulaireA].Visible = False
End If
...
Forms![Formulaire1]![SFormulaireA].Requery
Forms![Formulaire1]![SFormulaire1].Requery
Forms![Formulaire1]![SFormulaire2].Requery
...

Voici à quoi ressmemble mon code, et d'où vient mon problème. Suivant le
bouton que je sélectionne, cela met à jour une table, et ensuite, cela
rend
visible ou pas le sous-formulaire correspondant.

Merci.



Avatar
zoom61
Salut,

Grâce à toi, j'ai trouvé la solution, mais je ne sais pas pourquoi, cela ne
fonctionne pas.

Peut-être que tu connais la solution ?
Le problème venait de la commande Me.Refresh qui est dans le code du bouton :

Le code du bouton est le suivant :
DoCmd.SetWarnings False
DoCmd.OpenQuery "requête1"
DoCmd.OpenQuery "requête2"
DoCmd.SetWarnings True
MaJ
Me.Refresh

Je te remercie, car en mettant des points d'arrêt (chose à laquelle je n'ai
pas songé) l'erreur est venue toute seule.
Encore merci.

Au prochain problème.
Avatar
Raymond [mvp]
Certainement parceque le focus n'était pas sur un formulaire et
l'instruction ne fonctionne que sur un formulaire.

--
@+
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


"zoom61" a écrit dans le message de news:

Salut,

Grâce à toi, j'ai trouvé la solution, mais je ne sais pas pourquoi, cela
ne
fonctionne pas.

Peut-être que tu connais la solution ?
Le problème venait de la commande Me.Refresh qui est dans le code du
bouton :

Le code du bouton est le suivant :
DoCmd.SetWarnings False
DoCmd.OpenQuery "requête1"
DoCmd.OpenQuery "requête2"
DoCmd.SetWarnings True
MaJ
Me.Refresh

Je te remercie, car en mettant des points d'arrêt (chose à laquelle je
n'ai
pas songé) l'erreur est venue toute seule.
Encore merci.

Au prochain problème.


1 2