8
Dateien per VBScript aus Ordner löschen mit Ausnahmen
Hallo,
und zwar ich habe schon ein Script zum Löschen von Ordner, aber ich möchte das auch aus dem Ordner deren Dateien gelöscht werden. Ich hoffe ihr habt für mich einen Tip da ich in VBS Programmierung noch nicht viel ahnung hab!
'Löschen der Dateien im Temporären Ordner mit Ausnahmen'
Set objFS = CreateObject("Scripting.FilesystemObject")
Set mySubfolders = objFS.GetFolder("C:\temp").Subfolders
For Each Subfolder In mySubfolders
Select Case LCase(Subfolder.Name)
Case LCase("HP_Updates")
Case LCase("ext47680")
Case Else
Subfolder.Delete(True)
End Select
Next
Für einige von euch wird es vermutlich ein Kinderspiel sein! Dank euch aber schonmal für euere Hilfe.
Grüße
Daniel
und zwar ich habe schon ein Script zum Löschen von Ordner, aber ich möchte das auch aus dem Ordner deren Dateien gelöscht werden. Ich hoffe ihr habt für mich einen Tip da ich in VBS Programmierung noch nicht viel ahnung hab!
'Löschen der Dateien im Temporären Ordner mit Ausnahmen'
Set objFS = CreateObject("Scripting.FilesystemObject")
Set mySubfolders = objFS.GetFolder("C:\temp").Subfolders
For Each Subfolder In mySubfolders
Select Case LCase(Subfolder.Name)
Case LCase("HP_Updates")
Case LCase("ext47680")
Case Else
Subfolder.Delete(True)
End Select
Next
Für einige von euch wird es vermutlich ein Kinderspiel sein! Dank euch aber schonmal für euere Hilfe.
Grüße
Daniel
Auf Facebook teilen
Auf Twitter teilen
Auf Reddit teilen
Auf Linkedin teilenBitte markiere auch die Kommentare, die zur Lösung des Beitrags beigetragen haben
Kommentar vom Moderator Biber am 16.06.2010 um 16:41:02 Uhr
Zitat von @daniel46220:
Jetzt hab ich noch eine Frage und zwar hab ich folgende Batch-Datei kann man die einfach in .vbs umbennen
Jetzt hab ich noch eine Frage und zwar hab ich folgende Batch-Datei kann man die einfach in .vbs umbennen
Wenn ich jetzt nur noch wüsste, wo ich den letzten Zählerstand notiert habe...*fluch*
Content-ID: 144580
Url: https://administrator.de/contentid/144580
Ausgedruckt am: 25.11.2024 um 11:11 Uhr
8 Kommentare
Neuester Kommentar
Hallo Daniel!
[Edit] Sorry, falsch gelesen ... [/Edit]
Wozu sollen Dateien aus einem Ordner gelöscht werden, der selbst gelöscht wird?
Grüße
bastla
[Edit] Sorry, falsch gelesen ... [/Edit]
Wozu sollen Dateien aus einem Ordner gelöscht werden, der selbst gelöscht wird?
Grüße
bastla
Der Ordner C:temp wird selbst ja nicht gelöscht sondern nur deren Ordner die darin erhalten sind!
Wenn Dateien wie exe, avi, jpg usw. darin abgelegt sind diese werden leider nicht gelöscht sondern eben nur Ordner und keine Dateien
aufgebaut ist es so:
Hauptordner (der bleibt bestehen) C:\temp
Unterordner (sollen gelöscht werden) Ordner 1, Ordner 2 usw.
Unterordner (sollen nicht gelöscht werden) HP_Update, ext14220 (dies funktioniert auch mit den Case)
und dann gibt es eben noch die Dateien
die nicht gelöscht werden!
Dank Dir
Grüße
Dani
Wenn Dateien wie exe, avi, jpg usw. darin abgelegt sind diese werden leider nicht gelöscht sondern eben nur Ordner und keine Dateien
aufgebaut ist es so:
Hauptordner (der bleibt bestehen) C:\temp
Unterordner (sollen gelöscht werden) Ordner 1, Ordner 2 usw.
Unterordner (sollen nicht gelöscht werden) HP_Update, ext14220 (dies funktioniert auch mit den Case)
und dann gibt es eben noch die Dateien
die nicht gelöscht werden!
Dank Dir
Grüße
Dani
Hallo Dani!
Wenn demnach nur alle Dateien aus "C:\Temp" gelöscht werden sollen, als zusätzliche Zeile nach der Schleife:
<code type=plain">objFS.DeleteFile "C:\Temp\*.*",True
Grüße
bastla
Wenn demnach nur alle Dateien aus "C:\Temp" gelöscht werden sollen, als zusätzliche Zeile nach der Schleife:
<code type=plain">objFS.DeleteFile "C:\Temp\*.*",True
Grüße
bastla
Perfekt jetzt löscht es alle Dateien bis auf die Ausnahmen 
wie kann man zum Beispiel noch eine ausnahme hinzufügen, das eine *.txt Datei erhalten bleibt!
Danke
Grüße
Dani
wie kann man zum Beispiel noch eine ausnahme hinzufügen, das eine *.txt Datei erhalten bleibt!
Danke
Grüße
Dani
Hallo daniel46220!
Dann bist Du wieder bei einer Schleife analog zum "Ordner-Löschen" (nur eben nicht für ".SubFolders", sondern für ".Files") ...
Grüße
bastla
Dann bist Du wieder bei einer Schleife analog zum "Ordner-Löschen" (nur eben nicht für ".SubFolders", sondern für ".Files") ...
Grüße
bastla
Dank Dir hat super funktoniert!
Jetzt hab ich noch eine Frage und zwar hab ich folgende Batch-Datei kann man die einfach in .vbs umbennen oder muss ich daran änderungen vornehmen, damit dies über vbs läuft?
for /f "delims=" %i in (C:\Computer.txt) do rd /s /q "\\%i\C$\Documents and Settings\adminadmin" 2>nul
Grüße
Dani
Jetzt hab ich noch eine Frage und zwar hab ich folgende Batch-Datei kann man die einfach in .vbs umbennen oder muss ich daran änderungen vornehmen, damit dies über vbs läuft?
for /f "delims=" %i in (C:\Computer.txt) do rd /s /q "\\%i\C$\Documents and Settings\adminadmin" 2>nul
Grüße
Dani
Hallo daniel46220!
Wieso soll es denn jetzt auch noch ein Batch werden? Das Auslesen aus der Textdatei und Löschen der Ordner sollte doch auch per VBS hinzubekommen sein ...
Um eine Batch-Datei aus VBS aufzurufen kannst Du "
Grüße
bastla
Wieso soll es denn jetzt auch noch ein Batch werden? Das Auslesen aus der Textdatei und Löschen der Ordner sollte doch auch per VBS hinzubekommen sein ...
Um eine Batch-Datei aus VBS aufzurufen kannst Du "
Shell.Run" verwenden ...Grüße
bastla
Jetzt hab ich noch eine Frage und zwar hab ich folgende Batch-Datei kann man die einfach in .vbs umbennen oder muss ich daran änderungen vornehmen, damit dies über vbs läuft?
@daniel46220
Was für eine Frage?
Beispiel:
Ich habe eine *.mpeg-Datei. Kann ich die einfach umbenennen in *.txt, damit ich den Film lesen kann, wie ein Buch?
Nein! So einfach ist es beim Scripten auch wieder nicht! Es gibt die Code-Anweisungen in Batch, Bash, VBS, VBX,VBA,C,C++ etc., whatever. Einfach die Dateiendung zu ändern und die neue Datei compiliert es mir - Nee! So einfach wäre viel zu schön
Gruss
Tsuki
