自己制作的autoitX的vbs脚本，用来自动配置金山毒霸2011局域网更新

更新原理：

实现金山毒霸6在局域网中的批量自动升级
http://www.yesky.com/265/1903765.shtml

下载地址：https://files.cnblogs.com/weiqi/dubaLanUpdate.zip

更新了，ini配置文件的版本（文章就没做更新了，代码注释写得很完整），下载地址：https://files.cnblogs.com/weiqi/dubaLanUpdateCfgVer.zip

vbs执行效果图（执行vbs后，后面的窗体等操作都是全自动哦，是vbs调用autoitv3的activex控件）：

源码如下：使用了vbs调用autoitv3的ActiveX组件（在这里是autoV3x.dll）

'金山毒霸使用局域网升级方案
'作者：前尘光明 ywq111 2011-02-08 只在xp sp3上测试过
'说明：
'1.这个脚本需要用到AutoItX3的dll，先在客户机上将这个dll注册(程序中已经实现，dll要和本vbs在同一目录)。
'2.先将服务器上"C:\Program Files\Common Files\Kingsoft\kiscommon\update"目录共享为update，guest也有访问权限,如这里是\\netadmin\update
'3.设置这个vbs中的毒霸病毒库的共享路径：netpath="\\netadmin\update"
'4.设置这个vbs中添加“计划任务”需要的密码（客户机上当前用户的密码） pwd="sunwood{enter}"
'5.执行该vbs
'6.这个vbs已经将毒霸的升级添加到系统计划任务，所以执行一次之后，以后操作系统就通过计划任务自动更新
'参数列表：
netpath="\\netadmin\update"
pwd="sunwood{enter}" '设置计划任务时需要密码，其中{enter}键为回车操作
dim oAutoit,oShell,objShell
Set oShell = WScript.CreateObject("WScript.Shell")
'先注册autoitV3X的DLL文件，这里提供的是使用upx压缩的，名字为autoV3x.dll（只适应与32位系统）
oShell.Run "regsvr32 /s autoV3x.dll"
WScript.Sleep 100
set oAutoit = WScript.CreateObject("AutoItX3.Control")
'将netpath目录加载为X盘（先需要设置好服务器共享目录的guest访问权限）
oShell.Run "net use X: " +  netpath + " /persistent:yes"
'修改盘符X的显示名称为X(如果不设置这个，后面的send "{X}"就不能定位到X盘了；
'还有个要求，要求客户机上的盘没有以X开头的，否则请修改这里的X为其他名字，比如y，那么后面的同步改成send "{Y}" )
Set objShell = CreateObject("Shell.Application")
objShell.NameSpace("X:").Self.Name = "X"
Set objShell=Nothing
'设置mouseClick的点击为相对点击
oAutoit.AutoItSetOption "MouseCoordMode",2
oShell.Run """C:\Program Files\Common Files\Kingsoft\kiscommon\kislive.exe""", 1, False
'等待金山升级窗体（使用AutoIt Window Info检测的）
oAutoit.WinWaitActive "[class:ATL:0044D940]"
oAutoit.MouseClick "left",368, 226,2
oAutoit.Sleep 500
'控件客户坐标加上控件ControlClick Coords（控件相对坐标）坐标
oAutoit.MouseClick "left",26+10, 168+90,1
oAutoit.Sleep 500
oAutoit.MouseClick "left",429+10, 111+90,1
oAutoit.Sleep 500
'在我的电脑按向右的键
oAutoit.Send "{Right}"
oAutoit.Sleep 100
'在驱动盘列表中，按X键，定位到名为X的盘
oAutoit.Send "{X}"
oAutoit.Sleep 200
'确定选择（金山升级的对话框的确定键）
oAutoit.WinActive "[class:ATL:0044D940]"
oAutoit.Send "{Enter}"
oAutoit.Sleep 200
oAutoit.MouseClick "Left",405,306,2
'毒霸第一次从局域网升级的时间，不知道两分钟够不够用，各位根据自己情况设置
oAutoit.Sleep 2000 
oAutoit.WinActive "[class:ATL:0044D940]"
oAutoit.MouseClick "Left",405,306,2
ref1="schtasks /create /tn ""jinshan1"" /tr ""\""C:\Program Files\Common Files\Kingsoft\kiscommon\kislive.exe\"" /continue"" /sc daily /st 15:00:00 "
oShell.Run ref1 '添加金山毒霸更新到系统任务计划,需要输入密码
oAutoit.WinActive "[class:ConsoleWindowClass]" '这个是操作系统命令行窗体
oAutoit.WinWaitActive "[class:ConsoleWindowClass]"
oAutoit.Send pwd
oAutoit.Sleep 100
Set oAutoit=Nothing
Set oShell=Nothing