Discussion :

[Quarkz2010]

Bonjour,

J'ai un probleme assez inabituel je pense :

Voila, j'utilise ce code qui vient + ou - de la FAQ pour bloquer une base afin que le client ne voit pas les sources :

Code :

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

1
2
3
4
5
Dim i As Integer
For i = 1 To Application.CommandBars.Count
DoCmd.ShowToolbar Application.CommandBars.Item(i).Name, acToolbarNo
Next
DoCmd.ShowToolbar Application.CommandBars.Item(47).Name, acToolbarYes

(le but etant de masquer toutes les barres d'outils sauf une, qui est une barre personnalisée)
ce qui est assez spécial c'est que ce code fonctionne parfaitement sur Access 2000 fr mais pas sur Access 2000 espagnol.

Et comme mon appli est en espagnol je développe sur un access en espagnol

normalement, quelquesoit la langue le code VB reste le meme non???
Ce qui plante dans le mode pas a pas c'est

Code :

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

DoCmd.ShowToolbar Application.CommandBars.Item(i).Name,....

apres avoir fait quelques tests,

Code :

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

Application.CommandBars.Item(47).Name

renvoie bien une chaine
et

Code :

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

acToolbarNo

est bien reconnu
dans une autre partie de ma base j'utilise un

Code :

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

DoCmd.SelectObjet

qui marche bien.

J'ai essayé de mettre Application.DoCmd.Command.... mais rien n'y fait.
Si quelqu'un a déja vu un truc pareil, je suis preneur pour tout solution...
merci d'avance

[Ric500]

Peut-être en changeant le MSACC.OLB espagnol par celui de l'installation d'access en français? (mais rien n'est moins sûr !!!)

[rangernoir]

Il faut faire attention à certains mot du code vba.

Par exemple, pour la zone de texte, on a en français, comme "identifiant" Texte12 mais en anglais cela donnera Text12.

Vérifie toujours si en Espagnol les zone on les même noms.

Rangernoir 8)