PC SOFT

GRUPOS DE DISCUSSÃO PROFISSIONAL
WINDEVWEBDEV e WINDEV Mobile

Inicio → WINDEV (versões anteriores) → Copier mon bureau dans un dossier
Copier mon bureau dans un dossier
Iniciado por Talmebadia, abr., 01 2022 2:34 PM - 1 resposta
Publicado em abril, 01 2022 - 2:34 PM
Bonjour,

Je cherche à copier tout le contenu de mon bureau vers un support USB.
Le code bouton de ma fenêtre accueil :

// Déclaration des variables
RépertoireACopier est une chaîne
RépertoireCopié est une chaîne
ResCopie est un booléen

// Sélection du répertoire à copier
RépertoireACopier = fRepSélecteur("C:\Répertoires\", "Sélectionnez un répertoire", ...
"SELECTIONNEZ LA SOURCE")

// Sélection du répertoire copié
RépertoireCopié = fRepSélecteur("C:\Répertoires\", "Sélectionnez un répertoire", ...
"SELECTIONNEZ LA DESTINATION")

// Copie du répertoire
ResCopie = fRepCopie (RépertoireACopier, RépertoireCopié, frConfirmer + frJauge + frRécursif )

// Affichage du message d'erreur si la copie n'a pas été effectuée
SI ResCopie = FAUX ALORS
Erreur(ErreurInfo( errMessage ))
SINON
Info("Le(s) répertoire(s) ont été copiés")
FIN

Ferme(FEN_Accueil)


Mon problème est le retour message suivant :







Merci
Membro registado
945 mensagems
Popularité : +53 (63 votes)
Publicado em abril, 02 2022 - 10:58 AM
Bonjour,

La ton message dit que tu veux copier TOUT ton bureau dans le dossier qui est SUR le bureau, donc déja ca tourne en boucle.

Essaye de faire la même chose mais sur un dossier dans tes documents par exemple, ou sur une clé usb c'etait ta demande initiale

Jordan