Scriptbox - Find your Script, VBScript VBScripts VB-Script VB-Scripts Scripting

Loading

:: { Category } ::

0-9


	Search Options: Delete Specific Files in a Specific Folder Content of Delete Specific Files in a Specific Folder.vbs MD5 Hash: AFB51B821849457399B16F50827551CB
	strComputer = "." Set objWMIService = GetObject("winmgmts:\\" & strComputer & "\root\cimv2") Set colFileList = objWMIService.ExecQuery _ ("ASSOCIATORS OF {Win32_Directory.Name='T:\Act'} Where " _ & "ResultClass = CIM_DataFile") For Each objFile In colFileList If InStr(objFile.FileName, "current") Then objFile.Delete End If Next

© 2008 - 2013 Boris Toll :: Scripts available: 6.481 :: :: scriptbox.toll.at :: :: powered by www.toll.at ::