Delete a file using WMI (Perl)
This code can be found in
Chapter 8 of Windows XP Cookbook
Purchase XP Cookbook or Networking Recipes for only $25 plus shipping! While supplies last.
Find out how to download all of the Perl code from this site.
# From the book "Windows XP Cookbook"
# ISBN: 0596007256
# This code deletes a file using WMI
# ------ SCRIPT CONFIGURATION ------
use Win32::OLE;
$strComputer = '.';
$strFilePath = '<FilePath>';
# e.g. "d:\scripts\test.txt"
# ------ END CONFIGURATION ---------
$objFile = Win32::OLE->GetObject('winmgmts:\\\\' . $strComputer . '\\root\\cimv2:CIM_Datafile.Name=\'' . $strFilePath . '\'');
$objFile->Delete();
print "Successfully deleted file\n";
|
This code has been viewed 965 times.
|
New from the creators of TechTasks.com:
StatSheet.com
|
