Discussion :

[Tintou]

Bonjour,

Je n'arrive pas à utiliser un recordset défini dans le module d'un formulaire, dans une public sub.
Pour etre plus précis, je définis un recordset au moment du chargement d'un formulaire, ce recordset me sert à récupérer des résultats d'une table. Ensuite je fais un publipostage et j'ai mis cette fonction de publipostage dans un module indépendant (car j'ai besoir de cette fonction depuis plusieurs form), le premier c'est que dans ce module, il ne semble pas reconnaitre le recordset.
Auriez vous une idée de comment faire ?

Merci d'avance.

[eclesia]

montre le code sinon on n'a pas beaucoup de chance de deviner l'erreur.

[Tintou]

J'ai plus ou moins réussi à résoudre mon problème de recordset en le redéclarant dans le module. Maintenant en fait j'ai un peu le même problème, je déclare une variable en tant que formulaire, je lui attribue une valeur et quand j'arrive dans ma fontion, il perd la valeur attribuée. C'est en fait le même problème transposé à l'utilisation de variable.
Le code (le début) de ma fonction est (dans un module indépendant):

Code :

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

1
2
3
4
5
6
 
Public Sub publipostage()
 
Dim listres As String
    listres = "SELECT ResID, ReportID, QuestID, Comments, Status, Quote, pic1, pic2, pic3, pic4, OrderID FROM RESULTS WHERE ReportID = " & formulaire2.ReportID & " ORDER BY ResID "
    Set listresrs = db.OpenRecordset(listres, DB_OPEN_SNAPSHOT)

et le code qui fait appel à cette fonction (dans le module du formulaire):

Code :

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

1
2
3
4
5
6
7
 
Private Sub publi_Click()
 
Set formulaire2 = Form_ModifResults
Set formulaire = Form_ReportInfo
 
publipostage

Et donc lorsqu'il arrive à la dernière ligne du premier bout de code j'ai une erreur me disant qu'une variable n'a pas été attribuée.

[Tintou]

Même si j'attribue le nom du formulaire à la variable donc le module publipostage, il ne me reconnait pas "formulaire2.ReportID".

[Stéphane Olivier BERNARD]

Bonjour,

Ne devrais-tu pas déclarer ta variable comme globale afin qu'elle soit connue de tous les modules de formulaires ?

Bout de code à placer dans le module indépendant:

Code :

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

1
2
3
 
'Déclaration des variables
Global #Nomvariable# As #Type variable#

[Tofalu]

La variable Formulaire2 est a passer en paramètre à la Sub du module sans quoi il ne peut pas la connaitre puisqu'elle n'est pas dans sa portée. La déclarer en Global peut régler ton problème mais c'est très sale et très gourmand en ressources.

[Tintou]

Merci pour vos réponses, je ne pensais pas que j'étais obligé de passer toutes les variables en paramètres, c'est bien domage.