[VBA] Access : formulaire et variable

Bonjour,
Ça je ne sais pas faire.
Mais si je devais me débrouiller avec ce genre de problème, j'écrirais le login dans un fichier que je pourrais aller lire n'importe quand. Ça pourrait utiliser “Open #1 for access"... ou quelque chose comme ça.

;-)

Tu déclares ta variable en "Public", dans un module...

Ex: Public NomUtilisateur As String

;-) Wild and Free

Bonjour,

Tout d'abord merci pour vos réponses.

Gifeh : Je ne souhaitais pas créer de fichier, mais je n'exclu pas cette hypothèse.

WhiteFang : Le problème est que je perds la valeur de la variable quand je ferme le formulaire d'authentification. Peut-être que je zappe quelque chose ? ...

Si vous avez d'autres idées, elle sont les bienvenues en tout cas :)

Encore merci.

Cdlt Sheraf

;-)

Vi vi, tu "zapes" kaik chause ! ;-)))

Une variable déclarée "Public" est accessible dans TOUT le code, c'est ce que l'on appelle une "portée globale", au contraire d'une "portée locale", une variable qui n'a d'existence que le temps de la procédure... (pour simplifier)

Ta variable "Public, tu t'en sers partout dans ton programme, ensuite...

;-)

Mas là, tu a compris que les mots "variable" et "programme" dans une même phrase implique du code VBA ?
;-) Wild and Free

J'avoue ne pas avoir tout compris.

Je sais qu'une variable public est utilisable partout dans le programme. Mon problème est que cette meme variable perd sa valeur si je l'appelle d'un autre formulaire.

Concraitement, dans un module j'ai fais :

Public currentLogin As String

Dans mon formulaire d'authentification j'ai ca :

currentLogin = txtLogin.Value
DoCmd.OpenForm "Formulaire Accueil"
DoCmd.Close acForm, "auth", acSavePrompt

Ensuite j'ai créé un bouton dans "Formulaire Accueil" qui m'affiche la valeur de currentLogin (msgbox currentLogin).
Le problème c'est que la msgbox est vide.

La seule chose que je veux c'est que quand toto se loggue, la msgbox affiche toto :)

Voila tout.

Sheraf

C'est bon j'ai trouvé !
il fallait faire :
ModuleLogin.currentLogin = txtLogin.Value
au lieu de :
currentLogin = txtLogin.Value

Merci beaucoup en tout cas pour m'avoir aidé.

Cordialement
Sheraf

;-)

C'est bien, tu as trouvé vite ! ;-) Pas eu le temps d'écrire le bout de code ! ;-) Wild and Free

Salut ! je suis etudiant et j'ai besoin de faire un formulaire d'authentification quand access ce lance ! suivant l'utilisateur celui ci a des droit speciaux ! j'ai creer une table utilisateurs dans la bd ! Sauf que je ne connais pas le code vba pour faire un forumulaire d'authentification ! j'ai donc besoin de ton aide !