Appel unique StrConn à partir de plusieurs pages

J'ai une connexion à SQL Server mis en place dans mon code vba.Appel unique StrConn à partir de plusieurs pages

Le format est le suivant:

strConn = "ODBC;Driver=SQL;Server=SQL1;Database=DB1;Uid=1;Pwd=1"

J'ai cela dans 4 feuilles, mais il y aura des moments où je veux le changer pour appeler de SQL2 SQL3, et au lieu de changer le code sur chaque feuille 4 fois, je veux le changer une seule fois.

Existe-t-il un moyen de configurer cette ligne pour l'exécuter en l'appelant depuis un autre emplacement ou en passant une chaîne dans le ""?

Source

2010-06-17 Daniel

Pourquoi ne pas ajouter un module ou une classe au projet avec une fonction qui renvoie la chaîne de connexion

Function GetConnection() 
    GetConnection= "ODBC;Driver=SQL;Server=SQL1;Database=DB1;Uid=1;Pwd=1" 
End Function

Ou une

constante

Public Const strConn As String = "ODBC;Driver=SQL;Server=SQL1;Database=DB1;Uid=1;Pwd=1"

Source

2010-06-17 19:21:53 Gratzy

Pour la fonction que je venais de devoir ajouter "GetConnection" où je voulais le transmettre? – Daniel

Ajoutez un module au projet et placez-y la fonction appel GetConnecton lorsque vous avez besoin d'utiliser la connexion. La constante est probablement meilleure. Déclarez-le dans le module et utilisez-le comme une variable, c'est juste en lecture seule. – Gratzy

Appel unique StrConn à partir de plusieurs pages

Répondre

Questions connexes