让AUTOIT自动帮我更新文件服务器上的一些常用软件

简介:       要解决的问题:   一个朋友的公司(上班时间员工均无外网)最近全部员人都安装上了360安全卫士,补丁在局域网内升级...但360主程序在没有外网的情况下是不能升级的.

 


 
 
 
要解决的问题:
 
一个朋友的公司(上班时间员工均无外网)最近全部员人都安装上了360安全卫士,补丁在局域网内升级...但360主程序在没有外网的情况下是不能升级的.....需要朋友经常去360官方下载,然后放在文件服务器上....
 
           天,这种活,干一次两次,还行,要是让你连续一年两年去保持这个程序的更新...想想后果吧.................................
 
解决方法:
为了解决这个问题: 我们利用autoit很容易搞定:
以下是源程序部分:
#cs ______
 脚本作者: boyhong Email:    zhanghong1#ceri.com.cn
 QQ/TM:  184661031 脚本功能: 可靠地自动下载360到指定位置
#ce ______
 
 
$dir = IniRead("updater.ini", "PATH", "Updatepath", "")
;读取配置文件updater.ini中PATH字段Updatepath关键字中的值给$dir While ($dir = "")
;若$dir的值为空做如下提示并提示你让选择一个路径最终写进updater.ini MsgBox(0, "Welcome-by boyhong", "如果这是您第一次配置该程序,请选择软件下载后的存放文件夹"&@LF&"以后也可以自行更改updater.ini文件中的路径,或者清空updater.ini文件的内容并重新运行程序来选择文件夹") $dir = FileSelectFolder("请选择升级文件路径", "", 1) If ($dir <> "") Then IniWrite("updater.ini", "PATH", "Updatepath", $dir) EndIf WEnd InetGet("http://down.360safe.com/360compkill.zip", "360compkill.zip", 1, 1)
;下载360compkill.zip While @InetGetActive TrayTip("第一个任务:正在下载360compkill", "已下载字节数 " & @InetGetBytesRead, 10, 16) Sleep(500) WEnd InetGet("http://down.360safe.com/setup.exe", "setup.exe", 1, 1)
;下载360安全卫士 While @InetGetActive TrayTip("第二个任务:正在下载360安全卫士最新正式版", "已下载字节数 " & @InetGetBytesRead, 10, 16) Sleep(500) WEnd InetGet("http://down.360safe.com/offlinepackv4.exe", "offlinepackv4.exe", 1, 1)
;下载360木马特征库
  While @InetGetActive TrayTip("第三个任务:正在下载360安全卫士v4.X特征库升级包", "已下载字节数 " & @InetGetBytesRead, 10, 16) Sleep(500) WEnd $sizecompkill = InetGetSize("http://down.360safe.com/360compkill.zip") $sizecompload = FileGetSize(@ScriptDir&"360compkill.zip")
;获得远程及本机360compkill.zip的大小
If($sizecompkill = $sizecompload) Then
;判断,若大小一致则拷贝到指定位置,否则删除; FileCopy( @ScriptDir& "360compkill.zip", $dir& "360compkill.zip",1) Else FileDelete ( @ScriptDir& "360compkill.zip" ) EndIf $size360 = InetGetSize("http://down.360safe.com/setup.exe") $size360load = FileGetSize(@ScriptDir&"setup.exe")
;同上解释,对刚才下载的三个文件作判断。 If($size360 = $size360load) Then FileCopy( @ScriptDir& "setup.exe", $dir& "setup.exe",1) Else FileDelete ( @ScriptDir& "setup.exe" ) EndIf $sizeoffline = InetGetSize("http://down.360safe.com/offlinepackv4.exe") $offlineload = FileGetSize(@ScriptDir&"offlinepackv4.exe") If($sizeoffline = $offlineload) Then FileCopy( @ScriptDir& "offlinepackv4.exe", $dir& "offlinepackv4.exe",1) Else FileDelete (@ScriptDir& "offlinepackv4.exe") EndIf Exit
 
将其生成一个比如:  360.exe  然后找台有外网的计算机或者服务器,通过系统的" 任务计划",挂在比如每天中午12:00去执行本程序.是不是很方便?
 
 
目录
相关文章
|
2天前
|
安全 数据安全/隐私保护
推荐5款我每次系统重装必装的软件
你电脑中用的最久的软件是哪些?以下是否有你曾经使用过的软件呢?工欲善其事,必先利其器,今天继续分享五款实用的办公软件。
17 1
|
4月前
Mac 打开/关闭 iCloud 后导致桌面文件夹、文档删除,恢复步骤!
Mac 打开/关闭 iCloud 后导致桌面文件夹、文档删除,恢复步骤!
65 0
|
12月前
|
Windows
无需改注册表,快速解决 Windows 10 新建文件夹假死问题
无需改注册表,快速解决 Windows 10 新建文件夹假死问题
117 0
cleanmymac2023安装激活下载教程
在安装好CleanMyMac之后,为了解锁完整版本,我们需要CleanMyMac激活码进行激活软件,以便体验CleanMyMac的全部功能。那么如何获取CleanMyMac激活码呢?
493 0
排错集02——PXE装机时客户机出现”boot:"提示符,需要敲回车键才会下载安装文件。如何才能让客户机自动下载,不需要用户操作?
一、现象 使用PXE网络装机时,客户机下载default文件后,会出现 “boot:" 提示符,此时需要用户手动敲回车键(Enter键)启动引导参数,或输入引导入口的名称。
256 0
|
缓存 安全 iOS开发
CleanMyMac X2023一键安装无需序列号版下载
CleanMyMac X2023只需两个简单步骤就可以把系统里那些乱七八糟的无用文件统统清理掉,节省宝贵的磁盘空间。CleanMyMac X2023,X代表界面上的最大升级,功能方面有更多增加,与最新 MacOS 系统更加兼容,流畅地与系统性能更加结合,系统维护、系统优化、静默清理、记录更新、清洁缓存、快速和安全删除、卸载应用程序和清空回收站等重要功能。CleanMyMac X2023下载:http://t.csdn.cn/vg3uq
143 0
|
C++
vs2010打不开vs2017的.sln文件,出现错误提示 “选择的文件是解决方案文件 但是用此应用程序的较新版本创建的,无法打开”
原文:vs2010打不开vs2017的.sln文件,出现错误提示 “选择的文件是解决方案文件 但是用此应用程序的较新版本创建的,无法打开” 解决方案: 1、复制下面这段语句 Microsoft Visual Studio Solution File, Format Version 11.00 # Visual Studio 2010 2、用记事本方式打开vs2017版本的.sln文件,将上面复制的两行语句替换.sln文件里面前两行语句,保存。
3637 0