[AC-2003] Public Variable (Form vers Form) [Résolu]

[PopsBoston]

Bonjour a tous

Apres une matinee de recherche active, et n'ayant pu trouver une solution a mon probleme, je me tourne vers vous. Il s'agit d'un probleme de "transfert de Public Variable" en deux Forms

Form A - FAuthentification - <Form Classique d'authentification CODE + PWD>

Code :

1
2
3
4
5
6
7
8
9
10
11
12
Option Compare Database
Option Explicit
Public PubCEntity As String
] ... [ 
If Me.Password.Value = DLookup("PASSWORD", "ENTITIES", "[ACRONYM] ='" & Me.CboEntity.Value & "'") Then
        PubCEntity = Me.CboEntity
        DoCmd.Close acForm, "FAuthentification", acSaveYes
        DoCmd.OpenForm "MAIN MENU "
    Else
        MsgBox "Password Invalid.  Please Try Again", vbOKOnly, "Invalid Entry!"
        Me.Password.SetFocus
    End If

-----------------------------------------------------------------

Form B -FCreationRecord

Code :

1
2
3
4
5
6
7
Option Compare Database
Option Explicit
Public PubCEntity As String
 
Public Function LoadCurrentEntity() As String
    LoadCurrentEntity = PubCEntity
End Function

Et lorsque je fais un MsgBox de LoadCurrentEntity, le champ est vide

Ou se situe mon erreur ?
Merci a vous
S.

[pgz]

Bonjour.

Si les routines que tu mentionnes sont dans les modules des formulaires, tu as 2 variables PubCEntity :

• FormA.PubCEntity
• FormB.PubCEntity

SI ces 2 varaibles étaient confondues, tu aurais une double déclaration et donc une erreur de compilation.

SI tu veux n'avoir qu'une variable et qu'elle soit étendue à l'ensemble de projet, alors ne la déclare qu'une fois et dans un module standard.

Cordialement,

PGZ

[PopsBoston]

Bonjour et merci

J'ai donc declaree uniquement ma Public Variable dans la premiere forme. (Je fais un MsgBox pour verifier que la variable est bien valorisee ... ce qui est le cas)

En revanche lorsque je passe de la forme "Identification" a l'autre form ... La variable est a "blanc"

[pgz]

Hello!

Envoyé par PopsBoston

J'ai donc declaree uniquement ma Public Variable dans la premiere forme.

Il faut la déclarer dans un module STANDARD.

PGZ

[PopsBoston]

Ah voila peut-etre mon erreur. Pourriez-vous me donner me donner une definition du module STANDARD ?

[PopsBoston]

Une petite recherche Internet et j'ai compris mon erreur ... en recherchant "Modele Standard" j'ai trouver ou declarer variable et fonction.

Merci mille fois pour l'aide et les axes de recherche ! Grandement apprecie !