Decoremos el arbol de navidad de FWH - Decorate the FWH tree
Decoremos el arbol de navidad de FWH - Decorate the FWH tree
Decoremos el arbol de navidad de FWH - Decorate the FWH Christmas tree
Es tiempo de compartir y qué mejor forma que incluir en el árbol pequeñas o grandes contribuciones como regalo a nuestros amigos y compañeros
Seguro que puede quedar muy bonito entre todos
Feliz Navidad
It is time to share and what better way to include in the tree small or large contributions as a gift to our friends and colleagues
It sure can be very nice among all
Merry Christmas
Es tiempo de compartir y qué mejor forma que incluir en el árbol pequeñas o grandes contribuciones como regalo a nuestros amigos y compañeros
Seguro que puede quedar muy bonito entre todos
Feliz Navidad
It is time to share and what better way to include in the tree small or large contributions as a gift to our friends and colleagues
It sure can be very nice among all
Merry Christmas
Last edited by cnavarro on Sat Dec 09, 2017 3:19 pm, edited 1 time in total.
C. Navarro
Hay dos tipos de personas: las que te hacen perder el tiempo y las que te hacen perder la noción del tiempo
Si alguien te dice que algo no se puede hacer, recuerda que esta hablando de sus limitaciones, no de las tuyas.
Hay dos tipos de personas: las que te hacen perder el tiempo y las que te hacen perder la noción del tiempo
Si alguien te dice que algo no se puede hacer, recuerda que esta hablando de sus limitaciones, no de las tuyas.
Re: Decoremos el arbol de navidad de FWH - Decorate the FWH tree
Mi primer regalo
My first present
Espero que os guste
I hope you like it
https://bitbucket.org/fivetech/fivewin- ... stflds.prg
My first present
Espero que os guste
I hope you like it
https://bitbucket.org/fivetech/fivewin- ... stflds.prg
Last edited by cnavarro on Sat Jun 02, 2018 12:35 am, edited 1 time in total.
C. Navarro
Hay dos tipos de personas: las que te hacen perder el tiempo y las que te hacen perder la noción del tiempo
Si alguien te dice que algo no se puede hacer, recuerda que esta hablando de sus limitaciones, no de las tuyas.
Hay dos tipos de personas: las que te hacen perder el tiempo y las que te hacen perder la noción del tiempo
Si alguien te dice que algo no se puede hacer, recuerda que esta hablando de sus limitaciones, no de las tuyas.
- Antonio Linares
- Site Admin
- Posts: 37481
- Joined: Thu Oct 06, 2005 5:47 pm
- Location: Spain
- Contact:
Re: Decoremos el arbol de navidad de FWH - Decorate the FWH tree
Gracias Cristobal
Re: Decoremos el arbol de navidad de FWH - Decorate the FWH tree
Buenísima aportación D. Cristobal. Esperando para la siguiente bola
Yo también creo: https://www.youtube.com/watch?v=cLShxhQwwwA
Yo también creo: https://www.youtube.com/watch?v=cLShxhQwwwA
Re: Decoremos el arbol de navidad de FWH - Decorate the FWH tree
Gracias, espero que aportemos entre todos a decorarlo
C. Navarro
Hay dos tipos de personas: las que te hacen perder el tiempo y las que te hacen perder la noción del tiempo
Si alguien te dice que algo no se puede hacer, recuerda que esta hablando de sus limitaciones, no de las tuyas.
Hay dos tipos de personas: las que te hacen perder el tiempo y las que te hacen perder la noción del tiempo
Si alguien te dice que algo no se puede hacer, recuerda que esta hablando de sus limitaciones, no de las tuyas.
Re: Decoremos el arbol de navidad de FWH - Decorate the FWH tree
Last edited by cnavarro on Sat Jun 02, 2018 12:36 am, edited 1 time in total.
C. Navarro
Hay dos tipos de personas: las que te hacen perder el tiempo y las que te hacen perder la noción del tiempo
Si alguien te dice que algo no se puede hacer, recuerda que esta hablando de sus limitaciones, no de las tuyas.
Hay dos tipos de personas: las que te hacen perder el tiempo y las que te hacen perder la noción del tiempo
Si alguien te dice que algo no se puede hacer, recuerda que esta hablando de sus limitaciones, no de las tuyas.
Re: Decoremos el arbol de navidad de FWH - Decorate the FWH tree
C. Navarro
Hay dos tipos de personas: las que te hacen perder el tiempo y las que te hacen perder la noción del tiempo
Si alguien te dice que algo no se puede hacer, recuerda que esta hablando de sus limitaciones, no de las tuyas.
Hay dos tipos de personas: las que te hacen perder el tiempo y las que te hacen perder la noción del tiempo
Si alguien te dice que algo no se puede hacer, recuerda que esta hablando de sus limitaciones, no de las tuyas.
Re: Decoremos el arbol de navidad de FWH - Decorate the FWH tree
Al compilar se necesita declarar las variables
Local nPanel, nItem
en HazExplorerBar()
y comentar la línea
* :nAlign := 3
pues lanza un error en ejecución
Local nPanel, nItem
en HazExplorerBar()
y comentar la línea
* :nAlign := 3
pues lanza un error en ejecución
Un Saludo,
Xevi.
Aprendiz de la vida!!!
Xevi.
Aprendiz de la vida!!!
Re: Decoremos el arbol de navidad de FWH - Decorate the FWH tree
En cuanto a la declaración de variables, cierto, habia desactivado los warnings en mi editor, graciasXevi wrote:Al compilar se necesita declarar las variables
Local nPanel, nItem
en HazExplorerBar()
y comentar la línea
* :nAlign := 3
pues lanza un error en ejecución
A mi no me da error de ejecución, pero si es asi, puedes poner o enviarme el ERROR.LOG que genera?
C. Navarro
Hay dos tipos de personas: las que te hacen perder el tiempo y las que te hacen perder la noción del tiempo
Si alguien te dice que algo no se puede hacer, recuerda que esta hablando de sus limitaciones, no de las tuyas.
Hay dos tipos de personas: las que te hacen perder el tiempo y las que te hacen perder la noción del tiempo
Si alguien te dice que algo no se puede hacer, recuerda que esta hablando de sus limitaciones, no de las tuyas.
Re: Decoremos el arbol de navidad de FWH - Decorate the FWH tree
Look
Last edited by cnavarro on Sat Jun 02, 2018 12:45 am, edited 2 times in total.
C. Navarro
Hay dos tipos de personas: las que te hacen perder el tiempo y las que te hacen perder la noción del tiempo
Si alguien te dice que algo no se puede hacer, recuerda que esta hablando de sus limitaciones, no de las tuyas.
Hay dos tipos de personas: las que te hacen perder el tiempo y las que te hacen perder la noción del tiempo
Si alguien te dice que algo no se puede hacer, recuerda que esta hablando de sus limitaciones, no de las tuyas.
Re: Decoremos el arbol de navidad de FWH - Decorate the FWH tree
Download gdrive file without using apis
Please, look this page ( for example )
https://sites.google.com/site/sitescapt ... s-directos
and use for download
Please, look this page ( for example )
https://sites.google.com/site/sitescapt ... s-directos
and use for download
Code: Select all
//----------------------------------------------------------------------------//
//
// Function para descargar ficheros desde GDrive
// El truquillo está en la dirección de la descarga, el resto es trivial
//
// The ID of the file you get in the address offered by GMail when sharing the file.
// Just change the access address and add that ID
//
// https://docs.google.com/uc?export=download&id=
//----------------------------------------------------------------------------//
#include "Fivewin.ch"
//----------------------------------------------------------------------------//
Function Main()
local cUrl
//
cUrl := "https://docs.google.com/uc?export=download&id=YOUR_ID_OF_FILE"
Cn_DownLoad( cUrl, .F., "c:\fwh\mydown.zip" )
//
Return nil
//----------------------------------------------------------------------------//
Function Cn_DownLoad( cUrl, lText, cFileTarget )
local oHttp
local cContents := ""
DEFAULT cUrl := ""
DEFAULT lText := .F.
DEFAULT cFileTarget := ""
if !Empty( cUrl )
DeleteUrlCacheEntry( cUrl )
TRY
oHttp := FWGetOleObject( "MSXML2.ServerXMLHTTP.3.0" )
//oHttp := CreateObject( "MSXML2.ServerXMLHTTP.3.0" )
oHttp:Open( "GET", cUrl, .F. )
oHttp:Send()
oHttp:WaitForResponse()
DEFAULT lText := .F.
if lText
cContents := oHttp:ResponseText()
else
cContents := oHttp:ResponseBody()
endif
CATCH
END
if Len( cContents ) > 0 .and. !Empty( cFileTarget )
MemoWrit( cFileTarget, cContents )
else
MsgInfo( "Error en la descarga", "Atencion" )
endif
else
MsgInfo( "URL proporcionada en blanco", "Error en la descarga" )
endif
Return nil
//----------------------------------------------------------------------------//
DLL STATIC FUNCTION DELETEURLCACHEENTRY( cUrl AS LPSTR ) AS BOOL;
PASCAL FROM "DeleteUrlCacheEntryA" LIB "wininet.dll"
//----------------------------------------------------------------------------//
Last edited by cnavarro on Thu May 17, 2018 7:33 pm, edited 1 time in total.
C. Navarro
Hay dos tipos de personas: las que te hacen perder el tiempo y las que te hacen perder la noción del tiempo
Si alguien te dice que algo no se puede hacer, recuerda que esta hablando de sus limitaciones, no de las tuyas.
Hay dos tipos de personas: las que te hacen perder el tiempo y las que te hacen perder la noción del tiempo
Si alguien te dice que algo no se puede hacer, recuerda que esta hablando de sus limitaciones, no de las tuyas.
Re: Decoremos el arbol de navidad de FWH - Decorate the FWH tree
Cristóbal,
muy buen aporte!!!
FUNCIONANDO PERFECTAMENTE!!!
Gracias.
muy buen aporte!!!
FUNCIONANDO PERFECTAMENTE!!!
Gracias.
Un Saludo,
Xevi.
Aprendiz de la vida!!!
Xevi.
Aprendiz de la vida!!!
Re: Decoremos el arbol de navidad de FWH - Decorate the FWH tree
Friends,
A nice gift to 2018!
A nice gift to 2018!
Re: Decoremos el arbol de navidad de FWH - Decorate the FWH tree
Muy bien.
Gracias por compartir.
Gracias por compartir.
Re: Decoremos el arbol de navidad de FWH - Decorate the FWH tree
Cristobal Navarro,
Si no es pedir más. ¿Podría dar una ruta de ejemplo de UPLOAD?
Gracias
Si no es pedir más. ¿Podría dar una ruta de ejemplo de UPLOAD?
Gracias