Postupy: Jak přesunout obsah adresáře v jazyce Visual Basic

Článek
08/11/2011

Použijte metodu GetFiles k získání seznamu souborů ve složce a použijte metodu MoveFile k přesunu souborů mezi adresáři.

Pokud neexistuje cílová struktura při volání MoveFile, struktura bude vytvořena.

Chcete-li přesunout obsah adresáře

Použijte metodu GetFiles k získání seznamu souborů v adresáři a poté použijte metodu MoveFile s parametry určujícími zdrojové soubory a adresář, do kterého chcete soubory přesunout. V tomto příkladu budou přesunuty všechny soubory adresáře Dokumenty do adresáře s názvem StorageDir.

Dim fileList = My.Computer.FileSystem.GetFiles(
    My.Computer.FileSystem.SpecialDirectories.MyPictures,
    Microsoft.VisualBasic.FileIO.SearchOption.SearchAllSubDirectories, "*.*")

For Each foundFile In fileList
    My.Computer.FileSystem.MoveFile(foundFile,
        "C:\StorageDir\" & My.Computer.FileSystem.GetFileInfo(foundFile).Name)
Next

Robustní programování

Následující podmínky mohou způsobit výjimku:

Cesta není platná z některého z následujících důvodů: je řetězec nulové délky, obsahuje pouze prázdné znaky, obsahuje neplatné znaky nebo je cesta k zařízení (začíná \\.\) (ArgumentException).
Cesta není platná, protože je nastavená na Nothing (ArgumentNullException).
directory neexistuje)DirectoryNotFoundException).
directory odkazuje na existující soubory (IOException).
Cesta přesahuje maximální systémem povolenou délku (PathTooLongException).
Název soubor nebo adresáře v cestě obsahuje dvojtečku (:) nebo je v neplatném formátu (NotSupportedException).
Uživatel nemá potřebné oprávnění k zobrazení cesta (SecurityException).
Uživatel nemá potřebná oprávnění (UnauthorizedAccessException).