Twitter iPhone pliant OnePlus 11 PS5 Disney+ Orange Livebox Windows 11

Où mettre variables globales?

3 réponses
Avatar
La Mouette
Bonjour,

Où puis-je mettre mes variables globales?
ex:
Dim cnx As ADODB.Connection
Set cnx = New ADODB.Connection
cnx.ConnectionString = "DSN=maConnexion; UID=SYSDBA;PWD=pwd;"

Je ne veux pas répéter ma chaîne de connection à tout bout de champ.
J'aimerais que de n'importe quel formulaire je fasse simplement:

cnx.Open
cnx.Close

Merci

3 réponses

Avatar
Eric
Bonjour La Mouette,

Dans un module de portée globale :

Public cnx As New ADODB.Connection

Public Sub Initialisation()
Set cnx = New ADODB.Connection
cnx.ConnectionString = "DSN=maConnexion; UID=SYSDBA;PWD=pwd;"
End Sub

La procédure Initialisation est appelée sur le 1er formulaire à
l'ouverture (formulaire de démarrage de ton application) par :

Call Initialisation


Ps : Ne pas oubier de faire un
Set cnx= Nothing


Où puis-je mettre mes variables globales?
ex:
Dim cnx As ADODB.Connection
Set cnx = New ADODB.Connection
cnx.ConnectionString = "DSN=maConnexion; UID=SYSDBA;PWD=pwd;"

Je ne veux pas répéter ma chaîne de connection à tout bout de champ.
J'aimerais que de n'importe quel formulaire je fasse simplement:

cnx.Open
cnx.Close

Merci


--
A+
Eric
Un petit tour ici : http://users.skynet.be/mpfa/
Accès aux archives :
http://groups.google.fr/group/microsoft.public.fr.access?hl=fr

Avatar
Eric
.../...

Arg, un copier-coller trop vite fait.
Supprimer le Set cnx = New ADODB.Connection dans la procédure
Initialisation

--
A+
Eric
Un petit tour ici : http://users.skynet.be/mpfa/
Accès aux archives :
http://groups.google.fr/group/microsoft.public.fr.access?hl=fr



Public cnx As New ADODB.Connection

Public Sub Initialisation()
Set cnx = New ADODB.Connection
cnx.ConnectionString = "DSN=maConnexion; UID=SYSDBA;PWD=pwd;"
End Sub



Avatar
La Mouette
Merci :)


Bonjour La Mouette,

Dans un module de portée globale :

Public cnx As New ADODB.Connection

Public Sub Initialisation()
Set cnx = New ADODB.Connection
cnx.ConnectionString = "DSN=maConnexion; UID=SYSDBA;PWD=pwd;"
End Sub

La procédure Initialisation est appelée sur le 1er formulaire à
l'ouverture (formulaire de démarrage de ton application) par :

Call Initialisation


Ps : Ne pas oubier de faire un
Set cnx= Nothing


Où puis-je mettre mes variables globales?
ex:
Dim cnx As ADODB.Connection
Set cnx = New ADODB.Connection
cnx.ConnectionString = "DSN=maConnexion; UID=SYSDBA;PWD=pwd;"

Je ne veux pas répéter ma chaîne de connection à tout bout de champ.
J'aimerais que de n'importe quel formulaire je fasse simplement:

cnx.Open
cnx.Close

Merci


--
A+
Eric
Un petit tour ici : http://users.skynet.be/mpfa/
Accès aux archives :
http://groups.google.fr/group/microsoft.public.fr.access?hl=fr