'
' ----------------------------------------------------------------------------
' FUNCTIONI ChangeFileDateAndTime As Integer  DECEMBER 2001      by J.Philippe
'
'                  CHANGE  DATE(s)  and  TIME(s)  of  a  FILE
'
' DOCUMENTATION HTML FILE
' ----------------------------------------------------------------------------
'
' $INCLUDE "ChangeFileDateAndTime.Inc"
'
' Syntax :
' ------
' ChangeFileDateAndTime (pathFileName$, Year%, month%, day%, hour%, _
'                                               minute%, second%, optionWhichTimes$)
'
' Return  0 (False) on Failure or 1 (True) on success
'
' EXAMPLES :
' --------
'  - ChangeFileDateAndTime ("c:\myDir\myFile", 1983, 6, 21, 17, 22, 33)
'        the LastWriteTime Of MyFile is set to June 21 st 1983 at 17:22:23
'
'  - ChangeFileAndDate ("c:\myDir\myFile", 1983, 6, 21, 17, 22, 33 "Access")
'        the LastAccessTime Of myFile is set to June 21 st 1983 at 17:22:23
'
'  - ChangeFileAndDate ("c:\myDir\myFile", 1983, 6, 21, 17, 22, 33 "ACCESS Write CREATION")
'        the LastAccessTime, CreationTime and LastWriteTime Of myFile are
'        set to June 21 st 1983 at 17:22:23
' DOC 
' ---
'   A File is Stored on Disk with Three Different Dates and Times Named :
'       - the creationTime
'       - the lastAccesstime
'       - the lastWriteTime   (the one mostly mostly used shown)
'
'   Six NUMERIC Parameters **MUST** be Passed to the Functioni :
'       - the First  is the YEAR   of the new Date Time For the File
'       - the Second is the MONTH  of the new Date Time For the File
'       - the Third  is the DAY    of the new Date Time For the File
'       - the Fourth is the HOUR   of the new Date Time For the File
'       - the Fifth  is the MINUTE of the new Date Time For the File
'       - the Sixth  is the SECOND of the new Date Time For the File'   
'
'   The FILENAME With or Without a Path must be Passed as a STRING
'
'   The optionWhichTimes Parameter is a STRING that Indicates to the Functioni
'       which file Times must be Changed. If that String contains :
'       - "CREATION" the creationTime   will be Changed ("CRE" is enough)
'       - "ACCESS"   the lastAccessTime will be changed ("ACC" is enough)
'       - "WRITE"    the lastWriteTime  will be changed ("WRI" is enough)
'       Not case sensitive 
'       If that string is not Passed or is Empty, the lastWriteTime only will
'       be changed
'
'   ERROR : on error a ShowMessage is POPED UP and the Functioni Returns 0 (False)
'
' ----------------------------------------------------------------------------
'