Ayuda Para DataReport

Jose
01 de Enero del 2004
Por favor necito crear un DataReport con 7 o mas secciones pero sin DataEnvioment alquien quien em pueda mandar el codigo se lo agradeciria mucho , por favor lo necesito antes de 2 semanas a partir de hoy 31-12-03 gracias mi correo es :[email protected]

dsg
01 de Enero del 2004
dsgdgfdh

Marag
01 de Enero del 2004
Option Explicit
Private WithEvents rsI As Recordset

Private Sub DataReport_Initialize()
Informe.Orientation = rptOrientPortrait
Set rsI = frmEdit.rsI
Set Informe.DataSource = rsI
WindowState = vbMaximized

End Sub