FiveTech Support Forums

FiveWin / Harbour / xBase community
Board index FiveWin para Harbour/xHarbour Error 32 al querer renombrarse un achivo
Posts: 1956
Joined: Fri Oct 07, 2005 07:08 PM
Error 32 al querer renombrarse un achivo
Posted: Wed Mar 06, 2024 06:58 PM

Hola.

Cuando quiero usar la funci贸n Frename() no me deja renombrar el archivo y me tira un -1, mirando con el FError() me tira el numero 32

que significa? como puedo solucionarlo?

gracias.

FWH 21.02
Harbour 3.2.0dev (r2104281802)
Copyright (c) 1999-2021, https://harbour.github.io/
Posts: 44162
Joined: Thu Oct 06, 2005 05:47 PM
Re: Error 32 al querer renombrarse un achivo
Posted: Wed Mar 06, 2024 09:51 PM

Para este tipo de consultas es muy recomendable preguntar primero a chatgpt y a google Gemini, para tener una primera idea de lo que pueda estar pasando.

regards, saludos

Antonio Linares
www.fivetechsoft.com
Posts: 1956
Joined: Fri Oct 07, 2005 07:08 PM
Re: Error 32 al querer renombrarse un achivo
Posted: Thu Mar 07, 2024 04:46 AM
Te comento donde tengo el problema.
Code (fw): Select all Collapse
 LOCAL hFile 聽 聽 聽:= FOpen( ::cFile )
...
fclose(hfile)

fwdbg hFile 聽 聽 聽 聽 聽 聽-------------------- aca hfile siempre me da un numero diferente de cero, ya probe hacer esto hFile:= Nil

frename(::cfile, "ejemplo.xml")
En cambio si hago esto otro si me funciona el frenarme si no lo abro antes:
Code (fw): Select all Collapse
frenarme(::cFile, "ejemplo.xml")
FWH 21.02
Harbour 3.2.0dev (r2104281802)
Copyright (c) 1999-2021, https://harbour.github.io/
Posts: 44162
Joined: Thu Oct 06, 2005 05:47 PM
Re: Error 32 al querer renombrarse un achivo
Posted: Thu Mar 07, 2024 07:30 AM

Prueba a hacer un SysRefresh() antes del rename para darle opci贸n a Windows a procesar tu petici贸n:

fclose(hfile)

SysRefresh()

...

regards, saludos

Antonio Linares
www.fivetechsoft.com
Posts: 1956
Joined: Fri Oct 07, 2005 07:08 PM
Re: Error 32 al querer renombrarse un achivo
Posted: Thu Mar 07, 2024 10:41 AM
Consulto:

Si abro un archivo con
Code (fw): Select all Collapse
 聽LOCAL hFile 聽 聽 聽:= FOpen( ::cFile )
y luego lo cierro con
Code (fw): Select all Collapse
fclose(hFile)
sysrefresh()
y hago un fwdbg hFile, el valor de "hfile" debe ser "nil"?

porque me sigue devolvieron un valor num茅rico.
FWH 21.02
Harbour 3.2.0dev (r2104281802)
Copyright (c) 1999-2021, https://harbour.github.io/
Posts: 318
Joined: Fri Jan 14, 2022 08:37 AM
Re: Error 32 al querer renombrarse un achivo
Posted: Thu Mar 07, 2024 01:41 PM

hfile toma valor, y aunque se cierre con FClose() ese valor permanece.

No hay ningun tipo de ligaz贸n entre hFile y el fichero al que representa m谩s que con el uso de las funciones file

Posts: 8523
Joined: Tue Dec 20, 2005 07:36 PM
Re: Error 32 al querer renombrarse un achivo
Posted: Thu Mar 07, 2024 03:24 PM
Code (fw): Select all Collapse
#Include "FiveWin.ch"
#Include "Fileio.ch"

FUNCTION Main()

聽 聽LOCAL nResult
聽 聽// LOCAL hFile := FOpen( "TEXTO.txt", FO_READWRITE )
聽 聽LOCAL hFile := FOpen( "TEXTO.txt" )

聽 聽IF .NOT. FILE( "TEXTO.txt" )

聽 聽 聽 ? " Ooopppsss "

聽 聽 聽 RETURN NIL

聽 聽ENDIF

聽 聽fClose( hfile )

聽 聽nResult := FRename( "TEXTO.txt", "TEXTO1.txt" )

聽 聽IF nResult == F_ERROR

聽 聽 聽 ? "No se pudo cambiar el nombre del archivo"

聽 聽ENDIF

RETURN NIL

// FIN / END
Regards, saludos.
Jo茫o Santos - S茫o Paulo - Brasil - Phone: +55(11)95150-7341
Posts: 1054
Joined: Sun Oct 09, 2005 10:41 PM
Re: Error 32 al querer renombrarse un achivo
Posted: Thu Mar 07, 2024 04:55 PM
MI estimado, una salida:
Code (fw): Select all Collapse
LOCAL hFile 
.......
rename(::cfile, "ejemplo.xml")
hFile 聽 聽 聽:= FOpen( ::cFile )
.....
...
..
.
fclose(hfile)

Continue the discussion