| |
![zurück](../images/b_zurueck.gif)
VB.NET - Ein- und UmsteigerOrdner mit Unterverzeichnissen etc. kopieren | | ![](../images/trans.gif) | Autor: elmobs | Datum: 12.10.12 12:43 |
| Hallo Leute
Ich brauche Hilfe bei meinem Problem. Es handelt sich um ein Kopier-Tool. Das wäre der Code:
Private Sub CopyFolder(Quelle As String, Ziel As String, Optional ByVal _
deleteFolder As Boolean = True)
'Zielverzeichnis erstellen - Löschen, falls es dort schon existiert
If deleteFolder Then
Ziel += Quelle.Substring(Quelle.LastIndexOf("\"), Quelle.Length - _
Quelle.LastIndexOf("\"))
If Directory.Exists(deleteFolder) Then
Directory.Delete(Ziel + "\", True)
End If
End If
System.IO.Directory.CreateDirectory(Ziel)
'Alle Dateien kopieren
'Try
Dim Dateien As String() = Directory.GetFiles(Quelle)
For Each Datei As String In Dateien
Dim Ziel2 As String = Path.Combine(Ziel, Path.GetFileName(Datei))
Try
File.Copy(Datei, Ziel2, True)
Catch ex As Exception
MessageBox.Show(ex.Message)
End Try
Next
'Alle Unterverzeichnisse kopieren
Dim Unterverzeichnisse As String() = Directory.GetDirectories(Quelle)
For Each Unterordner As String In Unterverzeichnisse
Dim Unterordnerziel As String = Unterordner.Replace(Quelle, Ziel)
CopyFolder(Unterordner, Unterordnerziel, False)
Next
' Catch
'MessageBox.Show("Der zu kopierende Ordner existiert nicht: " + Ziel +
' Environment.NewLine + "Überprüfen Sie bitte den Pfad.", "Fehler",
' MessageBoxButtons.OK, MessageBoxIcon.Error)
' End Try
End Sub Ich übergebe der Funktion als Quelle: C:\Users\elkum\Desktop\TEST und als Zielverzeichnis C:\copyjobtest. Jedoch bekomme ich AB UND ZU eine Fehlermeldung: Could not find a part of the path C:\Users\elkum\Desktop\TEST\AnimEdit\ini\DvTest.exe .
Wie gesagt, ich hab es oft getestet und dieser Fehler taucht nur ab und zu auf. Mal funktioniert der Kopiervorgang, mal nicht.
Was ich bis jetzt 100%ig ausschliessen konnte, ist:
Die DvTest.exe ist nicht gestartet bzw. ich hab sie nicht geöffnet.
Es liegt nicht an Admin-Rechten.
Es liegt nicht an den Eigenschaften der DvTest.exe, also ob diese Read-Only, Unblocked etc. ist oder nicht, spielt keine Rolle.
Was ich bisher nicht ausschliessen konnte:
Ich weiss nicht, ob es an bestimmten Dateiformaten liegt. Bilder wie .png oder XML-Dokumente oder Textdateien .txt kopiert das Tool problemlos. Jedoch will er ab und zu .exe oder .ini Dateien nicht kopieren. Liegt es vielleicht an Dateiformaten?
Der Code ist nicht gut? - Würde nicht erklären, dass es ab und zu klappt..
Kann jemand helfen?
Grüsse
Beitrag wurde zuletzt am 12.10.12 um 12:45:32 editiert. | ![](../images/trans.gif) |
![](../images/48x48/info.gif) | Sie sind nicht angemeldet! Um auf diesen Beitrag zu antworten oder neue Beiträge schreiben zu können, müssen Sie sich zunächst anmelden.
Einloggen | Neu registrieren |
![nach oben](../images/b_top.gif) ![zurück](../images/b_zurueck.gif) |
|
Neu! sevCoolbar 3.0 ![Professionelle Toolbars!](../images/werbung/sevclb20_150x125.gif)
Professionelle Toolbars im modernen Design!
Mit sevCoolbar erstellen Sie in wenigen Minuten ansprechende und moderne Toolbars und passen diese optimal an das Layout Ihrer Anwendung an (inkl. große Symbolbibliothek) - für VB und MS-Access Weitere InfosTipp des Monats Access-Tools Vol.1 ![Access-Tools CD Vol.1](../images/werbung/apvol1_68x100.gif)
Über 400 MByte Inhalt
Mehr als 250 Access-Beispiele, 25 Add-Ins und ActiveX-Komponenten, 16 VB-Projekt inkl. Source, mehr als 320 Tipps & Tricks für Access und VB
Nur 24,95 EURWeitere Infos
|
|
|
Copyright ©2000-2024 vb@rchiv Dieter Otter Alle Rechte vorbehalten.
Microsoft, Windows und Visual Basic sind entweder eingetragene Marken oder Marken der Microsoft Corporation in den USA und/oder anderen Ländern. Weitere auf dieser Homepage aufgeführten Produkt- und Firmennamen können geschützte Marken ihrer jeweiligen Inhaber sein.
Diese Seiten wurden optimiert für eine Bildschirmauflösung von mind. 1280x1024 Pixel
|
|