Kopier Mappe MED Filer.

fra lageret:

    Private Sub XCopy(dir1 As String, dir2 As String)
        Dim files As String() = Directory.GetFiles(dir1)
        For Each f As String In files
            File.Copy(f, dir2 & f.Substring(dir1.Length), True)
        Next
        Dim dirs As String() = Directory.GetDirectories(dir1)
        For Each d As String In dirs
            XCopy(d, dir2 & d.Substring(dir1.Length))
        Next
    End Sub

Vil man også kunne pege mod et sted på internettet?

nej ikke som koden ser ud

arne_v

Ligger du ikke lige et svar?

Og skulle du være interesseret i at lave en kode der kan hente filer over nettet?

svar

jeg kigger paa det andet