【已解决】怎么把下图中的钩钩去掉?
本帖最后由 qinpeiyuan1001 于 2010-10-13 19:27 编辑什么对号啊?完全不知道在说什么 什么是小对号? _GUICtrlTreeView_FindItem
_GUICtrlTreeView_SetChecked 你好!我在 AUTOIT CN 看到了这篇帖子,认为很有价值,特推荐给你。
自动安装[视频教程]
地址 http://www.autoitx.com/forum.php?mod=viewthread&tid=2121&fromuid=7633057
希望你能喜欢。 回复 5# lpxx
谢谢 不过没那么过金币啊 郁闷中 回复 4# 风行者
我现在还混在最原始的阶段 能看懂 不会谢啊 不过还要多谢了 回复 1# qinpeiyuan1001
http://www.autoitx.com/forum.php?mod=viewthread&tid=17762&highlight= 给个例子,后面就不写了
#include <GuiTreeView.au3>
Run("Thunder5.9.28.1564.exe")
$hwnd = WinWaitActive("迅雷5 : 用户使用协议")
ControlClick($hwnd,"","Button2")
WinWaitActive($hwnd,"选择附加任务")
ControlSetText($hwnd,"","Edit1","D:\迅雷")
;systreeview32 控件操作
$hand = ControlGetHandle($hwnd,"","SysTreeView321")
$hitm = _GUICtrlTreeView_FindItem($hand,"迅雷5默认开机自动启动") ;查找标识
_GUICtrlTreeView_SetChecked($hand,$hitm,False) ;unchecked
给个例子,后面就不写了
风行者 发表于 2010-10-13 14:12 http://www.autoitx.com/images/common/back.gif
有效果!只是 "迅雷5默认开机自动启动" 需要手工输入,。。。 #include <array.au3>
Run('e:\Thunder5.8.12.689.exe')
WinWait('安装 - 迅雷5','欢迎使用 迅雷5 安装向导')
ControlClick('安装 - 迅雷5','欢迎使用 迅雷5 安装向导','TButton1')
WinWait('安装 - 迅雷5','继续安装前请阅读下列重要信息')
ControlClick('安装 - 迅雷5','继续安装前请阅读下列重要信息','TRadioButton1')
WinWait('安装 - 迅雷5','继续安装前请阅读下列重要信息')
ControlClick('安装 - 迅雷5','继续安装前请阅读下列重要信息','TButton2')
WinWait('安装 - 迅雷5','选择附加任务')
ControlClick('安装 - 迅雷5','选择附加任务','TCheckBox1')
ControlClick('安装 - 迅雷5','选择附加任务','TCheckBox2')
WinWait( "安装 - 迅雷5" )
If Not WinActivate ( "安装 - 迅雷5","" ) Then WinActivate ( "安装 - 迅雷5","" )
WinWaitActive ( "安装 - 迅雷5","" )
$WinPosArray = WinGetPos ( "安装 - 迅雷5" )
$WinPosArray = WinGetPos ( "安装 - 迅雷5" )
$TNewCheckListBoxArray = ControlGetPos ( "安装 - 迅雷5", "", "TPanel2" )
$Width = $WinPosArray + $TNewCheckListBoxArray
$Height =$WinPosArray + $TNewCheckListBoxArray
MouseClick ( "left", $Width + 17, $Height + 39 )
MouseClick ( "left", $Width + 17, $Height + 60 )
MouseClick ( "left", $Width + 17, $Height + 78 )
MouseClick ( "left", $Width + 17, $Height + 95 )
WinWait('安装 - 迅雷5','选择附加任务')
ControlClick('安装 - 迅雷5','选择附加任务','TButton2')
WinWait('安装 - 迅雷5','安装百度超级搜霸')
ControlClick('安装 - 迅雷5','安装百度超级搜霸','TCheckBox1')
WinWait('安装 - 迅雷5','安装百度超级搜霸')
ControlClick('安装 - 迅雷5','安装百度超级搜霸','TButton2')
WinWait('安装 - 迅雷5','您想将 迅雷5 安装在什么地方?')
ControlSetText('安装 - 迅雷5','您想将 迅雷5 安装在什么地方?','TEdit1','d:\Program Files\Thunder Network\Thunder')
WinWait('安装 - 迅雷5','您想将 迅雷5 安装在什么地方?')
ControlClick('安装 - 迅雷5','您想将 迅雷5 安装在什么地方?','TButton3')
;WinWait('文件夹存在','已经存在。您一定要安装到这个文件夹中吗?')
;ControlClick('文件夹存在','已经存在。您一定要安装到这个文件夹中吗?','Button1')
WinWait('安装 - 迅雷5','安装程序现在准备开始安装 迅雷5 到您的电脑中')
ControlClick('安装 - 迅雷5','安装程序现在准备开始安装 迅雷5 到您的电脑中','TButton3')
Sleep(8000)
WinWait('安装 - 迅雷5','单击“完成”退出安装程序。')
ControlClick('安装 - 迅雷5','单击“完成”退出安装程序。','TNewCheckListBox1')
ControlClick('安装 - 迅雷5','单击“完成”退出安装程序。','TButton3')
回复 11# liufenglg
O(∩_∩)O谢谢 我感觉我还是别好高骛远了 还是重头学起吧 O(∩_∩)O~ 回复 8# 131738
太感谢了很实用 VeryGood{:face (301):} 回复 11# liufenglg
谢谢诶 差不多明白了
请问这句Sleep(8000)有什么作用啊?
还有安装完成后如何自动退出脚本啊?
谢谢 好用的招,感谢各位楼主。
页:
[1]
2