請選擇 進入手機版 | 繼續訪問電腦版

微剋多資訊

 找回密碼
 註冊

Login

搜索
回覆 2則 瀏覽 3536篇

[教學] AutoIt 幼幼班第三課 - 開檔

該用戶從未簽到

發表於 2012-10-21 17:50 | 顯示全部樓層 |閱讀模式
本帖最後由 rictirse 於 2014-12-24 08:27 編輯

學完前面兩課,這邊要開始教 綜合練習開檔

很實用的東西,例如成績的計算,大量檔案的統計 etc

從最簡單的語法開始教學起
首先先下載 這次的範例檔案
或是直接複製以下內容,令存檔案為A.txt
  1. 123
  2. 456
  3. 中文測試        English Test
  4. !@#$%^&*()_+
複製代碼
一次讀一個字

  1. $file = FileOpen ( "A.txt", 0)

  2. ; 檢查檔案是否已開啟並已準備好讀取
  3. If $file = -1 Then
  4.     MsgBox ( 0, "錯誤", "無法開啟檔案。")
  5.     Exit
  6. EndIf

  7. ; 一次讀取 1 個字元直到檔案結尾 EOF(End-Of-File) 為止
  8. While 1
  9.     $chars = FileRead ( $file, 1)
  10.     If @error = -1 Then ExitLoop
  11.     MsgBox (0, "讀取到的字元:", $chars)
  12. Wend

  13. FileClose($file)
複製代碼
一次讀一行
  1. $file = FileOpen ( "A.txt", 0)

  2. ; 檢查檔案是否已開啟並已準備好讀取
  3. If $file = -1 Then
  4.     MsgBox(0, "錯誤", "無法開啟檔案。")
  5.     Exit
  6. EndIf

  7. ; 讀取文字行直到檔案結尾 EOF(End-Of-File) 為止
  8. While 1
  9.     $line = FileReadLine ($file)
  10.     If @error = -1 Then ExitLoop
  11.     MsgBox(0, "讀取到的行:", $line)
  12. Wend

  13. FileClose ($file)
複製代碼
檔案寫入
  1. #cs
  2. FileOpen Flags:
  3.   0 = 讀取模式
  4.   1 = 寫入模式 (附加至檔案結尾)
  5.   2 = 寫入模式 (清除前一筆內容)
  6.   4 = 寫入 RAW 模式
  7.   8 = 若不存在建立目錄結構 (請見附註)
  8.   9 = 請見附註說明
  9.   16 = 強制用 FileRead 和 FileWriteForce 函數以二進位模式讀寫
  10.   32 = 使用 Unicode UTF16 小尾碼讀寫模式,讀取時不會覆寫存在的 BOM 簽章
  11.   64 = 使用 Unicode UTF16 大尾碼讀寫模式,讀取時不會覆寫存在的 BOM 簽章
  12.   128 =使用 UTF8 讀寫模式,讀取時不會覆寫存在的 BOM 簽章
  13. #ce

  14. $file = FileOpen("測試.txt", 1)

  15. ; 檢查檔案是否已開啟並已準備好讀取
  16. If $file = -1 Then
  17.     MsgBox(0, "錯誤", "無法開啟檔案。")
  18.     Exit
  19. EndIf

  20. FileWrite ($file, "第一行")
  21. FileWrite ($file, "還是第一行" & @CRLF)
  22. FileWrite ($file, "第二行" & @CRLF)

  23. FileClose ($file)
複製代碼

簽到天數: 12

該用戶今日未簽到

發表於 2012-10-22 00:18 | 顯示全部樓層
小站歡迎言之有物的人才,直接送上路 升級為版塊專員-協助噹噹經營autoit版塊

點評

感謝讚賞與升級,看文章方便多了,再次感謝 :)  發表於 2012-10-22 15:56

使用道具

您需要登入後才可以回帖 登入 | 註冊

本版積分規則

Discuz! X

© 2009-2017 Microduo

快速回覆 返回頂部 返回列表