fDateTime (Example)

ONLINE HELP
WINDEV, WEBDEV AND WINDEV MOBILE

Version:

Home | Sign in | English

This content has been translated automatically. Click here to view the French version.

Help / WLanguage / WLanguage functions / Standard functions / External file functions

Example 1: Recovering dates and times from a file
Example 2: Changing the creation date of a file

fDateTime (Example)

See the associated help page

Example 1: Recovering dates and times from a file

The following code is used to find out the different dates and times associated with a file.

// Déclaration des variables 
ResDateHeureCréation is string
ResDateHeureModification is string
ResDateHeureAccès is string
CheminFichier is string
// Sélection d'un fichier
CheminFichier = "C:\MesRépertoires\Fichier.txt"
// Récupération des différentes dates d'un fichier
ResDateHeureCréation = fDateTime(CheminFichier, "", fCreation)
ResDateHeureModification = fDateTime(CheminFichier, "", fModify)
ResDateHeureAccès = fDateTime(CheminFichier, "", fAccess)
IF ResDateHeureCréation <> "" AND ResDateHeureModification <> "" AND ResDateHeureAccès <> "" THEN
	// Affichage des différentes dates et heures du fichier
	Info("La date et l'heure de création est : " + ResDateHeureCréation + CR + ...
		"La date et l'heure de modification est : " + ResDateHeureModification + CR + ...
		"La date et l'heure d'accès est : "+ ResDateHeureAccès)
ELSE
	// Affichage du message d'erreur si la récupération n'a pas été effectuée
	Error(ErrorInfo(errMessage))
END

Example 2: Changing the creation date of a file

The following code is used to modify the creation date of a file by the system date of the computer.

// Déclaration des variables 
ResDateHeureCréation is string
ResDateHeureSystème is string
CheminHeureFichier is string
// Sélection d'un fichier
CheminFichier = "C:\MesRépertoires\Fichier.txt"
// Récupération de la date et l'heure système
ResDateHeureSystème = DateSys() + TimeSys()
// Modification de la date de création du fichier sélectionné
ResDateHeureCréation = fDateTime(CheminFichier, ResDateHeureSystème, fCreation)
IF ResDateHeureCréation <> "" THEN
	// Affichage de la date de création
	Info("La date et l'heure de création est à présent : " + ResDateHeureCréation)
ELSE
	// Affichage du message d'erreur si la récupération n'a pas été effectuée
	Error(ErrorInfo(errMessage))
END