wbcd 发表于 2010-8-21 11:52:34

PPS影音V2.7.0.1096正式版自动安装程序 去掉多余选项和插件

Run( "pps影音.exe")
WinWaitActive("PPS影音 V2.7.0.1096 正式版", "下一步(&N) >")
send("!n")
WinWaitActive("PPS影音 V2.7.0.1096 正式版", "创建快速启动快捷方式")
ControlCommand("PPS影音 V2.7.0.1096 正式版", "创建快速启动快捷方式","Button8","UnCheck", "")
WinWaitActive("PPS影音 V2.7.0.1096 正式版", "开机自动运行PPS影音")
ControlCommand("PPS影音 V2.7.0.1096 正式版", "开机自动运行PPS影音","Button9","UnCheck", "")
WinWaitActive("PPS影音 V2.7.0.1096 正式版", "安装PPS影讯屏保")
ControlCommand("PPS影音 V2.7.0.1096 正式版", "安装PPS影讯屏保","Button10","UnCheck", "")
WinWaitActive("PPS影音 V2.7.0.1096 正式版", "下一步(&N) >")
send("!n")
WinWaitActive("PPS影音 V2.7.0.1096 正式版", "下一步(&N) >")
send("!n")
WinWaitActive("安装 Google 工具栏", "取消(&C)")
ControlClick("安装 Google 工具栏", "安装 Google 工具栏","Button4")
send("!n")
WinWaitActive("PPS影音 V2.7.0.1096 正式版", "选择推荐软件")
ControlCommand("PPS影音 V2.7.0.1096 正式版", "选择推荐软件","Button5","uncheck","")
ControlCommand("PPS影音 V2.7.0.1096 正式版", "选择推荐软件","Button6","uncheck","")
ControlCommand("PPS影音 V2.7.0.1096 正式版", "选择推荐软件","Button7","uncheck","")
send("!i")
WinWaitActive("PPS影音 V2.7.0.1096 正式版 ", "运行 PPS影音")
ControlCommand("PPS影音 V2.7.0.1096 正式版 ", "运行 PPS影音","Button4","UnCheck", "")
WinWaitActive("PPS影音 V2.7.0.1096 正式版 ", "运行 PPS影音")
ControlClick("PPS影音 V2.7.0.1096 正式版", "设置PPS网址导航为IE首页","Button7")
WinWaitActive("PPS影音 V2.7.0.1096 正式版 ", "完成(&F)")
send("!f")
ProcessWait("IEXPLORE.EXE")
If ProcessExists("IEXPLORE.EXE") Then
   ProcessClose("IEXPLORE.EXE")
EndIf

qinxuexiang 发表于 2010-8-26 15:27:35

我收下了，多谢。

hollandmfq 发表于 2010-9-4 08:58:55

{:face (427):}

pingfan5888 发表于 2011-7-7 10:21:40

试试看啊。。

fuchengwu 发表于 2012-6-7 20:09:42

顶你！辛苦了～

tdahrabv 发表于 2012-6-27 10:42:35

支持！很不错啊，支持

呵呵。。。。。 http://www.pgpop.com/image/face1.gif

















http://qb.lqualyn.com/images/sigline.gif
防辐射服真的管用吗

zjpallen 发表于 2012-8-25 08:20:08

看的不是很明，但是我只会用三个函数编写。。一个RUN.send.WinWaitActive.

海阳 发表于 2012-9-11 00:22:14

拿走了~多谢啊

honylan 发表于 2013-9-13 19:52:02

这个可以看看，狂顶，没钱不能下附件啊，还重复收费，没得混
页: [1]
查看完整版本: PPS影音V2.7.0.1096正式版自动安装程序 去掉多余选项和插件