fotos en base de datos/pictures in database

[Renegado]

Hola, de nuevo necesito de su ayuda.
Esta es mi ventana inicial (imagen 001).
Cuando llamo a la ventana administar alumnos (imagen 002)
para despues abrir la ventana agregar/editar, para poner una foto (imagen 003)
si solo cancelo sin modificar foto no marca ningun error
pero si agrego o modifico foto, al regresarme a la ventana inicial y querer de nuevo abrir administrar alumnos
me marca el error "error de apertura:evaluar.dbf"
aquí es donde habro las tablas
-------------------------------------------
Hello, I need your help
this is my initial window (image 001)
when I call window manage student (image 002)
and after I open window add/edit to put picture
if I return to initial window and I want open window manage student "open failure:evaluar.dbf"
but not modify picture, no error.

excuse me English.

*--- open tables----

Code: Select all

procedure AbreTabla3
     Use evaluar alias evaluar new
     Use lista alias lista new 
     Use alumnos alias alumnos new via 'DBFCDX' 
     If !file("alumnos.CDX")
             INDEX ON alum_id     TAG alum_id     TO alumnos
	     INDEX ON alum_apell TAG alum_apell TO alumnos
     endif	
return

y tengo cuidado al cerrarlas.

Code: Select all

procedure CierraTabla3
     close  database
return

aquí es donde llamo la imagen, y el error me aparece solo cuando se ejecuta esa rutina.
*---call pictures-----

Code: Select all

Procedure llamafoto()
     local tipo:= {}
     aadd (tipo,{"Archivos de imagenes (JPG, BMP, GIF)","*.jpg;*.bmp;*.gif"})
     aadd (tipo,{"Imagenes JPG","*.jpg"})
     aadd (tipo,{"Imagenes BMP","*.bmp"})
     aadd (tipo,{"Imagenes GIF","*.gif"})
     archivo := ""
     archivo := GETFILE (tipo,"Cargar imagen de fondo...","",.F.,.F.)
     ed_alum.image_1.picture:=archivo
Return nil

Gracias de antemano
------------------------
Thank you

[Pablo César]

No sé en qué linea te dá este error "error de apertura:evaluar.dbf".
Talvez aqui estés intentando abrir otra vez el archivo de datos.
Pero lo que observé es que si trabajas en una red local o llamas en otra instancia tu aplicativo, no irá compartir la abertura del banco de datos. Eso porque te faltó poner SHARED a la hora de abrir el DBF.
De todas formas, creo que no deberias abrir a todo momento el dbf, perdoná si no es así. Pero todo me lleva a creer que estaria pasando eso.

Se luce muy lindo tu aplicacion, felicitaciones.

Un abrazo,

[Renegado]

Gracias Pablo Cesar por tu comentario; tenías razón ese era el problema:abrir varias veces las tablas. ¡Solucionado! Muchísimas gracias.
Saludos, Cuídate.

[Pablo César]

Como lo solucionaste ?

Colocando Shared ?
Limitando el acceso una sola vez el aplicativo ?
Abriendo una sola vez los dbfs ?

[Renegado]

Abrí una sola vez los dbf desde la ventana inicial

[Javier Tovar]

Hola renegado,

Yo acostumbro abrir solo una vez las bases de datos, al iniciar mi aplicación y las cierro al cerras mi aplicación, y le pongo SHARED, ya que de esta manera si después utilizo mi aplicación en red ya no tengo que hacer grandes cambios!, solo abro y cierro DBF cuando son tablas temporales para algún filtrado de datos, por ejemplo.

También te recomiendo que uses SHARED y que utilices todas las dbf con vía 'DBFCDX' ya que son menos archivos que con 'DBFNTX'. Y tienen más comandos para utilizar las DBF.

Saludos

[Renegado]

Gracias Javier Tovar por compartir tu experiencia.