包谷面 发表于 2011-4-24 12:02:57

｛求助｝软件自动安装

想要自己写个自动安装可是写到这里不知道怎么写插件的啦
run("I:\客户常用\C\ttpsetup.exe")
WinWaitActive("千千静听 5.7正式版 安装程序 Unicode","访问官方主页")
ControlClick("千千静听 5.7正式版 安装程序 Unicode","","Button2")
WinWaitActive("千千静听 5.7正式版 安装程序 Unicode","访问官方主页")
ControlClick("千千静听 5.7正式版 安装程序 Unicode","","Button2")
WinWaitActive("千千静听 5.7正式版 安装程序 Unicode","访问官方主页")
ControlClick("千千静听 5.7正式版 安装程序 Unicode","","Button2")
WinWaitActive("千千静听 5.7正式版 安装程序 Unicode","指定安装本软件的目标文件夹:")
ControlClick("千千静听 5.7正式版 安装程序 Unicode","","Button4")
      要我选择   不知道怎么写啊
      大大帮帮忙

zhangchongzhi 发表于 2011-4-25 11:58:30

你看看，相互学习。{:face (207):}#requireadmin

$title="千千静听 5.7正式版 安装程序 Unicode"

Run("ttpsetup.exe")
;欢迎
WinWait($title,"欢迎使用 千千静听 5.7正式版 安装程序")
Send("!s")
;请仔细阅读以下的"软件使用协议":
WinWait($title,"请仔细阅读以下的")
Send("!a")
;选择要安装的组件:
WinWait($title,"选择要安装的组件:")
Send("!n")
;指定安装本软件的目标文件夹:
WinWait($title,"指定安装本软件的目标文件夹:")
ControlSetText($title,"指定安装本软件的目标文件夹:","Edit1","C:\Program Files\TTPlayer")
Send("!n")
;创建快捷方式
WinWait($title,"创建快捷方式")
ControlCommand($title,"免费安装“百度工具栏”，轻松搜索，拦截广告！","Button7","UnCheck")
Send("!n")
;完成 千千静听 5.7正式版 安装向导
WinWait($title,"完成 千千静听 5.7正式版 安装向导")
ControlCommand($title,"立即运行 千千静听 5.7正式版","Button1","UnCheck")
ControlClick($title,"完成","Button17","left",1)

包谷面 发表于 2011-4-25 13:55:51

回复 2# zhangchongzhi


    收下了    谢谢{:face (356):}

xxt_ck 发表于 2013-4-9 21:27:01

偶也想学习写这种东西，刚起步，支持下！

北流书生 发表于 2013-4-10 14:33:13

你看看，相互学习。
zhangchongzhi 发表于 2011-4-25 11:58 http://www.autoitx.com/images/common/back.gif


    眼花了....{:face (113):}

勇者不坏 发表于 2013-6-14 10:02:22

其实就是那么回事 自己认真写完一个后 其他都差不多 自动安装的

flyself 发表于 2015-8-11 00:07:06

学习学习，研究一下软件自动安装
页: [1]
查看完整版本: ｛求助｝软件自动安装