PC SOFT

FORUMS PROFESSIONNELS
WINDEVWEBDEV et WINDEV Mobile

Accueil → WINDEV Mobile 2024 → Example Download Files via Mobile, Webdev, Windev (Download de arquivos)
Example Download Files via Mobile, Webdev, Windev (Download de arquivos)
Débuté par adrianoboller, 17 jan. 2015 15:12 - 1 réponse
Membre enregistré
3 655 messages
Popularité : +175 (223 votes)
Posté le 17 janvier 2015 - 15:12
//HTM_Download..URL="http://www.7-zip.org/a/7z920.exe"

OK is boolean = HTTPRequest("http://www.7-zip.org/a/7z920.exe")

IF OK = True THEN

Arquivo is Buffer = HTTPGetResult(httpResult)

IF InSimulatorMode() = True
OK = fSaveBuffer("c:\download\7z920.exe",Arquivo)
ELSE
OK = fSaveBuffer("/mnt/sdcard/7z920.exe",Arquivo)
END

IF OK = True THEN

IF InSimulatorMode() = True
OK = fFileExist("c:\download\7z920.exe")
ELSE
OK = fFileExist("/mnt/sdcard/7z920.exe")
END

IF OK = True THEN
Info("Download do arquivo 7z920.exe com sucesso!")
ELSE
Error("Nao foi possivel encontrar o arquivo do 7z920.exe. "+ErrorInfo(errMessage))
END

ELSE
Error("Nao foi possivel efetuar o download do 7z920.exe. "+ErrorInfo(errMessage))
END

ELSE

Error("URL nao encontrado para download do 7z920.exe. "+ErrorInfo(errMessage))

END
Membre enregistré
3 655 messages
Popularité : +175 (223 votes)
Posté le 17 janvier 2015 - 15:13
Uma contribuição de Adriano Boller e Marcos Roberto Carvalho

:merci: