Imprimir informes access

[guillebomtrasmiti]

Hola amigos, tengo un ligero problema, espero alguien pueda ayudarme, se a la perfección imprimir un informe de access, el problema es que quiero hacerlo según las fechas que tengo seleccionadas en un datetimepicker...¿alguién puede ayudarme?, os dejo mi código, gracias...

Private Sub BInforme_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles BInforme.Click
Try
Dim oAccess As Access.Application

'Start a new instance of Access for Automation:
oAccess = New Access.ApplicationClass()

'Open a database in exclusive mode:
oAccess.OpenCurrentDatabase(filepath:="C:\GesDream tPos\GesDreamtpos\Gestion.mdb", Exclusive:=True)

'Preview a report named Sales:
oAccess.DoCmd.OpenReport(ReportName:="Dreamt_Venta s_Zeta", _
View:=Access.AcView.acViewPreview)
'Print a report named Sales:
oAccess.DoCmd.OpenReport(ReportName:="Dreamt_Venta s_Zeta", _
View:=Access.AcView.acViewNormal)
oAccess.CloseCurrentDatabase()

Catch
MessageBox.Show("Tiene problemas con su visor de documentos en Windows reinstale su paquete office 2003")
End Try
End Sub

[guillebomtrasmiti]

lo arreglé creando una tabla temporal donde cargo los datos que están seleccionados, gracias si sabeis algo mejor os espero amigos