XYplorer Beta Club

Code: Select all

"Wipe C:\blablabla\"
  // Folder to clean.
  $folder = 'C:\blablabla\';

  // Lists all files in the folder - change 1 to 0 to wipe folders as well.
  $list = ListFolder($folder, '*', 1, '|');

  // Only perform the wipe if an item was found.
  // Otherwise the wipe will use the current selection.
  if ($list != '') {
    Wipe $list;
  }

Code: Select all

"Wipe swan_x's stuff..."
	// |-separated list of file(s) to remove.
	$files = 'C:\abc.txt';

	// |-sepearated list of folder(s) to clean.
	$folders = 'C:\blablabla\';

	// Set to True to only remove files from the folders.
	// Set to False to remove subfolders as well.
	$onlyFiles = True;


	// END OF OPTIONS


	// Be forgiving in our inputs by accepting ';' or '|'.
	$files = Replace($files, ';', '|');
	$folders = Replace($folders, ';', '|');

	// Initialize list.
	$list = '';

	// Loop through list of folders.
	foreach ($folder, $folders, '|')
	{
		// Ignore empties...
		if ($folder == '') { continue; }

		// Ignore folders which do not exist.
		if (Exists($folder) == 2)
		{
			// Add folder's contents to list.
			$list = $list . '|' . ListFolder($folder, '*', $onlyFiles, '|');
		}
	}

	// Loop through list of files.
	foreach ($file, $files, '|')
	{
		// Ignore empties...
		if ($file == '') { continue; }

		// Ignore files which do not exist.
		if (Exists($file) == 1) {
			// Add files to list.
			$list = "$list|$file";
		}
	}

	// Clean up the list to remove empties and duplicates.
	$list = FormatList($list, 'dents');

	// Only perform the wipe if list is not empty.
	// Otherwise the wipe will use the current selection.
	if ($list != '') {
		Wipe $list;
	}