ollydbg 发表于 2008-6-13 11:23:07

如何用au3的asc函数得到汉字的asc码？高人进! [已解决]

我用asc函数，只能得到字母和数字类的asc码，但汉字的做不到。

[ 本帖最后由 漠北雪~狼 于 2008-6-17 04:25 编辑 ]

zhang0121 发表于 2008-6-13 11:37:02

BinaryToString ( 表达式[,标志])

参数

表达式 一个需要进行转换的二进制变量.
标志 [可选] 修改数据编码转换格式:
标志 = 1 (默认), binary 数据为 ANSI 编码

夜苦寒 发表于 2008-6-13 15:21:20

;======================================================
;
; 函数名称:                SendX("string")
; 详细信息:                发送汉字.
; $string:                $string 为您想输入的汉字.
; 返回值 :                没有
; 作者:                        thesnow(rundll32@126.com)
;
;======================================================
Func SendX($string)
      Local $char
      Local $code
      
      For $i = 1 to StringLen($string)
                $char = StringMid($string, $i, 1)
                $code = Asc($char)
                If $code > 127 Then
                        $code = $code * 256
                        $i    = $i + 1
                        $char = StringMid($string, $i, 1)
                        $code = $code + Asc($char)

                EndIf
                Send("{ASC " & $code & "}")
      Next
EndFunc

这个函数中 Send("{ASC " & $code & "}") 中的$code就是汉字的ASCII码了。
因为一个汉字是占两个字节的，所以你想获取一个汉字的ASC码就必须要用两次ASC函数

[ 本帖最后由 夜苦寒 于 2008-6-13 15:40 编辑 ]

ollydbg 发表于 2008-6-14 21:19:10

原来如此，谢谢指点！

jeali 发表于 2011-9-20 17:50:17

怎么我还是取不到汉字的ASC码呢
页: [1]
查看完整版本: 如何用au3的asc函数得到汉字的asc码？高人进! [已解决]