Discussion :

[safa-ini]

bopnjour,
j'ai créé un etat avec sous etat, et je veux récuperer les données de chaque ligne de cet etat pour faire des traitement et les afficher apres,
dans le sous etat des l'ouverture j'ai créé la procedure

Code :

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

1
2
3
4
5
6
Private Sub Report_Open(Cancel As Integer)
    Dim oRst As DAO.Recordset
    Dim oDb As DAO.Database
    Set oDb = CurrentDb
    Set oRst = Me.Recordset
End Sub

pour la ligne Set oRst = Me.Recordset j'ai l'erreur suivante
erreur d'éxecution 32585: cette fonctionnalité est uniquement disponible dans un fichier ADP

[Le Sage]

Bonjour !

Ancien sujet resté sans réponse, et du coup toujours d'actualité... Je le relance donc, puisque je me heurte au même problème et que je ne trouve de solution nulle part !

En résumé, comment récupérer le recordset d'un état, sachant que c'est bien ça dont j'ai besoin et pas de repartir de sa requête ou autre système de contournement : j'ai vraiment besoin de récupérer le jeu d'enregistrement de l'état en cours...


En vous remerciant par avance, bien cordialement,
Eric.

[micniv]

Bonjour,
Dans les états vous ne pouvez pas utiliser directement le Recordset ou le RecordsetClone source de l'état.
Ce qui est possible c'est de redéfinir un recordset sur ce 'source' :

Code :

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

1
2
3
4
5
6
7
8
9
10
11
 
Private Sub Report_Load()
' ERREUR avec : Debug.Print Me.Report.RecordsetClone(1).Name
Dim rs1 As DAO.Recordset
Set rs1 = CurrentDb.OpenRecordset(Me.RecordSource)
Debug.Print rs1.RecordCount
Debug.Print rs1(1).Name & " " & rs1(1)
'...
 
Set rs1 = Nothing
End Sub

Utiliser plutôt l’événement _OnLoad, L’événement __open est un peu trop tôt.
Bonne continuation

[Le Sage]

Bonjour micniv, et merci pour cette réponse.

Comme je le disais dans mon précédent post, c'est du jeu de données de l'état dont j'ai besoin : celui-ci étant fondé sur une requête paramétrée qui récupère des informations dans un formulaire, je ne peux pas utiliser son RecordSource . Lorsque j'essaie de le faire, il me "répond" : "Trop peu de paramètres. 4 attendus", ce bien que le formulaire source est ouvert... ce qui laisse supposer que l'appel au RecordSource ne renseigne pas les paramètres de la requête...
D'ailleurs, si je lance directement la requête, elle fonctionne parfaitement...


Un état n'est jamais que la représentation d'un jeu de données, et j'ai vraiment du mal à croire qu'il soit impossible de le récupérer alors que c'est si simple sur un formulaire...

Je vais donc continuer de farfouiller

Merci quand même de m'avoir accordé de ton temps !

[Le Sage]

Ca y est, j'ai trouvé !

Pas comment récupérer le RecordSet d'un état, mais comment palier le problème de la requête paramétrée :
dans cette contribution, =JBO= nous fait cadeau d'une fonction qui permet de récupérer sans aucun effort le Recordset d'une requête paramétrée !

Du coup, la solution à mon problème est bien d'utiliser le RecordSource de l'état :

Code dans le module de mon formulaire :

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

Set daoRst = DAO_GenericOpenRecordset(Me.RecordSource, dbOpenSnapshot)

Un grand merci à =JBO= pour cette précieuse contribution !