Global $done = 0, $sWmiFileName
Local $objService = ObjGet("WinMgmts:\\.\root\CIMV2")
Local $oWMISink = ObjCreate("WbemScripting.SWbemSink")
Local $objSink = ObjEvent($oWMISink, "Sink_")
$objService.ExecNotificationQueryAsync($oWMISink, _
"SELECT * FROM __InstanceCreationEvent WITHIN 1 WHERE " & _
"Targetinstance ISA 'CIM_DirectoryContainsFile' and " & _
"TargetInstance.GroupComponent= " & _
"'Win32_Directory.Name=""C:\\\\""'")
While Not $done
Sleep(50)
Wend
ConsoleWrite($sWmiFileName & @LF)
Func Sink_OnObjectReady($oOutParams, $oContext)
$sWmiFileName &= StringRegExpReplace($oOutParams.TargetInstance.PartComponent, '.*\\(.*)"', '\1' & @LF)
$done = 1
EndFunc ;==>Sink_OnObjectReady