Hola amigos

Quisiera saber como hago para cambiar la ubicación de mi base de datos de mi reporte que hice en CRYSTAL REPORT 8.5. Lo digo porque siempre recupera datos de la ubicación que fue creada , necesito cambiar esa ubicación en tiempo diseño o de lo contrario que acepte por defecto la misma ubicación del ejecutable.

Trabajo por ahora con ACCESS 2003 y Visual Basic 6.0. Les envío parte de mi código:

Código:
  1. Public CrApp As New CRAXDRT.Application
  2. Public crReport As New CRAXDRT.Report
  3. Dim cn1 As New ADODB.Connection
  4. Dim rst As ADODB.Recordset
  5. Dim rutaBD As String
  6.  
  7. Private Sub Form_Load()
  8. Set crReport = CrApp.OpenReport(App.Path & "\RptProductos.RPT", 1)
  9. crReport.DiscardSavedData
  10. crReport.EnableParameterPrompting = False
  11. crReport.ReportTitle = titulo
  12. Me.Caption = "Informe de Productos"
  13.   With Me.CRViewer1
  14.     .ReportSource = crReport
  15.     .ViewReport
  16.     .DisplayGroupTree = False
  17.     .Zoom 90
  18.   End With
  19. End Sub


Como puedo hacer para establecer una nueva ubicación???? Gracias chicos.

Fernando