[WMI] 원하는 폴더의 원하는 확장자 파일 모두 지우기

프로그래밍/WMI 스크립트 2007/12/09 00:11 글쓴이 : TTF 
strDir = "D:\Backup"
strFileExt = "bak"
  
strComputer = "."
  
Set objWMIService = GetObject("winmgmts:\\" & strComputer & "\root\cimv2")
  
Set FileList = objWMIService.ExecQuery("ASSOCIATORS OF {Win32_Directory.Name='" & strDir & "'} Where " & "ResultClass = CIM_DataFile")
  
For Each objFile In FileList
        If objFile.Extension = strFileExt Then
' Wscript.echo "Extension : " & objFile.Extension
            objFile.Delete
        End If
Next
2007/12/09 00:11 2007/12/09 00:11

걸린 글 0 / 덧글 0

덧글을 달아 주세요