Page 1 of 1

cGetFile - OK en XP, mal en W7 - Solucionado

PostPosted: Wed Sep 25, 2013 12:06 am
by rolando
Buenas noches,

He notado un comportamiento distinto de la función cGetFile() usando la misma aplicación (FWH 32 bits).

Code: Select all  Expand view
cTexto:= cGetFile( " | *.*", "Escribe el nombre del archivo",1,"\\pcnoganet\"  )


Cuando esta es ejecutada en windos XP 32 bits, cGetFile() se comporta como es esperado, es decir que abre una ventana en el directorio indicado para que elija un archivo.

Pero si es ejecutada en win seven 64 bits, abre la ventana para elegir un archivo, pero NO la abre en el directorio indicado (\\pcnoganet\), sino que lo hace en el último visitado.

¿Hay una forma de lograr que inicie en el directorio asignado?.

Gracias.

Rolando :D

Re: cGetFile - OK en XP, mal en W7

PostPosted: Wed Sep 25, 2013 12:25 pm
by rolando
Up

Re: cGetFile - OK en XP, mal en W7

PostPosted: Wed Sep 25, 2013 12:54 pm
by karinha

Re: cGetFile - OK en XP, mal en W7

PostPosted: Wed Sep 25, 2013 1:06 pm
by rolando
karinha,

Gracias por responder, pero no es mi caso.

El cGetFile() funciona bien en XP y en W7 también funciona pero la ventana de selección de archivos no inicia en la carpeta que le indico.

Gracias.

Rolando :D

Re: cGetFile - OK en XP, mal en W7

PostPosted: Wed Sep 25, 2013 2:29 pm
by karinha
Rolando, intenta asi:

Code: Select all  Expand view

#Include "FiveWin.ch"

FUNCTION Main()

   LOCAL cFile, cPathError

   MsgInfo( CurDrive() )

   SetCurDrive( "P:" )  // en red

   // cPathError := "\\pcnoganet\"

   MsgInfo( CurDrive() )

   cPathError := CurDrive() + ":\PLENOCBX"  // windows 7 de 32 bits PERFECTO

   ? cPathError

   cFile := cGetFile( cPathError, "Localize el archivo: ERROR.LOG" )

RETURN NIL
 



Re: cGetFile - OK en XP, mal en W7

PostPosted: Wed Sep 25, 2013 3:58 pm
by rolando
karinha,

"\\pcnoganet\" es el nombre de la pc en red a la que me quiero conectar.

Necesito que la ventana de selección inicie en esa pc de la red local "\\pcnoganet\".

Rolando :D

Re: cGetFile - OK en XP, mal en W7

PostPosted: Thu Sep 26, 2013 11:45 am
by rolando
up

Re: cGetFile - OK en XP, mal en W7

PostPosted: Thu Sep 26, 2013 12:21 pm
by compubrion
Saludos !
Revisa en el Centro de Redes y Recursos Compartidos, ( Cambiar configuracion de uso compartido avanzado ) Buscas ( Uso compartido con proteccion por contraseña ) y lo descativas yo uso windows 7 y me funciona perfectamente, adjunto imagen

Code: Select all  Expand view


   
    #Include "FiveWin.ch"

    FUNCTION Main()

       LOCAL cFile, cPath

       
       cPath := "\\MOISES\Respaldos\Backups\"

        cFile := cGetFile( '*.*', "
Archivos", , cPath )

    RETURN NIL
          
 


Image

Re: cGetFile - OK en XP, mal en W7

PostPosted: Fri Sep 27, 2013 2:12 am
by rolando
Cumpubrion,

Gracias por responder.

Lo tengo como indicas. Pero encontré que estaba haciendo mal.

Como reza un dicho local, "Al mejor cazador se le escapa la liebre" y, teniendo en cuenta que no soy de los mejores cazadores...

Si bien publiqué:
Code: Select all  Expand view
"\\pcnoganet\"


En realidad estaba poniendo
Code: Select all  Expand view
"  \\pcnoganet\"


O sea que le estaba agregando dos espacios antes de "\\" y por eso no tomaba el directorio de red.

Lo extraño es que en Win xp si funciona así.

Obviamente el error era mío.

Saludos.

Rolando :D