[VB6 ] 有關利用filesystemobject寫入資料的問題
請各位幫忙了
我的問題是
將資料寫入text檔之後，必須要寫個txtf.close 才可以繼續執行
可是若再打開此text檔，再寫入資料，則資料會覆蓋上一筆的資料= =
以下是程式中某一部份 (其中有關ii的部份沒有寫進去)
Set txtf = fs.OpenTextFile(ss, ForReading, False)
Do Until txtf.AtEndOfLine
ff = Split(txtf.ReadLine, ",")
sss = App.Path + "\分類\" + Trim(Str(ii)) + ".txt"
Set txtf2 = fs.OpenTextFile(sss, ForWriting) -------------(1)
txtf2.Write (ff(2))
txtf2.Write vbCrLf <----換行也沒用
txtf2.Close <-----如果去掉 會顯示 (1)沒有使用權限
Loop
有關我的問題這部份 ，該怎麼處理呢??
謝謝各位了
--
※ 發信站: 批踢踢實業坊(ptt.cc)
◆ From: 140.120.6.155
→
12/28 09:03, , 1F
12/28 09:03, 1F
Visual_Basic 近期熱門文章
PTT數位生活區 即時熱門文章
