Télécharger depuis le cloud

Structure

DownloadFromCloud(sService, sFileName, sFolder, sToDirectory : Texte ; bAllowAuth : Booléen) : Texte

Type

Fonction

Description

Cette fonction tentera de télécharger le fichier sFileName à partir du compte cloud spécifié dans sService. Une fois le téléchargement terminé, le fichier sera copié dans le répertoire sToDirectory. Si le paramètre sFolder est défini, le fichier sera téléchargé à partir du dossier cloud indiqué. Ce dossier doit se trouver un niveau au-dessus du répertoire racine. Si aucun dossier sFolder n'est spécifié, le fichier sera téléchargé depuis le répertoire racine. La fonction renvoie « SUCCESS » si le téléchargement s'est déroulé correctement ; dans le cas contraire, elle renvoie le code d'erreur. Lors de l'exécution, si aucun jeton n'existe pour le service cloud ET que le paramètre bAuth est défini sur True, l'écran de connexion du service s'affichera dans une fenêtre de navigateur. Ce jeton sera mémorisé pour les sessions futures.

Paramètres : 5

sFileName = Nom du fichier à télécharger depuis le service cloud. Le fichier doit se trouver dans le répertoire racine du stockage cloud.

sService = le nom du service cloud en ligne. Les valeurs acceptées sont : « BOX » (box.com) et « DROPBOX » (dropbox.com)

sFolder = le dossier du service de stockage en ligne dans lequel le fichier doit être téléchargé. Si aucun chemin n'est indiqué, le fichier sera téléchargé depuis le répertoire racine.

sToDirectory = nom du répertoire local dans lequel le fichier doit être copié après son téléchargement depuis le cloud

bAllowAuth = Si les jetons précédemment enregistrés dans la base de données sont introuvables et/ou ne permettent pas d'accéder au service en ligne, ce paramètre détermine s'il faut afficher une fenêtre de navigateur pour permettre la saisie des identifiants. Si ce script est destiné à être exécuté dans le cadre d'une configuration automatisée ou sans intervention, ce paramètre doit être défini sur False.

Valeur de retour

Texte

Exemples

sFileName = "ABC COMPANY-ABC123.ZIP"

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

if sResult = "SUCCESS" then

ShowMessage("Téléchargement terminé : " & sFileName)

Else

ShowMessage("Le téléchargement n'a pas abouti : " & sFileName & Chr(13) & sResult)

End If |