※ 引述《albb0920 (albb)》之銘言： : ※ 引述《Mirmo (牛後~~牛後~~牛後後)》之銘言： : : 文字檔裡面參雜中文跟英文 : : 我想刪除所有中文 : : 保留英文 : : 請問有什麼軟體可以一次弄好 : : 謝謝 : 用VB Script 做吧 :) : 用記事本貼上，存成 xxx.vbs : Dim fso,ts : Set fso = CreateObject("Scripting.FileSystemObject") : path = InputBox("請輸入檔案路徑") : Set ts = fso.OpenTextFile(path) : text = ts.ReadAll : ts.close : For i = 1 to len(text) 這是不好的寫法，迴圈每執行一次都要呼叫一次 len(text) 最好是先把 len 存到變數，可以少掉重複呼叫函數 : tmp = mid(text,i,1) : If Asc(tmp) > 0 then text2 = text2 & tmp 這部分就是 vb/vbscript 好用的地方了 vb 不管中文英文，都視為一個字元 沒有單雙位元組的問題要考慮 :) 用 C 的話這樣寫保證不能用 : Next : Set ts = fso.CreateTextFile(path,true) : ts.Write(text2) : ts.close -- 個人網頁： http://pcman.sayya.org/ 上面有自畫像及各種聯絡資訊 Blog: http://pcman.sayya.org/blog.php?id=pcman PCMan 全系列 BBS 連線軟體 http://pcman.ptt.cc/ http://pcmanx.csie.net/ 新酷音輸入法 for Windows http://chewing.csie.net/ IE Tab Firefox plugin/extension http://ietab.mozdev.org/ --

※ 發信站: 批踢踢實業坊(ptt.cc) ◆ From: 220.228.253.114 ※ 編輯: HZYSoft 來自: 220.228.253.114 (12/13 21:51)