Problemas con la función Kill
Developer
01 de Diciembre del 2005
Para intentar borrar un fichero estoy usando la funcion kill, el problema aparece cuando el path del fichero que quiero borrar contiene espacios en cuyo caso no me lo borra. Lo he intentado poniendole comillas al path pero tampoco funciona.¿Sabéis como podrÃa resolverlo?
mvallejos
01 de Diciembre del 2005
No deberÃa darte problemas, es probable que esté mal seteada la ruta, de todos modos, hay 2 cosas que podés probar
1) Verificar la existencia del archivo antes de borrar, no sin antes asegurarte de que no esté de solo lectura y no esté en uso.
If Dir(Archivo) <> "" Then
SetAttr Archivo,VbNormal
Kill Archivo
End if
2) Convertir tu nombre largo de archivo a un nombre con paths cortos con la API GetShortPathName
Declare Function GetShortPathNameA Lib "kernel32" (ByVal lpszLongPath As String, ByVal lpszShortPath As String, ByVal cchBuffer As Long) As Long
Eso te convierte una ruta completa en ruta reducida, por ejemplo si tenés
C:ARCHIVOS DE PROGRAMA
te lo convierte en
C:ARCHIV~1
Saludos
1) Verificar la existencia del archivo antes de borrar, no sin antes asegurarte de que no esté de solo lectura y no esté en uso.
If Dir(Archivo) <> "" Then
SetAttr Archivo,VbNormal
Kill Archivo
End if
2) Convertir tu nombre largo de archivo a un nombre con paths cortos con la API GetShortPathName
Declare Function GetShortPathNameA Lib "kernel32" (ByVal lpszLongPath As String, ByVal lpszShortPath As String, ByVal cchBuffer As Long) As Long
Eso te convierte una ruta completa en ruta reducida, por ejemplo si tenés
C:ARCHIVOS DE PROGRAMA
te lo convierte en
C:ARCHIV~1
Saludos