FiveTech Support Forums

FiveWin / Harbour / xBase community
Board index FiveWin para Harbour/xHarbour 驴C贸mo hago para que un programa me abra una carpeta?
Posts: 1956
Joined: Fri Oct 07, 2005 07:08 PM
驴C贸mo hago para que un programa me abra una carpeta?
Posted: Tue May 29, 2012 03:52 AM

Hola.

Necesito facilitarle al usuario que al hacer un click en un bot贸n el programa le abra el explorador de archivos de window en una carpeta indicada:

Como se hace para que me abra esa carpeta?

gracias.

FWH 21.02
Harbour 3.2.0dev (r2104281802)
Copyright (c) 1999-2021, https://harbour.github.io/
Posts: 1956
Joined: Fri Oct 07, 2005 07:08 PM
Re: 驴C贸mo hago para que un programa me abra una carpeta?
Posted: Tue May 29, 2012 04:20 AM

ShellExecute( 0, 'Open', GetEnv( "windir" ) + '\explorer.exe', "c:\", "",1)

FWH 21.02
Harbour 3.2.0dev (r2104281802)
Copyright (c) 1999-2021, https://harbour.github.io/
Posts: 632
Joined: Thu Jan 19, 2006 10:45 AM
Re: 驴C贸mo hago para que un programa me abra una carpeta?
Posted: Tue May 29, 2012 05:27 AM
Mejor as铆 te lo abre separado e independiente de tu programa:

Code (fw): Select all Collapse
WinExec("CMD /C START /separate explorer \\Srvxxx\Compartida\PRENSA" ,0)


La ruta la puedes poner como path o como url.
Saludos



Andr茅s Gonz谩lez desde Mallorca
Posts: 1956
Joined: Fri Oct 07, 2005 07:08 PM
Re: 驴C贸mo hago para que un programa me abra una carpeta?
Posted: Tue May 29, 2012 12:06 PM

gracias

FWH 21.02
Harbour 3.2.0dev (r2104281802)
Copyright (c) 1999-2021, https://harbour.github.io/
Posts: 1380
Joined: Fri Oct 14, 2005 01:28 PM
Re: 驴C贸mo hago para que un programa me abra una carpeta?
Posted: Tue May 29, 2012 12:30 PM
FW dispone de esta funci贸n:
cGetDir( <cTitle>, [<cInitDir>], <nClsId>, <cTitle2>, <nFlags> ) --> cDir

Parameters:
<cTitle> Title of the dialog box
<cInitDir> Initial directory
<nClsId> ClsId of a special folder location
<cTitle2> Prompt of the folder selection tree
<nFlags> Flags for setting the selection dialog behavior

Returns:
<cDir> Selected directory

Sample:
SAMPLES\GETDIR.PRG

Saludos
Resistencia - "Ciudad de las Esculturas"

Chaco - Argentina

Continue the discussion