Utilisation d?une collection pour gérer tous les paramètres d?une application ms access

Télécharger le projet
Commenter

Description

Si vous avez une application MS Access où vous déclarez plusieurs variables publiques ou une application avec des requêtes paramétrées, vous pouvez remplacer toutes ces variables avec une seule collection et 2 fonctions assurant la gestion de cette collection.
Le code se détaille ainsi;
- la déclaration de la collection pcolParametresRequete dans un module standard;
- la fonction FixerValeurParam pour enregistrer vos paramètres dans la collection et qui possède 2 paramètres;
o strNomParam qui est le nom du paramètre et la clé de la collection;
o vntValeur qui est la valeur du paramètre;
- la fonction FournirValeurParam qui retourne la valeur du paramètre indiqué par strNomParam;
- dans les 2 fonctions, on trouve la commande « On Error Resume Next » qui poursuit le déroulement du code à la ligne suivante soit celle levant une erreur si vous indiquez le nom d?une clé inexistante.

Voici des exemples de syntaxe des fonctions;
Call FixerValeurParam(strNomParam:="NomDuParamètre", _
vntValeur:=ValeurDuParamètre)

FournirValeurParam(strNomParam:="NomDuParamètre")

Source / Exemple : 


Option Explicit

Public pcolParametresRequete As New Collection

Function FixerValeurParam(ByVal strNomParam As String, _
                          ByVal vntValeur As Variant) As Boolean
  On Error Resume Next
  With pcolParametresRequete
     Remove strNomParam
     Add vntValeur, strNomParam
  end With
End Function

Function FournirValeurParam(ByVal strNomParam As String) As Variant
  On Error Resume Next
  FournirValeurParam = pcolParametresRequete(strNomParam)
End Function
Télécharger le projet

Codes Sources

A voir également

S'inscrire maintenant

Vous n'êtes pas encore membre ?

inscrivez-vous, c'est gratuit et ça prend moins d'une minute !

Les membres obtiennent plus de réponses que les utilisateurs anonymes.

Le fait d'être membre vous permet d'avoir un suivi détaillé de vos demandes et codes sources.

Le fait d'être membre vous permet d'avoir des options supplémentaires.

Du même auteur (hector_quebec)