---
title: "Kopiera foldr och subfolder"
type: "forum-thread"
url: "https://www.webforum.nu/amne/dotnet/87291-kopiera-foldr-och-subfolder"
topic: ".NET"
topic_url: "https://www.webforum.nu/amne/dotnet"
author: "saw"
published: "2003-09-30T12:15:22.000Z"
updated: "2003-09-30T12:15:22.000Z"
replies: 0
views: 172
page: 1
pages: 1
language: "sv-SE"
site: "webForum — webforum.nu"
rights: "Upphovsrätten till varje inlägg tillhör dess författare."
attribution: "Citera som: webForum, https://www.webforum.nu/amne/dotnet/87291-kopiera-foldr-och-subfolder"
---

# Kopiera foldr och subfolder

## #1 — saw, 2003-09-30T12:15Z

Jag har problem med en kod för att kopiera folder och subfolder.

```
Dim fldr As folder 
GammalMapp = frMultiLanguage.StatusBar1.Panels(1).Text 
 'kopiera undermapparna för backup 
Set fldr = fso.GetFolder(GammalMapp) 
For Each folder In fldr.SubFolders 
   'MsgBox Folder.Name 
    folder.Copy GammalMappOLD 
    frMultiLanguage.info.Caption = frMultiLanguage.info.Caption & folder.Name & ", " 
Next
```

Vad som händer är följande.
Via msgboxen så kan jag se att foldernamnen stämmer, men den kopiera bara undermapparna till dem.
Jag har försökt att skriva en for sling, men kommer bara fel hela tiden.
Några tips?
 :q

Permalänk: https://www.webforum.nu/p/87291

---

Tråden på webben: https://www.webforum.nu/amne/dotnet/87291-kopiera-foldr-och-subfolder