※ 引述《geant737 (Giambi)》之銘言： : 各位大大晚安～ : 小弟目前有個問題需要解決！ : 不知道是否可以實現！ : 假設我有一個文字檔123.txt : 其內容為： : d:\test\567.avi : d:\test\582.avi : d:\test\8596.avi : 我想要將檔案自動變成 : d:\test\567.avi d:\testAA\567.txt : d:\test\582.avi d:\testAA\582.txt : d:\test\8596.avi d:\testAA\8596.txt : 原本小弟要自己一行一行key in進去～ : 可是～後來發現有好幾千行～ : 要貼到天荒地老了！ : 不知道這樣子的方法可不可以實現呢？ : 謝謝！ 給你參考一下 你是要將test->testAA 還是要在每一行最後加上新的路徑 (不過應該都是一樣的) Dim tempText As String Dim total As String Open "C:\test.txt" For Input As #1 While Not EOF(1) Line Input #1, tempText total = total + Replace(tempText, "\test\", "\testAA") + vbCrLf Wend Close #1 Open "C:\test.txt" For Output As #1 Print #1, total Close #1 不過這方法有個問題 如果你的路徑是 C:\test\test\... 就會變成 C:\testAA\testAA\... 另外不確定這方法在幾千行的時候會不會出錯 另一個方法就是把這個文字檔設成DataBase 然後用DataBase的方式處理 (如果第一個方法不行的話) -- 我的Blog http://clubtblog.blogspot.com 我的巴哈小站 http://home.gamer.com.tw/clubt --

※ 發信站: 批踢踢實業坊(ptt.cc) ◆ From: 122.126.109.30