none
批量合并文件 RRS feed

答案

  • 你好

    你可以嘗試以下的CODE

      Dim s As New StreamReader("c:\2.txt")  '檔案2

            Dim sw As New StreamWriter("c:\1.txt", True) 檔案2, 和設定是 APPEND/附加模式, 所以當要寫資料到這個檔案時會把資料寫到 檔案的最尾
            sw.Write(s.ReadToEnd) ' 讀取檔案二的資料和把他寫到檔案一上
            sw.Close()開閉檔案一

            s.Close() 開閉檔案二

    如果你想批量MERGE 文件

    可以把 Dim s As New StreamReader("c:\2.txt")  的檔案換上新的便可,

    當然有讀完一個FILE 時要記得把FILE 關閉

    Please correct me if my concept is wrong.


    Chi
    2010年8月19日 20:53
    版主