J'ai un dossier Dos1 qui contient plusieurs sous-dossiers. Je voulais copier Dos+contenu dans un dossier nouveau (vide) qui existe. Je voudrais, après la fin de copie de chaque sous-dossier, afficher le nom du dossier copié sur mon listIconGadget.
Je n'ai pas le code complet sous la main mais je vais reproduire la partie qui ne marche pas:
Code : Tout sélectionner
Source$="f:\" : Dest$="e:\"
SetGadgetState(#ProgBar,1); ------- progresseBar...
Wpas=1
If ExamineDirectory(0, source$, "")
While NextDirectoryEntry(0)
Dossier$=DirectoryEntryName(0)
CopyDirectory(wSource$+dossier$,wdest$+dossier$,"",#PB_FileSystem_Recursive | #PB_FileSystem_Force)
addGadgetItem(#Grid,-1,dossier$ + space(1)+"copié"); ----------- ListIconGadget ...
wpas=1+wpas+random(4)
SetGadgetState(#ProgBar,wpas)
Wend
FinishDirectory(0)
EndIf
Merci