Foros Club Delphi

Foros Club Delphi (https://www.clubdelphi.com/foros/index.php)
-   Conexión con bases de datos (https://www.clubdelphi.com/foros/forumdisplay.php?f=2)
-   -   problemas con deletefile (https://www.clubdelphi.com/foros/showthread.php?t=56543)

sargento elias 20-05-2008 16:19:13

problemas con deletefile
 
Hola tengo este problema, tengo una aplicacion servidor en 98 y el puesto de la misma aplicacion en xp, Si desde el puesto mando copiar una base de datos dentro del servidor no tengo problemas, pero cuando le paso la misma ruta para borrarla ésta me entra en el if correctamente (el deletefile) pero no me la borra. Ya he revisado los permisos y no hay problem, puede ser por el SO ?


Código Delphi [-]
 if FileExists(base) then  BEGIN
          DeleteFile(base);
        end
        else
            msg('No he podido borrar la base',1);

BlueSteel 20-05-2008 16:46:53

Cita:

Empezado por sargento elias (Mensaje 288050)
Hola tengo este problema, tengo una aplicacion servidor en 98 y el puesto de la misma aplicacion en xp, Si desde el puesto mando copiar una base de datos dentro del servidor no tengo problemas, pero cuando le paso la misma ruta para borrarla ésta me entra en el if correctamente (el deletefile) pero no me la borra. Ya he revisado los permisos y no hay problem, puede ser por el SO ?



Código Delphi [-] if FileExists(base) then BEGIN
DeleteFile(base);
end
else
msg('No he podido borrar la base',1);



pero según tu código... si no encuentra el archivo, no lo puede borrar.... yo lo realizaria así

Código Delphi [-]
 
if FileExists(base) then  
Begin
   Try
       DeleteFile(base);
   Except
        msg('No he podido borrar la base',1);
   End
End
Else
   msg('Archivo no se ha encontrado',1);

Quizas sea problema de ruta.... prueba que el archivo no este en uso cuando lo quieras borrar...

Salu2

ContraVeneno 20-05-2008 17:56:34

yo quitaría el "IF filexist...." , de cualquier manera el "DeleteFile" comprueba si se pudo borrar o no, es decir, hacer la comprobación de si el archivo existe estaría de más. Además, en el "try" mostraría el error del sistema operativo, para saber exactamente que pasó.


La franja horaria es GMT +2. Ahora son las 14:25:48.

Powered by vBulletin® Version 3.6.8
Copyright ©2000 - 2024, Jelsoft Enterprises Ltd.
Traducción al castellano por el equipo de moderadores del Club Delphi