Visual Basic - Auxilio!!!! Problemas con ruta de Data

Hola!!
Tengo el siguiente problema:

Utilizo el siguiente codigo para mostrar un imagen .gif , .jpg ...ect en un image:

CommonDialog1.InitDir = App.Path & "\fotos"
CommonDialog1.Filter = "Todos los archivos (*.*)|*.*|Archivos de texto (*.txt)|*.txt|Archivos por lote (*.bat)|*.bar|Imagen (*.jpg)|*.jpg"
CommonDialog1.FilterIndex = 2
CommonDialog1.ShowOpen
On Error GoTo err
imagen.imgfoto.Picture = LoadPicture(CommonDialog1.FileName)
imagen.Show 1
err:

El problema es q conecto los cuadros de texto a access a traves de un data, y funciona bien, pero cuando utilizo la opcion anterior el data me coge la ruta de la imagen que seleccione para mostrar en el Image1, no
entiendo porq si yo no utilizo ningun data en este procedimiento xq le cambia la ruta a los otros data de los demas formularios...

Alguien me puede ayudar???
Gracias x anticipado

Uuuy..!
Brujis de verdad hay algo sobrenatural por alii... :-)
Bueno, no se como establaces el path de la base de datos en tu DataControl pero lo mejor es tener una variable global que puedes llenar al arrancar tu aplicacion de un archivo de configuracio, ya sea .INI, .XML o cualquier otro o quizas usando el registry.

Una vez que lo tengas en esta variable string global, simplemente al entrar al formulario dond etengas el dataControl le especificas el string como tu DataSource

De verdad no se porque le esta cambiando la ruta a los data control, quizas sea un bug interno de VB y como mejor idea te recomiendo eliminar los datacontrol y usar algo de codigo que te da mas control sobre lo que quieres hacer.

Prueba y me dices
Yamil

Yamil:
Porfa dime como asigno una variable con al data para establecer el DataBaseName, osea para q no me coja otras rutas, o si es posible blanquear la dir del app.path ???
Muchas gracias

Brujis, decalra una variable en un modulo como global. Algo como :

Global gsDbPath As String

Debes arancar tu aplicacion por el Sub Main y en este inicializa esta variable

Sub Main()
gsDbPath ="C:\MiDatos.mdb"
...
End Sub

Y luego en tus formularios en el vento Load, coloca

Me.TuDataControl.DataSource = gsDbPath
Me.TuDataControl.Refresh

No es posible cambiar la app.path ya que es una propiedad de solo lectura

Saludos
Yamil