2 Antworten in diesem Thema

[phoenixx592]

Hey freunde ich will mich kurz halten,

ich schreibe an einem programm was:

 

1. Ordner kopieren soll in ein anderes Verzeichnis =>

2. Nun soll er genau diese datei umbennen!

3. den namen dieser Datei soll er sich aus einer .txt Datei aus der ERSTEN Zeile ziehen und dann diese Zeile in der .txt datei löschen.

 

ich komm nicht drauf wie man das macht

 

My.Computer.FileSystem.CopyDirectory(TextBox3.Text, TextBox1.Text, True)
My.Computer.FileSystem.MoveDirectory(TextBox1.Text, "Muster1")

 

das ist mein Anfang aus dem Abschnitt...

[Born2Hack]

1.Pack die .txt in eine array list.

& lass dir dann die erste zeile ausgeben

z.B arraylist [0]

 

2. Danach entfernst du den ersten array Eintrag und speichest die txt erneut ab.

 

    Public Function TXT2ListOfString(ByVal FullPath As String) As List(Of String)
        Dim lst As New List(Of String)
        If IO.File.Exists(FullPath) Then lst.AddRange(IO.File.ReadAllLines(FullPath, System.Text.Encoding.Default))
        Return lst
    End Function
 
   
   Public Function ListOfString2TXT(ByVal FullPath As String, ByVal lst As List(Of String)) As Boolean
        Dim f As New IO.FileInfo(FullPath)
        If f.Directory.Exists = True Then
            IO.File.WriteAllLines(FullPath, lst.ToArray, System.Text.Encoding.Default)
            Return True
        End If
        Return False
    End Function

 

[phoenixx592]

Danke für deine Hilfe B2H, aber ich glaube du verstehst nicht was ich meine

 

(also ich habe jetzt auch noch eine listbox hinzugefugt und versuche das problem so zu lösen, denke das es so einfacher ist.)

 

zu dem problem.

 

1. ein ordner soll kopiert werden in ein anderen ordner.

2. In der Listbox wird eine Text datei geladen mit verscheidenen überschriften (sie werden nacheinader aufgelistet).

3. nun soll der kopierte ordner umbennannt werden nach Überschrift eins.

4. Eine neuer ordner soll kopiert und ebenfalls dort eingefügt werden sowie die Überschrift 2 bekommen.

 

so lange bis es keine überschriften mehr gibt (<--- das problem hab ich aber gelöst )