Home
Home

---Soumis par Andy Baron---

Utiliser un recordset comme datasource d'un état.

Le recordset possède une propriété rarement utilisée,  Name, qui retourne la table, la requête ou l'énoncé SQL qui fut utilisé pour l'ouvrir. C'est exactement ce qui est requis pour assigner la propriété recordsource.

Dans la procédure événementielle Open d'un état:

Private Sub Report_Open(Cancel As Integer)
  Me.RecordSource = grst.Name
End Sub

Dans un module standard:

'Code Courtesy of
'Andy Baron
'
Public grst As Recordset

Public Sub testreport()
  Set grst = CurrentDb.OpenRecordset( _
		"Select * from tblTest1 where longfield=4")
  DoCmd.OpenReport "rptTest1", acViewPreview  
  grst.Close  
  Set grst = Nothing
End Sub