f&n安装脚本生产器0.048发布在一楼,0.049界面与功能预览,内测中。。。
本帖最后由 23070205 于 2012-6-10 17:09 编辑afan超版的窗口探测0.3真是伟大的作品!在发布期间,正值我也要写一些安装脚本。好好理解了afan脚本的程序后,配合写了一个小程序,做了一个配套录像。感觉真是不错。提供上来大家拍砖吧!
那个路径问题,现在还没有解决,不是没有太多的时间吗?!留下以后再说吧。呵呵。
当然配合autoit打包文件中的Au3Info,也是可以的,只是没有afan超版的用的顺手和简便了。
提醒:要用到窗口探测0.3的界面坐标,就是鼠标要点击下窗口坐标后,变成界面坐标。
大家认真看录像即可,发现我是怎么做的。
afan超版的窗口探测0.3已经打包进我的这个程序。在此,对afan超版,表示感谢!
小程序和录像上传网盘中。到底好用否,有待大家的检测!
上传一个打包的程序和录像上来,不过好像论坛是要收费的吧。呵呵
内附4个文件,一个是安装脚本生产器,一个qqflash程序和生成的脚本,一个是录像文件。
网盘免费下载
http://cid-073201fe454c8e34.office.live.com/self.aspx/%e5%8e%9f%e5%88%9b/%e8%87%aa%e5%8a%a8%e5%ae%89%e8%a3%85.rar
微软网盘下载0.047最新版md5 CDB6B5F52314A8186945D0213950C6B7
0.047内测版,加入了判断,避免因二次编译重复写代码的问题。
继续完善,下一步,计划和afan超版的程序更加配套。可以支持控件id+控件坐标。更加强大!呵呵
https://skydrive.live.com/?cid=073201fe454c8e34&sc=documents&id=73201FE454C8E34%21154
**** Hidden Message *****
版本介绍
0.01版,就是现在上传的这个版本。不能自行选择安装路径
0.02版,内测版本,未发布。支持选择安装路径。
0.03版,内测版本,未发布。增加了控件的坐标输入框到6个,支持mouseclick与controlclick双重写脚本。已发布录像。程序没有对外发布。带autoit自带的编译功能。加入tooltip和f11热键终止功能。
0.04版,内测版本,未发布。改变autoit自带的编译功能为命令行编译,同时自动提取说制作程序的ico为自动安装脚本的ico。同时支持编写后自动运行当前页的安装。便于查找问题。
0.041版,内测版本,未发布。改善提取ico的处理。
0.042版,内测版本,未发布。增加了对ie的处理。加入了几行代码,默认屏蔽。
0.043版,完善版本,准备发布。写了帮助文件,测试通过。
下面是最新的0.043版本的help和界面预览。做最后的测试后,这个版本对外发布。
0.044内测版,未对外发布。加入撤销代码到上一界面,更新为窗口探测0.52.完善关闭ie的代码。总标题可以二次输入。
0.045内测版,未对外发布。加入send热键功能。实现3版合一。
0.046内测版。加入了总标题、子标题的清除。在对付有些不能获取总标题的,则可以保持空白。总标题自动填写为,此项在首页不能使用。支持编译后2次打开程序。程序支持exe和msi。编译后5秒钟,删除本次垃圾文件。只保留au3文件。
0.047内测版,加入了判断,避免因二次编译重复写代码的问题。
0.047内测版,加入了判断,避免因二次编译重复写代码的问题。
0.048完善版,支持无子标题程序,比如傲游2或傲游3等。
f&n安装脚本生产器三版合一0.049 内测版本 暂未发布
2010-10-16 06:50
1.界面加入运行au3.方便没有安装autoit的,可以运行au3文件,用于测试。
2.原来是程序名加au3,现在原名前加install。格式为install_程序.au3
3.原来的自动脚本为install_程序.exe改变为install_auto_程序.exe
以上的2.3点,主要为了防止在手动编译时,自动编译为同名au3的exe会覆盖源程序。
最新版0.048及帮助文件下载
afan超版窗口探测已更新到0.5.请朋友们到下面链接下载吧。支持afan超版带来的好作品。下载后请放到F&n安装脚本生产器的同一目录即可使用最新的窗口探测0.5.
更新提示:
[增加] 在“控件类”栏目上点击右键将复制首个有效的控件文本(如果有)行到剪贴板;
afan超版专门为本程序定制的这样功能,请大家速更新。哈哈!
http://www.autoitx.com/forum.php?mod=viewthread&tid=17882&extra=&page=9
http://www.autoitx.com/attachment.php?aid=MTA4NzV8YjgzMTY5ZDR8MTI4MzE4MzMyOHxiMTZhVkg3WkdhUjF0L3JjZHRTMXAxVkhOVFZVTFMxMENyQUJFNlc0ellXbVlWWQ%3D%3D&noupdate=yes 回复 1# 23070205
没有源,下载失败。。。。 回复 1# 23070205
还行。。。。继续努力!!!!!!!!!!! 回复 3# 131738
谢谢鼓励。回头有空再完善路径等问题。 呵呵,不错~ 很清晰的操作~ 最新版0.03已经上图,更新如下 1.支持路径的处理。2.带au3自动打包程序。3.支持msi程序和exe程序的启动。4.细节处理。5.退出清理垃圾文件。6.增加了F11强制终止脚本。7.加入tooltip提示
贴一个生成的qq2010 sp1的脚本,程序接着内测。
#requireadmin
Opt("MouseCoordMode", 2)
;这个自动安装脚本由f&n安装脚本生产器生成。
HotKeySet("{f11}", "stop")
Run (@ScriptDir& "\QQ2010SP1.exe")
ToolTip("正在为你进行QQ2010SP1 安装,请不要移动鼠标和键盘!"&@CR&"F11可以终止安装脚本!", @DesktopWidth - 360, @DesktopHeight - 120)
WinWait ( "腾讯QQ2010 安装向导","欢迎使用腾讯QQ2010" )
WinActivate( "腾讯QQ2010 安装向导","欢迎使用腾讯QQ2010" )
MouseClick ( "left",198, 313, 1 )
MouseClick ( "left",442, 372, 1 )
WinWait ( "腾讯QQ2010 安装向导","请选择自定义安装选项与快捷方式选项" )
WinActivate( "腾讯QQ2010 安装向导","请选择自定义安装选项与快捷方式选项" )
MouseClick ( "left",101, 147, 1 )
MouseClick ( "left",107, 168, 1 )
MouseClick ( "left",117, 192, 1 )
MouseClick ( "left",125, 286, 1 )
MouseClick ( "left",433, 374, 1 )
WinWait ( "腾讯QQ2010 安装向导","请选择安装路径" )
WinActivate( "腾讯QQ2010 安装向导","请选择安装路径" )
ControlSetText("腾讯QQ2010 安装向导","请选择安装路径","Edit1","C:\Tencent\QQ")
MouseClick ( "left",446, 372, 1 )
WinWait ( "腾讯QQ2010 安装向导","安装完成" )
WinActivate( "腾讯QQ2010 安装向导","安装完成" )
MouseClick ( "left",224, 96, 1 )
MouseClick ( "left",207, 117, 1 )
MouseClick ( "left",222, 136, 1 )
MouseClick ( "left",226, 160, 1 )
MouseClick ( "left",516, 372, 1 )
ToolTip("QQ2010SP1安装完毕!",@DesktopWidth - 360, @DesktopHeight - 120)
Func stop()
Exit
EndFunc
新版脚本演示真在上传中,给大家两个对比的脚本。mouseclick vs controlclick。
#requireadmin
Opt("MouseCoordMode", 2)
;这个自动安装脚本由f&n安装脚本生产器生成。
HotKeySet("{f11}", "stop")
Run (@ScriptDir& "\PPTV网络电视_V2.5.5.0019.exe")
ToolTip("正在为你进行PPTV网络电视_V2.5.5.0019 安装,请不要移动鼠标和键盘!"&@CR&"F11可以终止安装脚本!", @DesktopWidth - 360, @DesktopHeight - 120)
WinWait ( "PPTV网络电视 V2.5.5.0019 安装","下一步(&N) >" )
WinActivate( "PPTV网络电视 V2.5.5.0019 安装","下一步(&N) >" )
ControlClick( "PPTV网络电视 V2.5.5.0019 安装","下一步(&N) >","TNewButton1")
WinWait ( "PPTV网络电视 V2.5.5.0019 安装","请仔细阅读下列许可协议。您在继续安装前必须同意这些协议条款。" )
WinActivate( "PPTV网络电视 V2.5.5.0019 安装","请仔细阅读下列许可协议。您在继续安装前必须同意这些协议条款。" )
ControlClick( "PPTV网络电视 V2.5.5.0019 安装","请仔细阅读下列许可协议。您在继续安装前必须同意这些协议条款。","TNewButton2")
WinWait ( "PPTV网络电视 V2.5.5.0019 安装","单击“下一步”继续。如果您想选择其它文件夹,单击“浏览”。" )
WinActivate( "PPTV网络电视 V2.5.5.0019 安装","单击“下一步”继续。如果您想选择其它文件夹,单击“浏览”。" )
ControlSetText("PPTV网络电视 V2.5.5.0019 安装","单击“下一步”继续。如果您想选择其它文件夹,单击“浏览”。","TEdit1","C:\PPLive\PPTV")
ControlClick( "PPTV网络电视 V2.5.5.0019 安装","单击“下一步”继续。如果您想选择其它文件夹,单击“浏览”。","TNewButton3")
WinWait ( "PPTV网络电视 V2.5.5.0019 安装","安装程序现在将在下列开始菜单文件夹中创建程序的快捷方式。" )
WinActivate( "PPTV网络电视 V2.5.5.0019 安装","安装程序现在将在下列开始菜单文件夹中创建程序的快捷方式。" )
ControlClick( "PPTV网络电视 V2.5.5.0019 安装","安装程序现在将在下列开始菜单文件夹中创建程序的快捷方式。","TNewButton4")
WinWait ( "PPTV网络电视 V2.5.5.0019 安装","选择您想要安装程序在安装 PPTV网络电视 V2.5.5.0019 时执行的附加任务,然后单击“下一步”。" )
WinActivate( "PPTV网络电视 V2.5.5.0019 安装","选择您想要安装程序在安装 PPTV网络电视 V2.5.5.0019 时执行的附加任务,然后单击“下一步”。" )
MouseClick ( "left",51, 170, 1 )
ControlClick( "PPTV网络电视 V2.5.5.0019 安装","选择您想要安装程序在安装 PPTV网络电视 V2.5.5.0019 时执行的附加任务,然后单击“下一步”。","TNewButton4")
WinWait ( "PPTV网络电视 V2.5.5.0019 安装","单击“安装”继续此安装程序。如果您想要回滚或改变设置,请单击“上一步”。" )
WinActivate( "PPTV网络电视 V2.5.5.0019 安装","单击“安装”继续此安装程序。如果您想要回滚或改变设置,请单击“上一步”。" )
ControlClick( "PPTV网络电视 V2.5.5.0019 安装","单击“安装”继续此安装程序。如果您想要回滚或改变设置,请单击“上一步”。","TNewButton4")
WinWait ( "PPTV网络电视 V2.5.5.0019 安装","PPTV网络电视 已经安装到你的计算机。" )
WinActivate( "PPTV网络电视 V2.5.5.0019 安装","PPTV网络电视 已经安装到你的计算机。" )
MouseClick ( "left",188, 107, 1 )
;MouseClick ( "left",244, 118, 1 );就是这个鼠标位置的问题。这样就应该没有问题了,这里就不宰演示了。呵呵,演示到此结束
ControlClick( "PPTV网络电视 V2.5.5.0019 安装","PPTV网络电视 已经安装到你的计算机。","TNewButton4")
;下面演示这个controlclick版的安装。很简洁了。呵呵,由于最后的鼠标的界面坐标不够准确,就造成了脚本有些漏洞了。只是演示,大家可以点击最后的那个页面再进行修改即可。
ToolTip("PPTV网络电视_V2.5.5.0019安装完毕!",@DesktopWidth - 360, @DesktopHeight - 120)
Func stop()
Exit
EndFunc
下为mousec版本
#requireadmin
Opt("MouseCoordMode", 2)
;这个自动安装脚本由f&n安装脚本生产器生成。
HotKeySet("{f11}", "stop")
Run (@ScriptDir& "\PPTV网络电视_V2.5.5.0019.exe")
ToolTip("正在为你进行PPTV网络电视_V2.5.5.0019 安装,请不要移动鼠标和键盘!"&@CR&"F11可以终止安装脚本!", @DesktopWidth - 360, @DesktopHeight - 120)
WinWait ( "PPTV网络电视 V2.5.5.0019 安装","关于(&A)" )
WinActivate( "PPTV网络电视 V2.5.5.0019 安装","关于(&A)" )
MouseClick ( "left",336, 313, 1 )
WinWait ( "PPTV网络电视 V2.5.5.0019 安装","请仔细阅读下列许可协议。您在继续安装前必须同意这些协议条款。" )
WinActivate( "PPTV网络电视 V2.5.5.0019 安装","请仔细阅读下列许可协议。您在继续安装前必须同意这些协议条款。" )
MouseClick ( "left",341, 310, 1 )
WinWait ( "PPTV网络电视 V2.5.5.0019 安装","安装程序将安装 PPTV网络电视 V2.5.5.0019 到下列文件夹中。" )
WinActivate( "PPTV网络电视 V2.5.5.0019 安装","安装程序将安装 PPTV网络电视 V2.5.5.0019 到下列文件夹中。" )
ControlSetText("PPTV网络电视 V2.5.5.0019 安装","安装程序将安装 PPTV网络电视 V2.5.5.0019 到下列文件夹中。","TEdit1","C:\PPLive\PPTV")
MouseClick ( "left",341, 312, 1 )
WinWait ( "PPTV网络电视 V2.5.5.0019 安装","安装程序现在将在下列开始菜单文件夹中创建程序的快捷方式。" )
WinActivate( "PPTV网络电视 V2.5.5.0019 安装","安装程序现在将在下列开始菜单文件夹中创建程序的快捷方式。" )
MouseClick ( "left",347, 313, 1 )
WinWait ( "PPTV网络电视 V2.5.5.0019 安装","选择您想要安装程序在安装 PPTV网络电视 V2.5.5.0019 时执行的附加任务,然后单击“下一步”。" )
WinActivate( "PPTV网络电视 V2.5.5.0019 安装","选择您想要安装程序在安装 PPTV网络电视 V2.5.5.0019 时执行的附加任务,然后单击“下一步”。" )
MouseClick ( "left",52, 172, 1 )
MouseClick ( "left",338, 312, 1 )
WinWait ( "PPTV网络电视 V2.5.5.0019 安装","单击“安装”继续此安装程序。如果您想要回滚或改变设置,请单击“上一步”。" )
WinActivate( "PPTV网络电视 V2.5.5.0019 安装","单击“安装”继续此安装程序。如果您想要回滚或改变设置,请单击“上一步”。" )
MouseClick ( "left",347, 314, 1 )
WinWait ( "PPTV网络电视 V2.5.5.0019 安装","PPTV网络电视 已经安装到你的计算机。" )
WinActivate( "PPTV网络电视 V2.5.5.0019 安装","PPTV网络电视 已经安装到你的计算机。" )
MouseClick ( "left",188, 107, 1 )
MouseClick ( "left",337, 313, 1 )
;下面演示安装过程,hoho
ToolTip("PPTV网络电视_V2.5.5.0019安装完毕!",@DesktopWidth - 360, @DesktopHeight - 120)
Func stop()
Exit
EndFunc
作用都是相当的,只是controlclick比较简洁,无鼠标的拖地,及坐标的显示了。
在内测下,等待今晚afan超版的窗口探测0.4发布后,发布这个版本。 本帖最后由 23070205 于 2010-9-1 14:06 编辑
演示教程,包括:pptv程序,演示录像,及上面的两个版本的脚本,便于大家了解程序。
http://www.ctdisk.com/file/377346
http://cid-073201fe454c8e34.office.live.com/self.aspx/%e5%8e%9f%e5%88%9b/%e8%87%aa%e5%8a%a8%e5%ae%89%e8%a3%85pptv%ef%bc%8c%e5%86%85%e5%90%ab%e7%a8%8b%e5%ba%8f%ef%bc%8c%e6%95%99%e7%a8%8b%e5%8f%8a%e5%8f%8c%e7%89%88%e8%84%9a%e6%9c%ac.rar 看了全程,很不错哦,继续加油~ 回复 7# 23070205
mouseclick vs controlclick
到底哪个好?哪一个受到用户干扰而不影响脚本运行? 回复23070205
mouseclick vs controlclick
到底哪个好?哪一个受到用户干扰而不影响脚本运行?
xlcwxl 发表于 2010-9-5 15:48 http://www.autoitx.com/images/common/back.gif
在安装脚本时,不动鼠标和键盘,都可以做到不影响自动脚本的运行。相比较来说,controlclick很类似send热键这个操作。不带鼠标的规迹。而mouseclick则会带规迹。 本帖最后由 23070205 于 2010-9-5 23:06 编辑
文件名:f&n安装脚本生产器双版合一0.043.rar
**** Hidden Message *****
文件名:kugou2010视频录像.rar
**** Hidden Message *****
f&n安装脚本生产器双版合一0.043.rar
**** Hidden Message *****
kugou2010视频录像
**** Hidden Message ***** 再来水水一下。怎么发布这个上面的一帖,就变成了高级会员了,高兴啊,acn论坛真的很好,我喜欢,能学到很多东东。 本帖最后由 23070205 于 2010-9-6 11:28 编辑
已测试的程序自动安装源码发布
#requireadmin
Opt("MouseCoordMode", 2)
;本自动安装脚本由 f&n安装脚本生产器 配合 autoit官方中文站 afan超版的 Au3.WProbe 窗口信息探测器 生成。
HotKeySet("{f11}", "stop")
Run (@ScriptDir& "\kugou_1182.exe")
ToolTip("正在为你进行kugou_1182 安装,请不要移动鼠标和键盘!"&@CR&"F11可以终止安装脚本!", @DesktopWidth - 460, @DesktopHeight - 120)
WinWait ( "安装 - 酷狗音乐","欢迎使用 酷狗音乐 安装向导" )
WinActivate( "安装 - 酷狗音乐","欢迎使用 酷狗音乐 安装向导" )
ControlClick( "安装 - 酷狗音乐","欢迎使用 酷狗音乐 安装向导","TNewButton2")
WinWait ( "安装 - 酷狗音乐","许可协议" )
WinActivate( "安装 - 酷狗音乐","许可协议" )
ControlClick( "安装 - 酷狗音乐","许可协议","TNewButton2")
WinWait ( "安装 - 酷狗音乐","选择目标位置" )
WinActivate( "安装 - 酷狗音乐","选择目标位置" )
ControlSetText("安装 - 酷狗音乐","选择目标位置","TEdit1","C:\KuGou2010")
ControlClick( "安装 - 酷狗音乐","选择目标位置","TNewButton3")
WinWait ( "安装 - 酷狗音乐","准备安装" )
WinActivate( "安装 - 酷狗音乐","准备安装" )
ControlClick( "安装 - 酷狗音乐","准备安装","TNewButton3")
WinWait ( "安装 - 酷狗音乐","酷狗音乐 安装完毕" )
WinActivate( "安装 - 酷狗音乐","酷狗音乐 安装完毕" )
MouseClick ( "left",218, 288, 1 )
MouseClick ( "left",219, 309, 1 )
MouseClick ( "left",219, 330, 1 )
ControlClick( "安装 - 酷狗音乐","酷狗音乐 安装完毕","TNewButton3")
; If ProcessExists("iexplore.exe") Then;只是为了有些脚本会打开ie,而加入了下面3行。如需要可以取消前面的分号。以便代码能收效。
; ProcessClose("iexplore.exe")
;EndIf
ToolTip("kugou_1182安装完毕!",@DesktopWidth - 360, @DesktopHeight - 120)
Func stop()
Exit
EndFunc
#requireadmin
Opt("MouseCoordMode", 2)
;本自动安装脚本由 f&n安装脚本生产器 配合 autoit官方中文站 afan超版的 Au3.WProbe 窗口信息探测器 生成。
HotKeySet("{f11}", "stop")
Run (@ScriptDir& "\KuGou2010.exe")
ToolTip("正在为你进行KuGou2010 安装,请不要移动鼠标和键盘!"&@CR&"F11可以终止安装脚本!", @DesktopWidth - 460, @DesktopHeight - 120)
WinWait ( "安装 - 酷狗音乐","欢迎使用 酷狗音乐 安装向导" )
WinActivate( "安装 - 酷狗音乐","欢迎使用 酷狗音乐 安装向导" )
ControlClick( "安装 - 酷狗音乐","欢迎使用 酷狗音乐 安装向导","TNewButton2")
WinWait ( "安装 - 酷狗音乐","许可协议" )
WinActivate( "安装 - 酷狗音乐","许可协议" )
ControlClick( "安装 - 酷狗音乐","许可协议","TNewButton2")
WinWait ( "安装 - 酷狗音乐","酷狗音乐 要安装到哪里?" )
WinActivate( "安装 - 酷狗音乐","酷狗音乐 要安装到哪里?" )
ControlSetText("安装 - 酷狗音乐","酷狗音乐 要安装到哪里?","TEdit1","C:\KuGou2010\")
ControlClick( "安装 - 酷狗音乐","酷狗音乐 要安装到哪里?","TNewButton3")
WinWait ( "安装 - 酷狗音乐","准备安装" )
WinActivate( "安装 - 酷狗音乐","准备安装" )
ControlClick( "安装 - 酷狗音乐","准备安装","TNewButton3")
WinWait ( "安装 - 酷狗音乐","酷狗音乐推荐安装软件" )
WinActivate( "安装 - 酷狗音乐","酷狗音乐推荐安装软件" )
MouseClick ( "left",60, 114, 1 )
ControlClick( "安装 - 酷狗音乐","酷狗音乐推荐安装软件","TNewButton3")
WinWait ( "安装 - 酷狗音乐","酷狗音乐 安装完毕" )
WinActivate( "安装 - 酷狗音乐","酷狗音乐 安装完毕" )
MouseClick ( "left",216, 286, 1 )
MouseClick ( "left",218, 310, 1 )
MouseClick ( "left",219, 332, 1 )
ControlClick( "安装 - 酷狗音乐","酷狗音乐 安装完毕","TNewButton3")
; If ProcessExists("iexplore.exe") Then;只是为了有些脚本会打开ie,而加入了下面3行。如需要可以取消前面的分号。以便代码能收效。
; ProcessClose("iexplore.exe")
;EndIf
ToolTip("KuGou2010安装完毕!",@DesktopWidth - 360, @DesktopHeight - 120)
Func stop()
Exit
EndFunc
#requireadmin
Opt("MouseCoordMode", 2)
;本自动安装脚本由 f&n安装脚本生产器 配合 autoit官方中文站 afan超版的 Au3.WProbe 窗口信息探测器 生成。
HotKeySet("{f11}", "stop")
Run (@ScriptDir& "\ppstream_2.7.0.1118.exe")
ToolTip("正在为你进行ppstream_2.7.0.1118 安装,请不要移动鼠标和键盘!"&@CR&"F11可以终止安装脚本!", @DesktopWidth - 460, @DesktopHeight - 120)
WinWait ( "PPS影音 V2.7.0.1118 正式版","PPS影音 安装向导" )
WinActivate( "PPS影音 V2.7.0.1118 正式版","PPS影音 安装向导" )
ControlClick( "PPS影音 V2.7.0.1118 正式版","PPS影音 安装向导","Button2")
WinWait ( "PPS影音 V2.7.0.1118 正式版","下一步(&N) >" )
WinActivate( "PPS影音 V2.7.0.1118 正式版","下一步(&N) >" )
ControlSetText("PPS影音 V2.7.0.1118 正式版","下一步(&N) >","Edit1","C:\PPStream")
MouseClick ( "left",53, 162, 1 )
MouseClick ( "left",52, 188, 1 )
MouseClick ( "left",53, 223, 1 )
ControlClick( "PPS影音 V2.7.0.1118 正式版","下一步(&N) >","Button2")
WinWait ( "安装 Google 工具栏","Google搜索覆盖过百亿网页,整合搜索准确全面。" )
WinActivate( "安装 Google 工具栏","Google搜索覆盖过百亿网页,整合搜索准确全面。" )
MouseClick ( "left",39, 239, 1 )
ControlClick( "安装 Google 工具栏","Google搜索覆盖过百亿网页,整合搜索准确全面。","Button2")
WinWait ( "PPS影音 V2.7.0.1118 正式版","PPS影音 完成安装" )
WinActivate( "PPS影音 V2.7.0.1118 正式版","PPS影音 完成安装" )
MouseClick ( "left",186, 155, 1 )
ControlClick( "PPS影音 V2.7.0.1118 正式版","PPS影音 完成安装","Button2")
Sleep(1000)
If ProcessExists("iexplore.exe") Then;只是为了有些脚本会打开ie,而加入了下面3行。如需要可以取消前面的分号。以便代码能收效。
ProcessClose("iexplore.exe")
EndIf
ToolTip("ppstream_2.7.0.1118安装完毕!",@DesktopWidth - 360, @DesktopHeight - 120)
Func stop()
Exit
EndFunc
;Sleep(1000)
;If ProcessExists("iexplore.exe") Then;只是为了有些脚本会打开ie,而加入了下面3行。如需要可以取消前面的分号。以便代码能收效。
;ProcessClose("iexplore.exe")
;EndIf
ToolTip("ppstream_2.7.0.1118安装完毕!",@DesktopWidth - 360, @DesktopHeight - 120)
Func stop()
Exit
EndFunc
#requireadmin
Opt("MouseCoordMode", 2)
;本自动安装脚本由 f&n安装脚本生产器 配合 autoit官方中文站 afan超版的 Au3.WProbe 窗口信息探测器 生成。
HotKeySet("{f11}", "stop")
Run (@ScriptDir& "\PPTV网络电视_2.5.5.19.exe")
ToolTip("正在为你进行PPTV网络电视_2.5.5.19 安装,请不要移动鼠标和键盘!"&@CR&"F11可以终止安装脚本!", @DesktopWidth - 460, @DesktopHeight - 120)
WinWait ( "PPTV网络电视 V2.5.5.0019 安装","PPTV网络电视是PPLive旗下全球最大的网络电视平台。" )
WinActivate( "PPTV网络电视 V2.5.5.0019 安装","PPTV网络电视是PPLive旗下全球最大的网络电视平台。" )
ControlClick( "PPTV网络电视 V2.5.5.0019 安装","PPTV网络电视是PPLive旗下全球最大的网络电视平台。","Button2")
WinWait ( "PPTV网络电视 V2.5.5.0019 安装","按 阅读“用户协议”的其余部分。" )
WinActivate( "PPTV网络电视 V2.5.5.0019 安装","按 阅读“用户协议”的其余部分。" )
ControlClick( "PPTV网络电视 V2.5.5.0019 安装","按 阅读“用户协议”的其余部分。","Button2")
WinWait ( "PPTV网络电视 V2.5.5.0019 安装","“安装向导”将安装 PPTV网络电视 2.5.5 在下列文件夹。" )
WinActivate( "PPTV网络电视 V2.5.5.0019 安装","“安装向导”将安装 PPTV网络电视 2.5.5 在下列文件夹。" )
ControlSetText("PPTV网络电视 V2.5.5.0019 安装","“安装向导”将安装 PPTV网络电视 2.5.5 在下列文件夹。","Edit1","C:\PPLive\PPTV")
ControlClick( "PPTV网络电视 V2.5.5.0019 安装","“安装向导”将安装 PPTV网络电视 2.5.5 在下列文件夹。","Button2")
WinWait ( "PPTV网络电视 V2.5.5.0019 安装","PPTV网络电视将与您的本地媒体文件建立关联,以便您用PPTV客户端打开本地文件" )
WinActivate( "PPTV网络电视 V2.5.5.0019 安装","PPTV网络电视将与您的本地媒体文件建立关联,以便您用PPTV客户端打开本地文件" )
ControlClick( "PPTV网络电视 V2.5.5.0019 安装","PPTV网络电视将与您的本地媒体文件建立关联,以便您用PPTV客户端打开本地文件","Button4")
ControlClick( "PPTV网络电视 V2.5.5.0019 安装","PPTV网络电视将与您的本地媒体文件建立关联,以便您用PPTV客户端打开本地文件","Button2")
WinWait ( "PPTV网络电视 V2.5.5.0019 安装","PPTV网络电视 已成功安装到你的计算机。" )
WinActivate( "PPTV网络电视 V2.5.5.0019 安装","PPTV网络电视 已成功安装到你的计算机。" )
ControlClick( "PPTV网络电视 V2.5.5.0019 安装","PPTV网络电视 已成功安装到你的计算机。","Button4")
ControlClick( "PPTV网络电视 V2.5.5.0019 安装","PPTV网络电视 已成功安装到你的计算机。","Button5")
ControlClick( "PPTV网络电视 V2.5.5.0019 安装","PPTV网络电视 已成功安装到你的计算机。","Button2")
Sleep(500)
If ProcessExists("iexplore.exe") Then;只是为了有些脚本会打开ie,而加入了下面3行。如需要可以取消前面的分号。以便代码能收效。
ProcessClose("iexplore.exe")
EndIf
ToolTip("PPTV网络电视_2.5.5.19安装完毕!",@DesktopWidth - 360, @DesktopHeight - 120)
Func stop()
Exit
EndFunc
没有源,下载失败。。。。