Copy a File and Add Date.Time Extension

This script will copy a file and add a date.time extension. For example use it to copy somereport.txt to somereport.txt.20001024.144504

Usage: File_to_copy
#usage 0 = In File #Copy a file and add a Date time stamp extention #file.dat.20001024.144405 ($sec,$min,$hour,$mday,$Mon,$year,$wday,$yday,$isdst) = localtime(time); if ($sec < 10) { $sec = "0" . $sec; } if ($min < 10) { $min = "0" . $min; } if ($hour < 10) { $hour = "0" . $hour; } if ($mday < 10) { $mday = "0" . $mday; } $Mon = $Mon + 1; if ($Mon < 10) { $Mon = "0" . $Mon; } if ($year > 99) { $Cent="20"; } else { $Cent="19"; } if ($year > 99) { $year = substr($year,1,2); } print "Copy /V $ARGV[0] /B $ARGV[0].$Cent$year$Mon$mday.$hour$min$sec"; $Rc = system("Copy /V $ARGV[0] /B $ARGV[0].$Cent$year$Mon$mday.$hour$min$sec"); print "RC=$Rc";

Copyright © 2002 Booshway Enterprises, Inc.
You have a royalty-free right to use, modify, reproduce and distribute the Sample Application Files (and/or any modified version) in any way you find useful, provided that you agree that The Booshway Enterprises, Inc. has no warranty, obligations or liability.