Sie sind aktuell nicht angemeldet.

Funktionen: Einloggen  |  Neu registrieren  |  Suchen

Alle MPG Dateien verschieben.
Autor: Der Codeiminator
Datum: 21.06.06 00:16
Also ich will ein kleines Programm machen das per klickt alle MPG Dateien aus einen vordefinierten Ordner in einen neuen erstellten Ordner verschiebt. Das Ordner erstellen und das verschieben einer Datei geht. Nun wollte ich fragen wie ich es schaffe das alle MPG Dateien verschoben werden? Hier der bisherige Code: Dim adir As String Dim ddir As String Dim thisDate As Date thisDate = Today ddir = thisDate adir = "D:\Eigene Dateien\Eigene Viedeos\" & ddir & "" MkDir(adir) My.Computer.FileSystem.MoveFile("D:\Eigene Dateien\test.mpg", _ "D:\Eigene Dateien\Eigene Viedeos\" & ddir & "\test.mpg") Schon in voraus Dank für die Hilfe.

Alle MPG Dateien verschieben.	903	Der Codeiminator	21.06.06 00:16
Re: Alle MPG Dateien verschieben.	589	Oliver_G.	21.06.06 09:20
Re: Alle MPG Dateien verschieben.	568	Der Codeiminator	21.06.06 12:32

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

Funktionen:  Zum Thema  |  Gesamtübersicht

Suchen