Discussion :

[Gardener68]

Bonjour,

Je rencontre un problème aléatoire avec les variables publiques.
J'ai défini dans un module 4 variables publiques destinées à recevoir les données de l'utilisateur (nom - droits d'accès - exercice comptable) au moyen des commandes

Code :

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

1
2
3
4
public user_Actif as string
public user_Droits as string
public user_Niveau as integer
public user_Exercice as string

Ces variables sont initialisées dans deux formulaires différents de l'application (le premier pour l'identifiant et les droits et un second pour l'exercice)
J'utilise l'instruction

Code :

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

1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
Private Sub txt_GApass_LostFocus()
  Dim db As Database
  Dim rs As Recordset
  Dim myQui as String, myDroits As String
  Dim myNiveau As Integer
  Set db = CurrentDb
  Set rs = db.OpenRecordset("tbl_B_Zone")
  rs.MoveFirst
 
  If Me.txt_GApass = rs![Pw_ONE] Or Me.txt_GApass = [Pw_TWO] Then
    If Me.txt_GApass = rs![Pw_ONE] Then
      myQui = "ONE"
      myDroits = "A1"
    Else
      myQui = "TWO"
      myDroits = "U2"
    End If
    myNiveau = rs!Niveau
  Else
    DoCmd.RunMacro "mac_B_Accs_QUIT"
  End If
 
  rs.Close
  Set rs = Nothing
  Set db = Nothing
 
  User_Actif = myQui
  User_Droits = myDroits
  User_Niveau = myNiveau
  .....
end sub

Or, au moment où le programme atteint la ligne de commande d'initialisation du code vb, j'obtiens systématiquement (si je pars d'un premier démarrage de l'application) ou parfois oui, parfois non (il y a des fois où il ne présente aucune "erreur"), après plusieurs utilisations de tout ou partie de l'application le message suivant :

Erreur de compilation: Nom ambigu détecté : User_Actif

et il est impossible de poursuivre l'application tant que cette ambiguïté n'est pas corrigée (et je ne vois plus comment).
L'aide Office est plutôt lacunaire sur le sujet et mes recherches dans la f.a.q. ne furent pas vraiment fructueuses.

Un coup de pouce svp ? Merci


Guy

[madefemere]

Bonjour,

Le message d'erreur à ma connaissance indique que la déclaration du variable est faite 2 fois dans l'application. Il faut vérifier que par erreur il n'y ait pas une autre déclaration.

Cordialement.

[Gardener68]

Bonsoir,

je viens de contrôler l'application qui a été construite par modules séparés.
En effet, un module contenait les déclarations de base et un autre avait gardé une seconde définition de 2 des 4 variables publiques.
Une fois effacé, plus de problème.

Un grand merci..... un tout grand merci.

Guy