Ha cambiado algo en lIsdir() ?

[JoseLuis]

Buenas

Tengo las rutas de acceso a los datos (que se encuentran en un servidor, en una red), en un fichero .INI, así

Code: Select all  Expand view

[DATOS]
Unidad=S:\

Y cuando tengo que tomar esos datos lo hago así

Code: Select all  Expand view

INI oIni FILE ".\GESPAQ.INI"
  GET Publicas:cUnidad     SECTION "DATOS"     ENTRY "Unidad"           OF oIni DEFAULT curdrive()+":\"+curdir()
ENDINI

iif( right(Publicas:cUnidad,1)#'' , Publicas:cUnidad+='' , )    && Tiene que terminar en ''
if !lIsdir( iif(right(Publicas:cUnidad,1)=='',left(Publicas:cUnidad,len(Publicas:cUnidad)-1),Publicas:cUnidad)   )
  MsgStop("!ERROR! en GESPAQ.INI"+chr(13)+;
      "Unidad "+Publicas:cUnidad+" no existe.")
  quit
endif

Bueno, pues ésto me funciona con la version de FWH de Octubre del 2006, que es en la que tenía la aplicación, es decir me encuentra la ruta.
Ahora intento compilar con FWH Noviembre 2010, y me dice que no encuentra la ruta.
Vuelvo a compilar con la version anterior, y encuentra la ruta, y si compilo con la última versión, me vuelve a decir que no encuentra la ruta.

Sin embargo con unidades locales siempre me funciona, ésto sólo ocurre con unidades de red.

A ver si alguien me ayuda

Saludos

[jrestojeda]

Hola...
Provaste revisar que es lo que estás avaluando?

Code: Select all  Expand view

MsgInfo( iif(right(Publicas:cUnidad,1)=='',left(Publicas:cUnidad,len(Publicas:cUnidad)-1),Publicas:cUnidad) )

Saludos,

[JoseLuis]

Hola

Si , efectivamente hice:

Code: Select all  Expand view

msginfo(lIsdir( iif(right(Publicas:cUnidad,1)=='',left(Publicas:cUnidad,len(Publicas:cUnidad)-1),Publicas:cUnidad)   ))

(Nota, el == es '\', es que no sale cuando lo ponemos como Code en el post.)

Y el sesultado fue como dije anteriormente,

Si la compilación la hago con la versión fwh Octubre 2006 el resultado es .T.

Si la compilación la hago con la versión fwh Noviembre 2010 el resultado es .F.

Ojo!. sólo ocurre cuando es una unidad de red, no en local

Saludos

[Daniel Garcia-Gil]

Jose

la funcion lIsdir no se ha tocado, puede ser que el comportamiento diferente venga por cambios internos de harbour o xharbour, que compilador usas?

[Daniel Garcia-Gil]

Jose

prueba usar la funcion HB_DIREXISTS( cDirName )

[JoseLuis]

Hola

Utilizo toda la estructura que viene con fwh de Noviembre(Bcc582,xharbour), y utilizo Verce.

Mañana compruebo la función que me indicas.

Saludos

[JoseLuis]

Daniel

Correcto! , con la función que me has enviado funciona perfecto.

Saludos