Ver Mensaje Individual
  #6  
Antiguo 24-08-2016
choclito1 choclito1 is offline
Miembro
NULL
 
Registrado: jun 2015
Posts: 15
Reputación: 0
choclito1 Va por buen camino
Exclamation Mensaje de Error

Buenos días amigos del foro, gracias a las sugerencias realice los cambios y el código que tengo es este:
Código Delphi [-]
ruta:=Image1.Picture.SaveToFile(\\f_usuario.server\c\SISGESS\Documentos\'FOTO'+nombre.text+'.jpg');
  if FileExists(ruta) then
      deletefile(ruta);
     Image1.Picture.SaveToFile(ruta);
     ibq_pac_ext.FieldByName('ruta_foto_ingreso').AsString:=ruta;

Pero cuando ejecuto el sistema y quiero añadir o modificar a los usuarios me muestra el siguiente mensaje de error:

Cannot create file "\\PC-Server\C\SISGESS\Imagenes\Documentos\FOTOABC.jpg".
No se encuentra el nombre de red especificado.

Para que se entienda mi problema, les comento que lo que me pidieron es que el usuario registre los datos de los pacientes y también pueda seleccionar una foto, pero en la base de datos se guarde solo la ruta donde se encuentre la foto y también guardar la foto en el servidor
pero no me deja guardar el registro, cual seria el error??
Como lo voy a guardar en el servidor, tendría que cambiar los permisos de la carpeta PC-Server\C\SISGESS\Imagenes\Documentos\, es necesario compartir esa carpeta???
Amigos del foro esperare sus opiniones por favor, muchas gracias por los mensajes o sugerencias que me brinden
Responder Con Cita