wishsmile的部落格

'讀取檔案

txtfile=server.mappath("test/testopen.txt") '檔案路徑 (亦可寫絕對位置)

set fs=createobject("scripting.filesystemobject")

set fm=fs.opentextfile(txtfile,1,false,false)

do while not fm.AtEndOfStream

    pw= fm.ReadLine '讀文字

    response.write txt & "<br>"  '網頁上印出內容(可不寫)

loop

fm.close '關閉檔案  (只要有打開檔案，一定要關閉才能再做下一次檔案的讀取或異動)

Set fs = Nothing

'刪除檔案

set fm=createobject("scripting.filesystemobject")

fm.deletefile txtfile,true

=================================================================

相關錯誤:

(1) 800a0035|當物件開啟時，不允許操作

      當沒有做 fm.close 時就執行下一次的 fm.deletefile txtfile,true 會發生此錯誤

      加上fm.close就好了

(2) 800a0046|沒有使用權限

      檔案按右鍵，內容 > 安全性 ，給"User" 完全控制的權限