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

Soyez le premier à donner votre avis sur cette source.

Vue 5 275 fois - Téléchargée 493 fois

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

Codes Sources

A voir également

Ajouter un commentaire

Commentaires

Messages postés
13280
Date d'inscription
lundi 13 décembre 2004
Statut
Modérateur
Dernière intervention
3 février 2018
35
salut,
je n'ai pas regardé le code, as-tu également géré l'enregistrement de ces valeurs à la fermeture, afin de les récupérer à la réouverture?
si c'est pas le cas çà serait un plus (indispensable non?).
chercher "fichier ini" pour voir comment procéder facilement si besoin

++ ;)

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.