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 :
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
DoCmd.ShowToolbar Application.CommandBars.Item(i).Name,....
apres avoir fait quelques tests,
Application.CommandBars.Item(47).Name
renvoie bien une chaine
et
est bien reconnu
dans une autre partie de ma base j'utilise un
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
Partager