FiveTech Software tech support forums

SetFTime() - very good.

http://forums.fivetechsupport.com/viewtopic.php?f=3&t=12924&start=0

... I found an example: function setfiledate(cFile, dDate) local hFile := FOpen( cFile, FO_READWRITE ) local aInfo SET DATE FRENCH SET CENTURY ON SetFTime( hFile, "13:00:00", dDate ) // MsgInfo( "D o n e !" ) FClose( hFile ) return nil I will test. Best regards Otto

Estimado Joao

Con SetFTime no cambia nada.

con SetFDaTi cambia, lo raro es que el explorador de windows el algunas carpetas muestra los archivos con la fecha de creación de la carpeta donde se encuentra y en otras muestra la fecha de modificación.

Es bien raro.

Buen día, Otra vuelta de tuerca. Para mi caso, y que la hora que le coloco sea la real, cree una función a la que le paso los datos por referencia: UTCtoARG(@dDate,@cTime) y los cambia a UTC+3 (horario de Argentina) y es la siguiente: //-------------------------------------------------------...

El ejemplo de ellos no tiene nada de particular, usa la función de la misma forma que lo hace FWH:

http://msdn.microsoft.com/en-us/library/windows/desktop/ms724205(v=vs.85).aspx

Luego es un comportamiento propio de Windows.

Misterio resuelto

En la documentación de la función SetFileTime() de Windows se comenta esto: the GetFileTime function may not return the same file time information set using SetFileTime Remarks Not all file systems can record creation and last access times and not all file systems record them in the same manner. For...

Lo anterior no cuenta, era un error mio en las pruebas. Hoy llevo demasiadas horas de ordenador :-) SetFTime() me devuelve .T. lo que quiere decir que Windows dice que todo ha ido bien, pero... las horas son distintas. 3:14:20 antes 5:14:20 despues Asi que como se ha comentado, ...

Me faltaba crear fecha.prg

Pero ahora GetLastError() devuelve 228 y ese valor no está documentado
http://msdn.microsoft.com/en-us/library/windows/desktop/ms681382(v=vs.85).aspx

ERROR_INVALID_HANDLE
6 (0x6)
The handle is invalid.

http://msdn.microsoft.com/en-us/library/windows/desktop/ms681382(v=vs.85).aspx

Ya tenemos una pieza más para completar el puzzle

Rolando,

gracias, a veces pienso más rápido que leo

Lucas,

He modificado la función SetFTime() para que devuelva el código de error y devuelve un 6. Previamente devolvía un .F. que significa que no ha podido realizar la operación. Ahora voy a buscar que significa ese 6

Perdón que "meta la cuchara", pero lo que el programa hace es cambiar la fecha del "fecha.prg" colocandole la fecha y hora tomadas del explorer.exe

Eso acá lo hace correctamente como lo indiqué en entrada anterior (compilado con xHarbour). Salvo que usa la hora UTC

Rolando

Lucas,

Acabo de ver el código completo de tu ejemplo e intentas cambiar la hora del explorer en la carpeta Windows.

Salvo que seas administrador, ó tengas privilegios de administrador, eso jamas te permitiría Windows hacerlo.

Lucas,

Puedes comprobar el resultado de SetFTime(), en caso de que devuelva .F. significaria que la función de Windows SetFileTime() no ha podido cambiar la hora.

No he probado tu ejemplo. Revise el código (sólo las primeras líneas) y te comenté que no veía la relación entre la fecha y la hora.

Antonio, ¿Has compilado mi ejemplo con Harbour?. Si vas luego a la carpeta en el Explorador de Windows verás que la hora no se ha cambiado, a pesar de que según msgalert(cvaltochar(dFecha)+CRLF+CRLF+cValtochar(thora), " de fecha.prg ") debería estar cambiada, pero en el explorador de Windo...

Lucas, El código fuente de SetFTime() es practicamente un wrapper a SetFileTime() del API de Windows, por eso me extraña que funcione a veces solamente. http://msdn.microsoft.com/en-us/library/windows/desktop/ms724933(v=vs.85).aspx ...