请问谁知道在Autoit里怎么发送汉字

我用send发送后是乱码。

用这个

Func SendUnicode($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
WinWaitActive("无标题 - 记事本")
Send("{ASC " & $code & "}")
Next
EndFunc

可以发送，但发送的字不对。

你好 楼主。

很幸运的看到你的问题。
但是又很遗憾到现在还没有人回答你的问题。也可能你现在已经在别的地方找到了答案，那就得恭喜你啦。
可能是你问的问题有些专业了，没人会。或者别人没有遇到或者接触过你的问题，所以帮不了你。建议你去问题的相关论坛去求助，那里的人通常比较多，也比较热心，可能能快点帮你解决问题。
希望我的回答也能够帮到你！
祝你好运。