求助如何轉換簡體跟繁體的字串.......簡繁互換的問題...

kk_lee69 · 发表于 2011-8-20 10:21:27

在資料庫的處理中...經常可見簡繁體的互換.......
商用軟體通常利用下面的表....來做互換的動作......

可以用利用 AUTOIT 再配合下面的表....來做簡繁互換的動作嗎??
甚至於轉換成 UNICODE 的格式......

請高手舉個例子學習一下感謝!!

[BIG5]
BIG5Order[0]=$2020
BIG5Order[1]=$A3AC
BIG5Order[2]=$A1A2
BIG5Order[3]=$A1A3
BIG5Order[4]=$2020
BIG5Order[5]=$A1A4
BIG5Order[6]=$A3BB
BIG5Order[7]=$A3BA
BIG5Order[8]=$A3BF
BIG5Order[9]=$A3A1
BIG5Order[10]=$A1C3
BIG5Order[11]=$A9A9
BIG5Order[12]=$A1A7
BIG5Order[13]=$A3AC
BIG5Order[14]=$2020
BIG5Order[15]=$A3AE
BIG5Order[16]=$2020
BIG5Order[17]=$A3BB
BIG5Order[18]=$A3BA
BIG5Order[19]=$A3BF
BIG5Order[20]=$2020
BIG5Order[21]=$A9A7
BIG5Order[22]=$A9A5
BIG5Order[23]=$A9A6
BIG5Order[24]=$A9A4
BIG5Order[25]=$2020
BIG5Order[26]=$A3DF
BIG5Order[27]=$2020
BIG5Order[28]=$2020
BIG5Order[29]=$A3A8
BIG5Order[30]=$A3A9
BIG5Order[31]=$A1D0
BIG5Order[32]=$2020
BIG5Order[33]=$A3FB
BIG5Order[34]=$A3FD
BIG5Order[35]=$2020

happytc · 发表于 2011-8-20 11:20:43

本帖最后由 happytc 于 2011-8-20 11:26 编辑

kk_lee69兄，幫看看附件，我用軟件轉簡體中文件為繁體中文的，有那裡不對的地方？

若有可能，能否幫忙改在你們那邊的常用語，先謝了

pusofalse · 发表于 2011-8-20 12:34:31

3mile兄的强帖：中文内码转换UDF，方便调用。

happytc · 发表于 2011-8-20 13:00:48

回复 3# pusofalse

这个转容易，不容易的是用词的不同的转换。比如象服务器→伺服器之类的

netegg · 发表于 2011-8-20 16:17:43

回复 4# happytc
楼主说的是字形,似乎没涉及字义,那样的话,只能自己做字典了

kk_lee69 · 发表于 2011-8-20 16:23:48

附上修改過的繁體語意的檔案...................

kk_lee69 · 发表于 2011-8-20 18:02:53

能調用WORD 做轉換嗎?? 如果可以的話語意也會被轉換的

kk_lee69 · 发表于 2011-8-20 18:03:01

能調用WORD 做轉換嗎?? 如果可以的話語意也會被轉換的

easefull · 发表于 2011-8-21 12:53:28

语义转换,似乎是个大工程啊.关注一下.

3mile · 发表于 2011-8-21 13:12:27

如果做地区词意的转换
1.需要先做准确的中文分词
2.建立地区词字典
3.设立地区词转换优先级......
呜呼,非吾辈之所能.

happytc · 发表于 2011-8-22 05:57:32

回复 6# kk_lee69

非常感谢，已经把这个文件加入到Live Capture软件的语言文件里了，并且把你设置为翻译者了。再次感谢

kk_lee69 · 发表于 2011-8-23 22:51:49

我還是覺得應該可以利用WORD 的簡繁互換功能當做轉換的工具.....可惜找不到相關的資料....等待高手出現^^

kk_lee69 · 发表于 2011-8-23 23:24:19

YA !! 終於測試出來了....把小小的心得跟大家分享......希望拋磚可以引玉出來 ....^^

輸入繁體字.....轉換成簡體....在秀出來

#include <array.au3>
#include <Word.au3>

$oWordApp = _WordCreate()
$oDoc = _WordDocGetCollection ($oWordApp, 0)
$oDoc.Range.insertAfter ("工廠有一台電腦")
$oDoc.Range.TCSCConverter (1, True, True) ;1為繁體轉簡體 0為簡體轉繁體
$oWordContent = $oDoc.Content
$TextDoc = $oWordContent.Text 
MsgBox( 1 ," Hop, the Text is : ", $TextDoc )
_WordQuit ($oWordApp,0)

happytc · 发表于 2011-8-23 23:57:26

回复 13# kk_lee69

kk_lee69兄，不是3楼已经给你了最au3的方法嘛

你这个代码，得安装了ms office的机子才能行吧

happytc · 发表于 2011-8-23 23:59:24

看了‘新同文堂’的js代码，也是繁简转换的，也是3楼的方法+一个常用词对应库（非常小的一个库）

		自动登录	找回密码
密码			加入

[效率算法] 求助如何轉換簡體跟繁體的字串.......簡繁互換的問題...

相关帖子

本帖子中包含更多资源

本帖子中包含更多资源

评分

[效率算法] 求助 如何轉換 簡體跟繁體的字串.......簡繁互換的問題...

相关帖子

本帖子中包含更多资源

本帖子中包含更多资源

评分

[效率算法] 求助如何轉換簡體跟繁體的字串.......簡繁互換的問題...