请问两个问题，出现乱符，自动删除。（已经解决）

baosheng00

在编辑自动安装软件的时候出现这样的情况，软件填写注册信息的时候，自动填写中文且出现乱符，难道是不支持中文显示吗？或者需要添加什么？

还有一个在自动安装nero的时候，也要输入注册信息，但填写注册信息的文框中有几个字母Demo，该怎么编辑自动删除后填写注册信息。

autoit3CN

第一个问题
#Include <ACN_String.au3>
SendX('汉字')
第二个问题
ControlSend ( "窗口标题", "窗口文本", 控件ID, "字符串" [, 标志] )

yoyohot

楼上正解！

nmgwddj

楼主也玩植物大战僵尸我通关了

baosheng00

回复 2# autoit3CN

这一句是什么意思#Include <ACN_String.au3>
ACN_String.au3是指当前文件名的AU3文件吗？

131738

回复 5# baosheng00

脚本的包含文件，大概叫做脚本的解释程序吧。。。。

baosheng00

回复 2# autoit3CN
我的代码

run("ULtralSO.exe")
WinWait("安装程序 - UltraISO","欢迎安装 UltraISO")
ControlClick("安装程序 - UltraISO","欢迎安装 UltraISO","TNewButton1")
WinWait("安装程序 - UltraISO","在继续前，请阅读以下重要信息：")
ControlClick("安装程序 - UltraISO","在继续前，请阅读以下重要信息：","TNewRadioButton1")
ControlClick("安装程序 - UltraISO","在继续前，请阅读以下重要信息：","TNewButton2")
WinWait("安装程序 - UltraISO","选择安装文件夹")
ControlClick("安装程序 - UltraISO","选择安装文件夹","TNewButton3")
WinWait("安装程序 - UltraISO","选择 开始 目录")
ControlClick("安装程序 - UltraISO","选择 开始 目录","TNewButton4")
WinWait("安装程序 - UltraISO","选择额外任务")
ControlClick("安装程序 - UltraISO","选择额外任务","TNewButton4")
WinWait("安装程序 - UltraISO","准备安装")
ControlClick("安装程序 - UltraISO","准备安装","TNewButton4")
WinWait("安装程序 - UltraISO","完成 UltraISO 安装向导")
ControlClick("安装程序 - UltraISO","完成 UltraISO 安装向导","TNewButton4")
WinWait("欢迎","订购UltraISO - 只需30元！")
ControlClick("欢迎","订购UltraISO - 只需30元！","TButton4")
WinWait("注册","取 消")
ControlClick("注册","取 消","TEdit1")
#Include <ACN_String.au3>
SendX('李明')
Send("509F-BA54-BBA6-73C5")
ControlClick("注册","取 消","TButton")
WinWait("提示","注册码已经录入,请重新运行程序!")
ControlClick("提示","注册码已经录入,请重新运行程序!","Button1")

来到
#Include <ACN_String.au3>
SendX('李明')
却不自动填写，为什么？下面是图片

haorui658

回复 7# baosheng00


    为什么不用controlsend

chnxitem

回复  autoit3CN

这一句是什么意思#Include
ACN_String.au3是指当前文件名的AU3文件吗？
baosheng00 发表于 2010-3-21 12:48

    关键字参考
#include
--------------------------------------------------------------------------------

包含一个文件到脚本中.


#include "[路径\]文件名"
#include <文件名>

chnxitem

直接在你代码后面加上

Func SendX($Str)
    For $i = 1 To StringLen($Str)
        Send('{ASC ' & StringToBinary(StringMid($Str, $i, 1) & ' ') & '}')
    Next
EndFunc   ;==>SendX