f&n安装脚本生产器0.048发布在一楼，0.049界面与功能预览，内测中。。。

23070205

afan超版的窗口探测0.3真是伟大的作品！在发布期间，正值我也要写一些安装脚本。好好理解了afan脚本的程序后，配合写了一个小程序，做了一个配套录像。感觉真是不错。提供上来大家拍砖吧！
那个路径问题，现在还没有解决，不是没有太多的时间吗？！留下以后再说吧。呵呵。

当然配合autoit打包文件中的Au3Info，也是可以的，只是没有afan超版的用的顺手和简便了。
提醒：要用到窗口探测0.3的界面坐标，就是鼠标要点击下窗口坐标后，变成界面坐标。
大家认真看录像即可，发现我是怎么做的。

afan超版的窗口探测0.3已经打包进我的这个程序。在此，对afan超版，表示感谢！

小程序和录像上传网盘中。到底好用否，有待大家的检测！
上传一个打包的程序和录像上来，不过好像论坛是要收费的吧。呵呵
内附4个文件，一个是安装脚本生产器，一个qqflash程序和生成的脚本，一个是录像文件。



网盘免费下载
http://cid-073201fe454c8e34.offi ... %ae%89%e8%a3%85.rar


微软网盘下载0.047最新版  md5 CDB6B5F52314A8186945D0213950C6B7



0.047内测版，加入了判断，避免因二次编译重复写代码的问题。
继续完善，下一步，计划和afan超版的程序更加配套。可以支持控件id+控件坐标。更加强大！呵呵


[url]https://skydrive.live.com/?cid=073201fe454c8e34&sc=documents&id=73201FE454C8E34%21154[/url]

游客，如果您要查看本帖隐藏内容请回复

版本介绍
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内测版。加入了总标题、子标题的清除。在对付有些不能获取总标题的，则可以保持空白。总标题自动填写为[active]，此项在首页不能使用。支持编译后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 ... p;extra=&page=9

131738

回复 1# 23070205

没有源，下载失败。。。。

131738

回复 1# 23070205

还行。。。。继续努力！！！！！！！！！！！

23070205

回复 3# 131738


    谢谢鼓励。回头有空再完善路径等问题。

afan

呵呵，不错~ 很清晰的操作~

23070205

最新版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

23070205

新版脚本演示真在上传中，给大家两个对比的脚本。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

演示教程，包括：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

afan

看了全程，很不错哦，继续加油~

xlcwxl

回复 7# 23070205

mouseclick vs controlclick
到底哪个好？哪一个受到用户干扰而不影响脚本运行？

23070205

回复  23070205

mouseclick vs controlclick
到底哪个好？哪一个受到用户干扰而不影响脚本运行？
xlcwxl 发表于 2010-9-5 15:48

    在安装脚本时，不动鼠标和键盘，都可以做到不影响自动脚本的运行。相比较来说，controlclick很类似send热键这个操作。不带鼠标的规迹。而mouseclick则会带规迹。

23070205

文件名：f&n安装脚本生产器双版合一0.043.rar

游客，如果您要查看本帖隐藏内容请回复

文件名：kugou2010视频录像.rar

游客，如果您要查看本帖隐藏内容请回复

f&n安装脚本生产器双版合一0.043.rar

游客，如果您要查看本帖隐藏内容请回复

kugou2010视频录像

游客，如果您要查看本帖隐藏内容请回复

23070205

再来水水一下。怎么发布这个上面的一帖，就变成了高级会员了，高兴啊，acn论坛真的很好，我喜欢，能学到很多东东。

23070205

已测试的程序自动安装源码发布

#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 安装","按 [PgDn] 阅读“用户协议”的其余部分。" )
WinActivate( "PPTV网络电视 V2.5.5.0019 安装","按 [PgDn] 阅读“用户协议”的其余部分。" )
ControlClick( "PPTV网络电视 V2.5.5.0019 安装","按 [PgDn] 阅读“用户协议”的其余部分。","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

boy461205160

没有源，下载失败。。。。