Discussion :

[tonio-lille]

Bonjour à tous,

J'ai passé mon application access 2003 en access 2010. J'ai pris le nouveau format .accdb.

Je n'ai aucune erreur à la compilation.

J'ai un seul souci avec mes fonctions d'automation.

Lorsque je clique sur un bouton qui lance une impression via une automation word, il ne se passe rien. Je n'ai aucun message d'erreur. Si le document n'est pas ouvert en arrière plan, j'ai bien word qui s'ouvre mais ça s'arrête là.

Quelqu'un a-t-il une idée sur les problèmes récurrent concernant les fonctions d'automation lors d'un passage de access 2003 à access 2010?

Merci d'avance.

[tonio-lille]

C'est encore plus bizarre que je ne le pensais.

Sur mon poste équipé de Access 2010.

Avec le .accdb, il ne se passe rien.
Avec le .accde, j'ai un message d'erreur de base( l'expression sur click entrée en paramètre.....à l'origine d'une erreur)

Sur les autres postes équipés du runtime.

Tout marche parfaitement.

[Heureux-oli]

Salut,

Normalement, ça passe bien.

Mais avec si peu de renseignement sur ton problème, difficile d'en dire plus.

[tonio-lille]

Bonjour,

c'est difficile d'expliquer mieux tellement ça me parait illogique.

J'ai d'ailleurs tout installer sur un autre poste client. Même config, même application, sur l'un des deux tout s'imprime, sur l'autre le message d'erreur l'expression sur click entrée a généré une erreur.

Je suis repassé au .mde et le problème persiste.

Je vais essayer de recréer mes classes d'automations.

Je vous tiens au courant.

Merci

[tonio-lille]

Bon j'ai tout transférer dans une base neuve et là j'ai au moins un message d'erreur sur la ligne suivante :

Code :

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

Set docWord = msWord.Documents.Open(path, , lectureSeule)

c'est une erreur 4198 la commande a échoué.

On avance petit à petit.

[tonio-lille]

ça y est, j'ai trouvé la solution sur un forum ricain.

J'ai remplacé :

Code :

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

 Set msWord = New Word.Application

par

Code :

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

Set msWord = GetObject(, "Word.Application")

Pour l'explication du pourquoi du comment, il va falloir demander à quelqu'un de plus compétent.