✔ VB Script - Dateien mit .doc löschen

[casian]

hallo zusammen

Ich möchte in einem bestimmten Ordner alle .doch Dateien löschen. Falls es dann keine Dateien in diesen Ordner gibt sollte das Script auch keine Fehlermeldung bringen. Ich habe etwas versucht aber es scheint nicht zu funktionieren:

Set oFSO = WScript.CreateObject("Scripting.FileSystemObject")
Set oFolder = oFSO.GetFolder("C:\Users\Chriz\Desktop\test")
Set oDateien = oFSO.FileExists ("*.doc")

If oFSO.fileexists(oDateien) Then
	
	oFSO.DeleteFile	

Else
	WScript.quit
End If

Kann mir jemand helfen?

Vielen dank

 

[Yaslaw]

Was soll in deinem Script oFSO löschen? Welche Datei?
Wozu hast du oFolder?

Ich würde es in etwa so versuchen

    Set oFso = WScript.CreateObject("Scripting.FileSystemObject")
    Set oFolder = oFso.GetFolder("C:\")
    
    For Each oFile In oFolder.Files
        If oFile.Name Like "*.doc" Then oFile.Delete
    Next oFile

 

[casian]

Es sollten alle *.doc Dateien in einem Verzeichniss gelöscht werden.
zum Beispiel im Verzeichniss C:\test .
Falls es noch andere Dateien in diesem Verzeichniss gibt sollten diese nicht gelöscht werden.

 

[Yaslaw]

genau das sollte mein Script auch tun...

 

[casian]

ja danke geht
Hat mir sehr geholfen danke