5636网吧资讯

网维大师自动安装及卸载代码分享

来源:欣欣时间:2017-08-25 14:28

  有网友学AU3也给网吧做了个母盘,节省每台机安装的时间,就用AU3写出来了代码,今天我们就来分享一下网维大师自动安装及卸载代码,大家跟着我们5636联盟的游戏更新栏目一起去看看吧!
  全部程序如下:
  Dim$a,$b,$c,$d,$e,$f,$g,$h,$j,$k,$i,$o;定义变量
  $a=IniRead("setup.ini","服务器IP","IP","");从setup.ini文件中读取输入并赋予给变量a,下面同理(同理的只解释1遍哦)
  $b=IniRead("setup.ini","客户端路径","path","")
  $c=IniRead("setup.ini","客户端参数设置","子网","")
  $d=IniRead("setup.ini","客户端参数设置","网关","")
  $e=IniRead("setup.ini","客户端参数设置","DNS","")
  $f=IniRead("setup.ini","客户端参数设置","DNS2","")
  $g=IniRead("setup.ini","客户端参数设置","是否还原","")
  $h=IniRead("setup.ini","客户端参数设置","是否重启","")
  $i=IniRead("setup.ini","客户端参数设置","前段机器名","")
  $o=IniRead("setup.ini","客户端参数设置","前段IP","")
  $j=InputBox("输入机器名","输入后段机器名","","",10,10)
  $k=InputBox("输入IP地址","输入后段IP","","",10,10)
  Run($b);运行客户端
  WinWaitActive("WinRAR自解压文件","安装进度");等待并激活窗口
  ControlSetText("WinRAR自解压文件","安装进度","Edit1","C:\DocumentsandSettings\Administrator");向窗口文本控件发送解压路径
  Send("{enter}");发送回车键
  IfWinWaitActive("确认文件替换","你是否确实要将已经存在的文件")Then;如果出现文件已存在,则运行下面的代码,否则跳过
  Send("!a")
  EndIf
  Sleep(1000);暂停1秒
  run("C:\DocumentsandSettings\Administrator\顺网客户端安装包.exe")
  WinWaitActive("网维大师客户机安装检测","检测完毕,请看下面的检测结果")
  Send("{RIGHT}")
  Send("{enter}")
  sleep(7000)
  IfWinExists("网维大师(ICafe)娱乐平台--安装","修改、修复或删除程序")Then
  WinWaitActive("网维大师(ICafe)娱乐平台--安装","修改、修复或删除程序")
  Send("!r")
  Send("!n")
  WinWaitActive("网维大师(ICafe)娱乐平台--安装","是否要完全除去所选应用程序及其所有功能")
  Send("!y")
  WinWaitActive("网维大师(ICafe)娱乐平台--安装","卸载完成")
  Send("{enter}")
  run("C:\DocumentsandSettings\Administrator\顺网客户端安装包.exe")
  WinWaitActive("网维大师客户机安装检测","检测完毕,请看下面的检测结果")
  Send("{RIGHT}")
  Send("{enter}")
  EndIf
  #p#副标题#e#WinWaitActive("网维大师(ICafe)娱乐平台--安装","Wizard将在计算机中安装")
  Send("!n")
  WinWaitActive("网维大师提醒您","D盘数据会被清空")
  Send("!y")
  WinWaitActive("网维大师(ICafe)娱乐平台--安装","顺网软件最终用户许可协议")
  Send("!y")
  WinWaitActive("网维大师(ICafe)娱乐平台--安装","InstallShieldWizard完成")
  Send("{enter}")
  WinWaitActive("客户端安装类型选择","系统管理的大小")
  ControlSetText("客户端安装类型选择","系统管理的大小","Edit3",$a);把变量A的值发送到文本输入框中,变量A是从INI文件中读取的
  Send("!n")#p

  WinWaitActive("手动设置机器名与IP","客户机将在重启后处于还原保护状态")
  ControlSetText("手动设置机器名与IP","客户机将在重启后处于还原保护状态","Edit1",$i&$j)
  ControlSetText("手动设置机器名与IP","客户机将在重启后处于还原保护状态","Edit2",$o&"."&$k);用&来连接两个字符串
  ControlSetText("手动设置机器名与IP","客户机将在重启后处于还原保护状态","Edit3",$c)
  ControlSetText("手动设置机器名与IP","客户机将在重启后处于还原保护状态","Edit4",$d)
  ControlSetText("手动设置机器名与IP","客户机将在重启后处于还原保护状态","Edit5",$e)
  ControlSetText("手动设置机器名与IP","客户机将在重启后处于还原保护状态","Edit6",$f)
  If$g=0Then
  Send("!r")
  EndIf
  Send("!o")
  WinWaitActive("提示","客户端安装完成,是否重启系统")
  If$h=0Then
  Send("!n")
  WinActive("手动设置机器名与IP","客户机将在重启后处于还原保护状态")
  Send("!c")
  Else
  Send("!y")
  EndIf
  setup.inii文件内容:
  [客户端路径]
  path=
  [服务器IP]
  IP=192.168.1.230
  [客户端参数设置]
  前段机器名=
  前段IP=
  子网=
  网关=
  DNS=
  DNS2=
  是否还原=
  是否重启=
  ;还原=1不还原=0重启=1不重启=0
  代码有点多,不过还是很有用的,大家如果有简短一点的网维大师自动安装或者卸载代码就分享一下哦!如果有别的什么好的总结或者技巧也可以留言分享哦,一起进步!

 496
以上内容整理自互联网,如有侵权请与小编联系,QQ: 2850592923。欢迎加入网吧业主交流群:609150654(可加)614859884(可加) 加微信群请添加:wbzz5636
5636增值联盟
上一篇 :易游爱好者分享网吧记事本新体验 下一篇 :网吧网维大师限速如何设置

相关推荐

5636搜索一下
登录