Click above to get retro games delivered to your door ever month!

 DirCreDteGet() / DirCreDteSet()
------------------------------------------------------------------------------
 Purpose:
 Get / set a directory's creation date.

 Syntax:
 lpszDate = DirCreDteGet( lpszPath )
 lpszDate = DirCreDteSet( lpszPath, lpszNewDate )

 Parameters:
 lpszPath    The full NetWare path of the directory.
 lpszNewDate The new creation date.

 Returns:
 A character string of length 8 (see Notes).

 Description:
 DirCreDteGet() returns the date that the directory specified by
 lpszPath was created. lpszPath must be the full directory path,
 including the name of the directory itself and the volume name, for
 example, SYS:DATA\KATIE\WP, where WP is the directory in question.

 DirCreDteSet() sets the creation date for the specified directory
 lpszPath to the specified date lpszNewDate and returns the previous
 creation date.

 Returns an empty string if an error occurs.

 Example:
 // To find the date that SYS:DATA\KATIE\WP was created:
 lpszCreateDate = DirCreDteGet( "SYS:DATA\KATIE\WP" )
  if ( !empty( lpszCreateDate ) )
    ? "SYS:DATA\KATIE\WP was created on", lpszCreateDate
 endif
 // To change directory SYS:DATA\KATIE\WP's creation date to today's
 // date:
 lpszOldDate = DirCreDteSet( "SYS:DATA\KATIE\WP", date() )
 lpszNewDate = DirCreDteGet( "SYS:DATA\KATIE\WP")
 if ( !empty( NewDate ) )
    ? "SYS:DATA\KATIE\WP was now created on", lpszNewDate
 endif

 Notes:
 Appropriate trustee access rights are required to use these
 functions.

 The format of the date values is the ANSI style "yyyymmdd" except with
 CA-Clipper and CA-Visual Objects where the date values are of type DATE.