hotyam2000 发表于 2010-3-25 08:47:40

360杀毒自动安装到D盘脚本 免费

1安装前会判断安装程序是否存在, 延时5秒自动退出
2.安装前会判断系统中是否已安装360杀毒, 延时5秒自动退出
3.安装前有用户确认的消息框,延时5秒按确认处理

脚本

jsxyg 发表于 2010-4-14 16:18:51

安装前有用户确认的消息框,延时5秒按确认处理

jsxyg 发表于 2010-4-14 16:18:55

安装前有用户确认的消息框,延时5秒按确认处理

jsxyg 发表于 2010-4-14 16:18:56

安装前有用户确认的消息框,延时5秒按确认处理

jxfa0086768 发表于 2010-4-16 11:57:30

回复 1# hotyam2000


    Send("{Home}{Delete}D")

最好先、获取固定磁盘盘符,然后安装到第二个分区,要不然要是D盘不存在或是让其它类型占用呢

;------获取固定驱动器第二个分区盘符-----------------
$var = DriveGetDrive( "FIXED" )
If NOT @error Then
       $i = 2 ;------第二个固定磁盘分区
        Else
                MsgBox(4096,"驱动器" , "找不到固定驱动器")
                Exit
EndIf
;--------------------------------------------------

$var[$i]; 用此调用

basketballkun 发表于 2010-4-17 17:28:36

这个我收下了

shmilds 发表于 2010-4-24 16:10:37

看起来不错哦、、、、

45885652 发表于 2010-4-26 11:42:58

试一下。没用过

laotongbao 发表于 2010-4-26 15:18:37

参考下,支持

pp88298 发表于 2010-7-30 12:37:35

Run("360sd.exe")
WinWait(" 360 杀毒双引擎版 安装","欢迎使用“360杀毒”安装向导")
Send("!n")
WinWait(" 360 杀毒双引擎版 安装","许可证协议")
ControlClick(" 360 杀毒双引擎版 安装","许可证协议","Button2")
WinWait(" 360 杀毒双引擎版 安装","选择安装位置")
ControlSetText(" 360 杀毒双引擎版 安装","选择安装位置","Edit1","d:\Program Files\360\360sd")
Send("!n")
WinWait(" 360 杀毒双引擎版 安装","选择“开始菜单”文件夹")
ControlClick(" 360 杀毒双引擎版 安装","选择“开始菜单”文件夹","Button2")
WinWait(" 360 杀毒双引擎版 安装","360安全浏览器安装设置")
ControlClick(" 360 杀毒双引擎版 安装","360安全浏览器安装设置","Button4")
Send("!n")
WinWait(" 360 杀毒双引擎版 安装","完成(&F)")
ControlClick(" 360 杀毒双引擎版 安装","完成(&F)","Button4")
Send("!f")

5i5wei 发表于 2010-12-12 22:05:59

{:face (356):}路过支持下

sybzpq 发表于 2010-12-14 09:13:38

没有钱啊,钱不够用。

luoguohui169 发表于 2011-1-10 23:43:12

看起来不错,可惜全都是要收费的~

jilk168 发表于 2011-1-15 22:27:17

试试...学习

980040003 发表于 2011-1-17 10:35:55

{:face (396):}   好。支持。。。
页: [1] 2 3
查看完整版本: 360杀毒自动安装到D盘脚本 免费