檢索當(dāng)前文件的位置.
FileGetPos ( 句柄 )
句柄 | 先前調(diào)用 FileOpen() 函數(shù)返回的文件句柄. |
成功: | 返回文件從一開始的位置偏移(第一索引為 0). |
失敗: | 返回 0, 并設(shè)置 @error. |
#include <Constants.au3>
Local Const
$sFile =
"test.txt"
Local $hFile
= FileOpen($sFile, 2)
; 檢查文件是否為寫模式打開
If $hFile
= -1 Then
MsgBox(0, "錯誤", "無法打開文件.")
Exit
EndIf
; 寫一些東西到文件.
FileWriteLine($hFile, "一行文本,")
FileWriteLine($hFile, "Line2")
FileWriteLine($hFile, "Line3")
; 刷新文件到磁盤.
FileFlush($hFile)
; 檢查文件位置, 并嘗試讀取當(dāng)前位置的內(nèi)容.
MsgBox(0, "", "位置:
" & FileGetPos($hFile) & @CRLF & "數(shù)據(jù): " & @CRLF & FileRead($hFile))
; 現(xiàn)在, 開始調(diào)整位置.
Local $n
= FileSetPos($hFile, 9, $FILE_BEGIN)
; 檢查文件位置, 并嘗試讀取當(dāng)前位置的內(nèi)容.
MsgBox(0, "", "位置:
" & FileGetPos($hFile) & @CRLF & "數(shù)據(jù): " & @CRLF & FileRead($hFile))
; 關(guān)閉句柄.
FileClose($hFile)
; 清理臨時文件.
FileDelete($sFile)
provider with jb51.net (unicode) |