Langage de script Desktop Management › Fonctions › Fonctions de contenu du fichier › SeekFile : Modifier la position actuelle dans un fichier ouvert

SeekFile : Modifier la position actuelle dans un fichier ouvert

Valide sur les plates-formes NetWare, Symbian OS, UNIX, Windows et Windows CE

La fonction SeekFile permet de changer la position en cours dans un fichier ouvert.

Cette fonction de contenu de fichier présente le format suivant :

Seekfile(handle as integer, position as integer) as Boolean

descripteur

Identifie un descripteur renvoyé par un appel précédent.

position

Indique la nouvelle position dans le fichier. Si la valeur est égale à 0, la position est au début du fichier. La lecture ou l'écriture suivante aura lieu à la nouvelle position dans le fichier.

En cas de réussite, la fonction renvoie True, sinon elle renvoie False.

Exemple : Fonction SeekFile

'	Mettez à jour un fichier au 4ème double mot. Définissez-le sur 0.
Dim fHandle as integer

fHandle = OpenFile("out5.a", O_UPDATE)
if (fHandle = -1) then
	Print("Echec d'OpenFile(""out5.a"", O_UPDATE).")
	quitter
endif
if Not(SeekFile(fHandle, 16)) then
	Print("Echec de SeekFile(fHandle, 16).")
	quitter
endif
if Not(WriteFile(fHandle, 0)) then
	Print("Echec de WriteFile(fHandle, 0).")
	quitter
endif
CloseFile(fHandle)