FiveTech Software tech support forums

Enrico Maria Giordano wrote:

CARLOS ATUNCAR wrote:He probado con Bcc7.60 y xHarbour 1.2.3 Intl. (SimpLex) (Build 20221118) la version FW 12.2020 y todo pasa con normalidad tambien he probado la version FW 07.2023 y el problema persiste no he podido probar con xHarbour 1.3.0 Intl. (SimpLex) (Build 20230826)
por que con ambas versiones genera este error
Error: Unresolved external 'utime(const char *, utimbuf *)' referenced from E:\TOOLS\XHARBOUR_BCC74A\LIB\HBZIP.LIB|zipplatform

Estimado Carlos, puede mostrar un pequeno PRG de ejemplo? Desculpa mi Espanol.

Code: Select all  Expand view

#include "Fivewin.ch"


FUNCTION MAIN()

    ? 2, FILE( "MYTEST.TXT" )

    RETURN NIL


INIT FUNCTION TEST()

    MEMOWRIT( "MYTEST.TXT", "", .F. )

    ? 1, FILE( "MYTEST.TXT" )

    RETURN NIL

Enrico Maria Giordano wrote:Works fine here:

Code: Select all  Expand view

#include "Fivewin.ch"


FUNCTION MAIN()

    ? 2, FILE( "MYTEST.TXT" )

    RETURN NIL


INIT FUNCTION TEST()

    Hb_DirExists("c:\temp")

    MEMOWRIT( "MYTEST.TXT", "", .F. )
 
    ? 1, FILE( "MYTEST.TXT" )

    RETURN NIL

Code: Select all  Expand view

#include "Fivewin.ch"


FUNCTION MAIN()

    ? 2, LISDIR( "MYTEST" )

    RETURN NIL


INIT FUNCTION TEST()

    MAKEDIR( "MYTEST" )

    ? 1, LISDIR( "MYTEST" )

    RETURN NIL

Code: Select all  Expand view

HB_FNAMESPLIT()
ó:
aFindFile()
 

al usar function Hb_DirExists() la funcion FILE() ya no ubica ningun archivo si no se pone la ruta completa antes de usar esta funcion si ubica con tan solo poner el nombre del archivo