Crystal Report - DESESPERACION NO PUEDO NO PUEDO

Saludos antes de nada.

Este es el codigo que tengo para pasarle un SQL desde Visual basic
pero el hijo de p.... no me da ningun error ni nada por el estilo pero cuando se abre el reporte no cambia nada sigue siendo el que tengo en el directorio por favor ayuda

Dim Report As New CrystalReport1
Dim Conexion As New Connection
Dim rs As New ADOR.Recordset

Private Sub Form_Load()

Conexion.Open "Provider=Microsoft.Jet.OLEDB.4.0;Data Source=C:\Eurogruas\Bases\Gestion2.mdb;Persist Security Info=False"

Screen.MousePointer = vbHourglass
rs.Open "SELECT * FROM Partes", Conexion
Report.Database.SetDataSource rs
CRViewer91.ReportSource = Report
CRViewer91.ViewReport
Screen.MousePointer = vbDefault

End Sub

Posiblemente lo que este mal es tu Reporte, si lo grabaste con la pestala de "Preview" activada siempre te va a dar lo que dejaste a la vista.

Saludos

En el menu File, hay una opcion que posiblemente dejaste marcada que es: "Save data with Report", intenta con eso