Discussion :

[ben_skywalker]

je me suis rendu compte que pour alléger mon code, pour compléter mes table a partir d'un formulaire, il falait que j'écrive une procédure à part pour les compléter. Cependant cette procédure à besoin de variable locales. donc je es est mise là ou je penssait qu'elle pourrais être en globale, et là c'est le drame Access retrouve plus ses petits et erraur '91' Variable objet ou Variable de bloc with non définie!!!

1) il n'y a pas de bloc with dans mon code, je ne les utilise pas.
2)il n'y a pas de GoTo non plus

3) voici ou j'ai fait mais déclaration, m'y suis-je mal pris?

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
4
5
6
7
8
9
10
11
 
Option Compare Database
Option Explicit
 
Dim Db As Database
Dim RsFichier As Recordset
Dim RsType As Recorset
Dim RsCle As Recorset
Dim RsDes As Recorset
________________________________________
Sub....

[marot_r]

1) si tu as besoin d'une variable locale pourquoi la rendre globale ? Une pratique recommandée est de NE PAS UTILISER ;-) les variables gloables qui sont sources de bugs difficile à traquer. Si tu as besoin de partager une variable entre diverses procédures il vaut mieu utiliser des paramètres explicites.

2) Probablement que ta variable globale n'est simplement jamais initialisée. Il faut qu'à un moment dans ton code tu lui attribue une valeur.

A+

[argyronet]

Bonjour,

3) voici ou j'ai fait mais déclaration, m'y suis-je mal pris?

D'ores et déjà, toute déclaration de module se déclare Private et pas Dim...
Ensuite, il faut éviter autant que possible de mettre des variables objet en entête de module car même si tu dois réutiliser un Recordset par exemple, il vaut mieux le Fermer, le mettre à Nothing et le réouvrir
Il est rare d'avoir besoin de recourir à la méthode dans laquelle tu étais prêt à te lancer.
L'usage de fonctions publiques DAO est plus souple...
L'usage de propriétés dans une Classe appelant des fonctions locales privées est idéal.

Argy

[ben_skywalker]

1) si tu as besoin d'une variable locale pourquoi la rendre globale ? Une pratique recommandée est de NE PAS UTILISER ;-) les variables gloables qui sont sources de bugs difficile à traquer. Si tu as besoin de partager une variable entre diverses procédures il vaut mieu utiliser des paramètres explicites.

Ensuite, il faut éviter autant que possible de mettre des variables objet en entête de module car même si tu dois réutiliser un Recordset par exemple, il vaut mieux le Fermer, le mettre à Nothing et le réouvrir

j'ai pas du me faire bien comprendre, j'initialise un recordset dans une procédure evènementielle, pour lui faire un tas de test pour le valider, ensuite une fois valide j'appelle une procédure non évènementielle, pour compléter mes table, de mon point de vue pourquoi rajouter des lignes de code quand on peux ne pas les mettre avec des variable globales.

2) Probablement que ta variable globale n'est simplement jamais initialisée. Il faut qu'à un moment dans ton code tu lui attribue une valeur.

A+

l'erreur survient au momoment ou je fait :

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

Set Rs = Db.OpenRecordset(SqlFich, dbOpenDynaset)

comprend plus sa marchais avant et la sa plante.

toute déclaration de module se déclare Private et pas Dim...
...
L'usage de fonctions publiques DAO est plus souple...
L'usage de propriétés dans une Classe appelant des fonctions locales privées est idéal

désolé je ne comprends pas pour moi une variable se déclare par Dim pas par Private. ensuite peux tu m'expliquer ce qu'est une fonction public DAO?
ainsi qu'une Classe?
Sur Access j'arrive à coder normalement, mais la j'ai des erreur à répétition sa me gonfle mais j'essaies de résoudre la majorité de mes problème car sinon le forum serait plein de Topic écrit par moi sauf dans le cas ou ce pb a déjà été traiter. bon sur ceux je vous laisse je vais tester vos solutions. et je vous recontacte pour le résultat @+

[ben_skywalker]

A la suite d'un test SANS RIEN CHANGER, sa a marcher, et là plus rien, la ram à du ce vider et le message d'erreur apparès à ce moment la vous en penser quoi?

[marot_r]

j'ai pas du me faire bien comprendre, j'initialise un recordset dans une procédure evènementielle, pour lui faire un tas de test pour le valider, ensuite une fois valide j'appelle une procédure non évènementielle, pour compléter mes table, de mon point de vue pourquoi rajouter des lignes de code quand on peux ne pas les mettre avec des variable globales.

C'est parce que tu n'as pas passé assez d'années à chercher les bugs générées par les économies de code de ce genre :-))).

Pour la déclaration Dim déclare une variable publique visible de tous les modules de ton appli. Private restreint la visibilité à un module donné.

Là encore c'est une pratique recomandée. Moins tu montres d'informations, moins tes élémenst sont liés entre eux et moins de chance de briser ton code en faisant un changement ailleur. De cela découle notement le conseil d'éliminer les variables globales.

Bon revenons à ton pb :

l'erreur survient au momoment ou je fait :

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
 
Set Rs = Db.OpenRecordset(SqlFich, dbOpenDynaset)

Met un point d'arret sur cette ligne ci et vérifie si DB est initalisée et si SqlFich n'est pas vide.


A+

[ben_skywalker]

comment voir si Db est initialiser?

[marot_r]

dans la fenêtre de debugage (CTRL+G) tape ? db.name
tu devrais voir le nom de ta base en cours et surtout quelque part dans ton code (et vive les variables globales :-) ru devrait avoir un set db=quelquechose (probablement set db=CurrentDB)

A+

[ben_skywalker]

set db = currentDb j'ai, mais j'ai l'impression bizarre que quand je suis en mode débogage, ma ram perd ses infos sur les variables

[marot_r]

Ok mais le Set est-il executé avant que u arrive à ta ligne de code ?

A+

[ben_skywalker]

oui sa c sur, c'est la première ligne de code de la procédure.

[marot_r]

Ok, donc vérififie en mode debug si elle est toujours définie lorsque tu arrive à l'instruction qui plante.

A+

[ben_skywalker]

ben la elle ne doi tplus l'être, car message d'erreur objet requit!! et sa ne plante plus maintenant?? bizare j'ai couper la ligne set Db =CurrentDb et j'ai fait annuller et sa marche?? alala, moi je cherche plus à piger sa c'est MS

[marot_r]

Ta dernière réponse est une illustration directe du genre de pbs que posent les variables globales.

DB est probablement manipulée par plusieurs modules ce qui fait que tu ne peux jamais savoir si elle va être dans un état correct ou pas.

Je te prédis d'autre bugs innexplicables dans un avenir proche (et quelques bonnes poignées de cheveux en moins :-).

Bon courage.

A+