RE:una de tantas alternativas...
Hola que tal neo, trate de hacer tu ejemplo del boton de insertar foto, pero no me funciono, algo hice mal, fijate mi tabla se llama empleados y entre sus campos hay uno que se llama foto que es general y lo puse de la siguiente manera:
cMessageTitle = 'Atención'
cMessageText = 'Desea ingresar la imagen del empleado'
nDialogType = 4 + 32 + 256
nAnswer = MESSAGEBOX(cMessageText, nDialogType, cMessageTitle)
DO CASE
CASE nAnswer = 6
_nombre=GETFILE('jpg')
if len(alltrim(_nombre))<>0
append general foto.ima from (_nombre)
thisform.refresh
endif
CASE nAnswer = 7
messagebox("El archivo no tendra imagen")
ENDCASE
como guardo la foto a un determinado empleado?
y cuando haga una consulta de un empleado, como muestro la foto que le guarde?
yo lo hago de la siguiente forma:
dentro de mi form de empleados, hice un espacio donde conecto mi webcam y dede ahi tomo foto mediante coordenadas del formulario ( espesificandole donde esta la imagen de la webcam), la foto la hice que se guardara con el nombre del codigo del empleado, de la misma manera, cuando selecciono al empleado de un cuadro de lista, se hace una consulta y verifica que el codigo del empleado sea el mismo nombre de la foto jpg, y si es la misma, entonces sabre que corresponde al empleado, asun asi me muestra los datos del empleado con su respectiva foto.
De esta manera lo hago hoy en dia, pero donde trabajo me estan pidiendo que haga credenciales de todos los empleados (como 200 empleados) con su respectiva foto, para esto uso un programa (SmartCode Studio) donde con ese jalo los datos del empleado de una tabla de fox y me saca las credenciales, este programa aparte de funcionar con datos, tambien funciona para meter fotos desde una tabla, pero no puedo, y creo que si la foto la guardara en un campo general, ya no tendria ese problema, si alguien me puede ayudar.
Gracias