Crystal Report - Cambiar conexion Oledb en CR bajo Visual 2008

¿Como puedo cambiar el origen de datos Oledb a un Report en CR bajo visual studio 2008?.

Me explico, he creado ee informe con la conexion Ole en el servidor, al directorio donde estará la BD.
(C:\Gestion_Programa\BaseDeDatos\basededatos.mdb)

Al ejecutarlo desde otro equipo de la red, la direccion de la BD. cambia y los informes no se ejecutan, ya que el directorio de las base será una unidad virtual (I:) donde i: es la referencia al directorio del servidor C:\Gestion_Programa)

Ya lo he resuelto

Hola apacheco, nos puedes comentar como lo has resuelto??
Gracias

Ahi lo tienes

Dim oConexInfo As ConnectionInfo = Nothing
Dim oListaTablas As Tables = Nothing
Dim oTabla As Table = Nothing
Dim oTablaConexInfo As TableLogOnInfo = Nothing

Dim oForm As FrmInformes

oConexInfo = New ConnectionInfo
oConexInfo.ServerName = basedato
oConexInfo.DatabaseName = String.Empty
oConexInfo.UserID = "Admin"
oConexInfo.Password = String.Empty

oListaTablas = oRpt.Database.Tables
For Each oTabla In oListaTablas
oTablaConexInfo = oTabla.LogOnInfo
oTablaConexInfo.ConnectionInfo = oConexInfo
oTabla.ApplyLogOnInfo(oTablaConexInfo)
Next

oForm = New FrmInformes
oForm.Text = "Descuadres en " & IIf(albfac = "A", "Albaranes", "Facturas")

Dim oRpt As New rptAlbaFactDesc

oListaTablas = oRpt.Database.Tables
For Each oTabla In oListaTablas
oTablaConexInfo = oTabla.LogOnInfo
oTablaConexInfo.ConnectionInfo = oConexInfo
oTabla.ApplyLogOnInfo(oTablaConexInfo)
Next

With oRpt
.DataDefinition.FormulaFields.Item("Listar").Text = "'" & albfac & "'"
.RecordSelectionFormula = "{AuxFactDescuadrada.Usuari_Afd} = '" & glbusuario & "'"

.Refresh()
End With

oForm.crvInformes.ReportSource = oRpt
oForm.Show()