URLDOWNLOADTOFILE not run

[Silvio.Falconi]

I use it to downloada file but today this function not run ok ( on window Seven)
How I can resolve it ?
the test

Code: Select all  Expand view  RUN

Static Function DescargFichDesdeUrl(cPath)
   local cZipFile := cPath+"storico_"+DtoS(Date())+".zip"
   local cUrl  := URL_LOTTO

   DELETEURLCACHEENTRY( cUrl )

    ? cZipFile

    URLDOWNLOADTOFILE( 0, cUrl, cZipFile )

RETURN NIL

DLL STATIC FUNCTION DELETEURLCACHEENTRY( cUrl AS LPSTR ) AS BOOL;
    PASCAL FROM "DeleteUrlCacheEntryA" LIB "wininet.dll"

DLL FUNCTION URLDOWNLOADTOFILE( pCaller AS LONG, cUrl AS LPSTR, cFileName AS LPSTR, nReserved AS DWORD, nFnCB AS LONG ) AS LONG;
    PASCAL FROM "URLDownloadToFileA" LIB "urlmon.dll"

[karinha]

http://forums.fivetechsupport.com/viewtopic.php?f=6&t=32803&p=193180&hilit=DELETEURLCACHEENTRY#p193180

[FranciscoA]

Hola.
Aqui funciona correctamente. ( Windows 7 Ultimate )
Puedes revisar, en Opciones de Internet, si están habilitados los TLS ?
viewtopic.php?f=6&t=37703&sid=3cb5f50584b22e3c0c729b3083809143#p225509
Saludos.

Code: Select all  Expand view  RUN

#DEFINE URL_LOTTO   "https://bitbucket.org/fivetech/fivewin-contributions/downloads/Fivetechv.png"

function Descargar()
local cPath := TrueName("..\fapsoft__foro\DcgaHttps\")
DescargFichDesdeUrl(cPath)
retur nil

Static Function DescargFichDesdeUrl(cPath)
   local cZipFile := cPath+"storico_"+DtoS(Date())+".zip"
   local cUrl  := URL_LOTTO

   DELETEURLCACHEENTRY( cUrl )

    ? cZipFile

    URLDOWNLOADTOFILE( 0, cUrl, cZipFile )

RETURN NIL

[Silvio.Falconi]

I use the same your test
I change only the url (but I check it from IE run ok)





It not download any files

I have this windows
Windows Seven Professional Server Pack 1 64 bit
version 6.1.7601
on HP Z220 CMT WORKSTATION

wich is TLS ?

[FranciscoA]

Transport Layer Security

[Silvio.Falconi]

this is really strange because last week everything works fine, I have not changed any TLS
if I use IE or Mozilla directly I can directly download the file normally so the tls protocol is working fine
the same function on Windows 10 Professional work fine...
on Windows Seven professional not run