rangement de fichiers dans des dossiersRésolu

Question

salut
pour les besoins de la cause je cr&#233;e dans mon application des fichiers texte qui sauvegardent des donn&#233;es. Le truc c'est qu'ils se mettent anarchiquement sur le disque c. comment je peux les ranger dans un dossier?
merci
ps: je code en VB

Gobillot · Accepted Answer

en parcourant le disque pour retrouver tes fichiers 

et les d&#233;placer un par un



Name "C:\fichier.txt" As "C:\DOSSIER\fichier.txt"

Daniel

jpleroisse · Answer

Bonsoir,

Si tu as mis tes donn&#233;es dans un textbox, les donn&#233;es seront copi&#233;es
dans le fichier .txt dans le  r&#233;peroire MonDossier. Si le
r&#233;peroire n'existe pas, il sera cr&#233;er ainsi que le nom du fichier.



Open "C:\MonDossier\Monfichier.txt" For Output As #1

Print #1, Text1.text

Close #1

Open "C:\MonDossier\Tonfichier1.txt" For Output As #1


Print #1, Text1.text


Close #1



jpleroisse

Gobillot · Answer

il te faut un moyen pour reconna&#238;tre tes fichiers

supposons tous les fichiers txt de la racine commen&#231;ant par "F"

et "C:\DOSSIER" doit exister





    Dim Path  As String

    Dim nom As String



    Path = "C:"

    nom = Dir$(Path & "F*.txt")

    While nom <> ""

          Name Path & nom  As path & "DOSSIER"   & nom

          nom = Dir$()

          Wend

Daniel

f56bre · Answer

merci les gars

Rangement de fichiers dans des dossiers

4 réponses

Discussions similaires