WMI로 파일 삭제

WMI는 윈도우에서 할 수 있는 대부분의 기능을 수행할 수 있습니다.
여기서는 간단하게 파일을 지우는걸 보여 드리겠지만 응용하면 다양하게 써 먹을 수 있겠져~


[ Del_File.vbs ]

strComputer = "."
Set objWMIService = GetObject("winmgmts:\\" & strComputer & "\root\cimv2")
Set colFileList = objWMIService.ExecQuery _
    ("ASSOCIATORS OF {Win32_Directory.Name='C:\kei'} Where " _
        & "ResultClass = CIM_DataFile")
For Each objFile In colFileList
    If InStr(objFile.FileName,"delete.txt") Then
        objFile.Delete
    End If
Next

위의 스크립트를 실행하면 C:\kei 폴더안에 있는 delete.txt 파일을 삭제 합니다.

여기서 키 포인트는 objFile.Delete 라고 보시면 되겠지요.
역시나.. 그닥 어려운게 없어 보이므로.. 기타 설명 생략 -_-;;