oFSO = CreateObject('Scripting.FileSystemObject')
oFolder = oFSO.GetFolder('C:\Documents and Settings\sje\Local Settings\Temporary Internet Files\Content.IE5\')
oSubFolders = oFolder.SubFolders
FOR EACH oSubFolder IN oSubFolders
  mm= oSubFolder.Path
  ?? " ",osubfolder.Files.Count
  oFiles = oSubFolder.Files
  FOR EACH oFile IN oFiles
	nn= oFile.path
	Try
	   oFile.Delete()
	CATCH
	   ? "missed " + oFile.path
	ENDTRY	
  ENDFOR
ENDFOR