Desktop Management Scripting-Sprache › Funktionen › Funktionen für den Dateiinhalt › SeekFile - Ändern der aktuellen Position in einer geöffneten Datei

SeekFile - Ändern der aktuellen Position in einer geöffneten Datei

Gültig für NetWare, Symbian OS, UNIX, Windows und Windows CE.

Die Funktion "SeekFile" verlagert die aktuelle Position in einer geöffneten Datei.

Funktionssyntax:

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

handle

Gibt ein von einem vorhergehenden Aufruf zurückgegebenes Handle an.

position

Gibt die neue Position in der Datei an. Mit 0 wird die Position an den Anfang der Datei gesetzt. Der nächste Lese- bzw. Schreibvorgang findet an der neuen Position innerhalb der Datei statt.

Bei erfolgreichem Abschluss gibt die Funktion TRUE zurück, andernfalls FALSE.

Beispiel:

'	Update a file at the 4th double word. set it to 0.
Dim fHandle as integer

fHandle = OpenFile("out5.a", O_UPDATE)
if (fHandle = -1) then
	Print("OpenFile(""out5.a"", O_UPDATE) failed.")
	exit
endif
if Not(SeekFile(fHandle, 16)) then
	Print("SeekFile(fHandle, 16) failed.")
	exit
endif
if Not(WriteFile(fHandle, 0)) then
	Print("WriteFile(fHandle, 0) failed.")
	exit
endif
CloseFile(fHandle)