Descarregar da nuvem

Estrutura

DownloadFromCloud(sService, sFileName, sFolder, sToDirectory: Text; bAllowAuth: Boolean): Text

Tipo

Função

Descrição

Esta função tentará descarregar o ficheiro sFileName a partir da conta na nuvem especificada em sService. O ficheiro será copiado para o sToDirectory após o download. Se o parâmetro sFolder estiver definido, o ficheiro será descarregado a partir da pasta na nuvem especificada. Esta pasta deve estar um nível acima do diretório raiz. Se não for especificada nenhuma pasta sFolder, o ficheiro será descarregado a partir do diretório raiz. A função devolverá «SUCCESS» se o download for bem-sucedido; caso contrário, será devolvida a condição de erro. Após a execução, se não existir nenhum token para o serviço na nuvem E o parâmetro bAuth for True, a página de início de sessão do serviço será apresentada numa janela do navegador. Este token será guardado para sessões futuras.

Parâmetros: 5

sFileName = Nome do ficheiro a descarregar do serviço na nuvem. O ficheiro deve existir no diretório raiz do armazenamento na nuvem.

sService = o nome do serviço em nuvem online. Os valores aceitáveis são: «BOX» (box.com) e «DROPBOX» (dropbox.com)

sFolder = a pasta no serviço de nuvem online para onde o ficheiro deve ser descarregado. Se não for especificado nenhum, o ficheiro será descarregado a partir do diretório raiz.

sToDirectory = o nome do diretório local para onde o ficheiro deve ser copiado após o download da nuvem

bAllowAuth = Se os tokens anteriores guardados na base de dados não forem encontrados e/ou não permitirem o acesso ao serviço online, este parâmetro determina se deve ser exibida uma janela do navegador para permitir a introdução das credenciais. Se este script se destinar a ser executado numa configuração automatizada/sem supervisão, este parâmetro deve ser definido como False.

Valor de retorno

Texto

Exemplos

sFileName = "ABC COMPANY-ABC123.ZIP"

sResult = DownloadFromCloud("DROPBOX", sFileName, "", "C:\Temp\Downloaded", True)

if sResult = "SUCCESS" then

ShowMessage("Transferência concluída: " & sFileName)

Else

ShowMessage("A transferência não foi concluída: " & sFileName & Chr(13) & sResult)

End If |