飛行船大大

經常我們會下載到一些 各式各樣的檔案或網頁 ~但是檔名 或目錄卻是簡體字的.

久而久之 硬碟中到處都有 檔名 和目錄是以簡體字命名的

這些檔案在處理上很不方便~ 我想要找一個工具 可以自動列出清單 那些目錄或檔案名稱 中是是有出現簡體字的.
最好是一次掃瞄就 能列出清單 (就像掃毒軟體一樣). 這樣就不必目視檢查 可以用 ConvertZ.exe 來轉換為繁體了

請問有這種的小工具ㄇ?

mini

那 日文 及其他語言呢？

其實您會 VB 可以試著自己做看看的
原理是
將得到的字串印到一般的 Lable上
如果一個字串中有非 英文及正體中文 字出現
就會顯示成 ?
(最後再搜尋是否有 ? 字元出現即可)

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

至於如何得到檔案與目錄名稱
以下示範請自行理解應用

Public fso As Object
Public rootFolder As Object 'Folder
Public thisFile As Object 'Files
Public fi

Dim FI_Name() as String

Set fso = CreateObject("Scripting.FileSystemObject")
Set rootFolder = fso.GetFolder(PathIs)
Set thisFile = rootFolder.Files

ReDim FI_Name(0)
iTotal = -1
For Each fi In thisFile
iTotal = iTotal + 1
ReDim Preserve FI_Name(iTotal)
FI_Name(iTotal) = fi.Name
Next

最後就得到 這個目錄下所有的 檔案名稱 FI_Name

rootFolder.Name 則是 PathIs 下的目錄名稱

飛行船大大

ha ha不急用, 本想偷懶一下又被mini版主發現了 ...echo
晚上自己動手豐衣足食. 把上次寫的可逐字元檢查的小工具 和遞迴目錄 就可以掃出 路徑名和檔名.

日文的網頁 和檔案我比較少. 簡體的比較多.
不只有日文會有 ? ~ 某些歐洲人的寫vb專案 和網頁 , 在繁體xp下 我也常時有發現 ? 的符號. 基本上判斷法 還是以陳國強的繁簡內碼對照表 比較安全可靠,
因為網頁的charset=...設定經常不一致, 若是參考這個會容易誤判. 若是陳國強的繁簡內碼對照表就不會受影響.
寫ok後再回報.

mini

有些時候會因為windows的自我轉換
雖然是簡體字碼 但卻可顯示正確 (疑似被自動轉成正體字碼 或 因為外字集的關係而能顯示)
所以才想不以
繁簡內碼對照
方式來設計