Supportnet Computer
Planet of Tech

Supportnet / Forum / WindowsXP

Dateien mit Schreibschutz im "Temp"-Ordner löschen





Frage

Hallo Leute, mit folgendem VB-Script soll der Temp-Ordner beim Systemstart gelöscht werden. Das funktioniert auch, zumindest bei allen Dateien ohne Schreibschutzattribut. Set oFSO = WScript.CreateObject("Scripting.FileSystemObject") 'löscht alle Ordner oFSO.deletefolder "d:\Dokumente und Einstellungen\RB\Lokale Einstellungen\Temp\*" 'löscht alle Dateien Set oFolder = oFSO.GetFolder("d:\Dokumente und Einstellungen\RB\Lokale Einstellungen\Temp") Set oFiles = oFolder.Files For Each oFile In oFiles oFSO.DeleteFile(oFile.Path) Next Set oFiles = Nothing Set oFolder = Nothing Set oFSO = Nothing Wie müsste der Programmcode erweitert werden damit sämtliche Dateien (mit oder ohne Schreibschutz) ohne Rückfrage gelöscht werden? mfg reiner

Antwort 1 von birgitte

..ich glaube ich habe bereits selbst eine funktionierende Lösung gefunden, indem ich die Zeile:
oFile.Attributes = oFile.Attributes And Not 1

in die For..Next-Schleife einfüge.
For Each oFile In oFiles
	oFile.Attributes = oFile.Attributes And Not 1
	oFSO.DeleteFile(oFile.Path)
Next

mfg
reiner

Ich möchte kostenlos eine Frage an die Mitglieder stellen:


Ähnliche Themen:


Suche in allen vorhandenen Beiträgen: