Crystal Report - Cambiar ruta base datos

Hola a tod@s
Estoy intentando cambiar la ruta de la base de datos, he puesto lo siguiente:
Dim Report as CrystalReport1

For x = 1 To Report.Database.Tables.Count
Report.Database.Tables(x).Location = App.Path "\amigos.mdb"
Next

esto me cambia la localizacion de la base de datos bien, pero tengo un reporte que en vez de elegir tablas hago un command con una sentencia sql, ya q es bastante grande y me da el error de que command no es una tabla.
Utilizo Visual Basic 6 y Crystal Report 9
Gracias de antemano

Hola Jose:

podrias por favor mandarme un ejemplo mas completo para cambiar la ruta de la base de datos? tengo el problema con los subreportes, no me cambia la base de datos de estos aunque del reporte principal si y esto veo que tu ya lo logras; el codigo que uso es el siguiente

For N = 0 To MDIServicio.CrystalReport1.RetrieveDataFiles - 1
MDIServicio.CrystalReport1.DataFiles(N) = \"C:\\SERVICIO\\BASE DE DATOS\\\" & Cia & \"SERVICIO\" & Ejercicio & \".MDB\"
Next


De antemano Gracias.

Roberto