LiveCode Forums.

Code: Select all

load URL tDownloadLink with message "downloadComplete"

Code: Select all

libURLDownloadToFile, tDownloadLink, ("binfile:" & IT),"downloadComplete"

Code: Select all

put url ftpfilename into url ("binfile:" & localfilename)

Code: Select all

put urlencode(ftpfilename) into url ("binfile:" & localfilename)

Code: Select all

put the result into tError

Code: Select all

libURLDownloadToFile, tDownloadLink,  IT, "downloadComplete"

Code: Select all

...
put it into tFileNameOnDisk
...
libURLDownloadToFile tDownloadLink, ("binfile:" & tFileNameOnDisk),"downloadComplete"
...

Code: Select all

...
put it into tFileNameOnDisk
...
## libURLDownloadToFile tDownloadLink, ("binfile:" & tFileNameOnDisk),"downloadComplete"
libURLDownloadToFile tDownloadLink, tFileNameOnDisk,"downloadComplete"
...

Code: Select all

put "http://my_url/setup.exe" into tDownloadLink  -- 2MB
         
           
            libURLSetStatusCallback "showProgress", the long name of me
            	
            -- make sure the progress bar is hidden, as this property is used to initialise it
            hide scrollbar "ProgressBar"
            hide group "group Login"
            show group "group update"
            put empty into fld "ProgressField"
            put the seconds into sDownloadStart
           
           load URL tDownloadLink with message "downloadComplete" (don't work!!!)

 .....

Code: Select all

 load URL tDownloadLink with message "checkStatus" (don't work!!!)

Code: Select all

local tDownloadLink

...
         libUrlSetStatusCallback "checkStatus",the long id of me
         libURLDownloadToFile tDownloadLink,DestinationFolder
...
on checkStatus pURL,pStatus
   if pURL = tDownloadLink then
      
      --•• watch process
      --       if the vis of group "grDevTools" then
      --          put the ticks & "," & "checkStatus"   & "," & pUrl & "," & pStatus & cr before fld "fSpy"
      --       end if
      --•••
      
      switch (item 1 of pStatus)
         case "loading"
           -- setpb item 3 of pStatus,word 1 of item 2 of pStatus -- custom progressbar
            break
         case "downloaded"
        --    set the rect of grc "bar" to the rect of grc "border" -- custom progressbar
       --     send "AfterDownload" to me in 1 seconds
            break
         default -- contacted, requested, etc.
      end switch 
   end if
end checkStatus

Code: Select all

local tDownloadLink

on mouseUp
   
   put "http://myurl.it/setup.exe" into tDownloadLink
   
   set the itemDel to slash
   put last item of tDownloadLink into tFilename
   put specialFolderPath("Desktop") & slash before tFileName
   put URL tFileName into URL ("binfile:" & tFileName)
   
   put tFileName into DestinationFolder

   
   libUrlSetStatusCallback "checkStatus",the long id of me
   libURLDownloadToFile tDownloadLink,DestinationFolder
   
end mouseUp

on checkStatus pURL,pStatus
   
   if pURL = tDownloadLink then
      

      switch (item 1 of pStatus)
         case "loading"
            -- setpb item 3 of pStatus,word 1 of item 2 of pStatus -- custom progressbar
            break
         case "downloaded"
        --    set the rect of grc "bar" to the rect of grc "border" -- custom progressbar
            --     send "AfterDownload" to me in 1 seconds
            break
         default -- contacted, requested, etc.
      end switch 
   end if
end checkStatus

Code: Select all

local tDownloadLink

on mouseUp
   put "http://myurl.it/setup.exe" into tDownloadLink
   set the itemDel to slash
   put last item of tDownloadLink into tFilename
   set the itemDel to ","
   put specialFolderPath("Desktop") & slash before tFileName
   --    put URL tFileName into URL ("binfile:" & tFileName)
   --    put tFileName into DestinationFolder
   libUrlSetStatusCallback "checkStatus",the long id of me
   libURLDownloadToFile tDownloadLink,tFilename
end mouseUp