×

组策略下发EXE软件

hqy hqy 发表于2021-05-21 09:26:21 浏览1394 评论0

抢沙发发表评论

http://www.javashuo.com/article/p-asxharyv-u.html

如何经过组策略下发exe软件？可能会想到将exe格式的软件转换为msi格式的，组策略是支持msi格式下发的，若是经过组策略下发exe如何作到呢，每每有企业就会有奇葩的要求，软件不能是msi格式的，固然这样也是有实现方法的，经过脚本实现用户登陆时自动安装软件，首先说明自动安装只是跳出安装窗口，还须要用户手动点击下一步，用户须要最基本的Poweruser权限才能够进行安装，不然会提示没权限ide


1）首先肯定你组策略下发的范围，也就是说下发到全域仍是某个ou，我这里下发一个ou，将客户端用户添加到此ou中测试

wKiom1fONhODLNwMAABQXLHc36U504.png


2）接着打开组策略管理控制台，而后给这个ou新建一条GPO，点击编辑spa

wKiom1fONlWxJAiRAAB6namm9Hg122.png


3）切记要点击显示文件3d

wKiom1fONrDicjfPAAByQNQmGz0854.png


4）将脚本和exe文件放入此共享中blog

wKiom1fPf_DRCgCeAAByq8NQCYM665.png


5）这里是最重要的，编辑VBS脚本，复制上面的路径，最好Ctrl+aget

wKioL1fPgMCSU8ffAABn81KPNQM276.png


6）而后在红框处将刚才复制的内容替换掉it

wKiom1fPgMCR5-QpAAA50RByBsk953.png

path="HKLM\flag"

fun(path)

sub fun(n)

On Error Resume next

set ws=wscript.CreateObject ("wscript.shell")

v = ws.RegRead(n)

If (Err.Number = 0 and v = "1") Then

Else

createobject("script,shell' ).rum chr(34) & "\\xxx\SysVol \xxx\Policies \xx\xx"

Dim OperatiorRegistry

set OperationRegistry=wScript.Create0bject("WScript.Shell")

OperationRegistry. Regwrite "HKLM flag","1"

End If

End sub

这里填写你的软件名称，别忘了加后缀，也就是说你每次要下发软件的时候都须要替换软件名称io

wKioL1fPgMCzJtnkAAAlCYseTcg583.png


7）添加刚才编辑好的脚本，点击肯定，不用更新组策略也能够class

wKiom1fPgZGCLiq_AABuurZ9WyU834.png


8）客户端开始测试，若是客户端重启登陆后，自动出现了exe软件的安装向导说明脚本配置没有问题登录

能够看到下发的软件已经自动打开了安装向导

脚本的原理就是，判断用户是否安装了这个软件，若是没有的话就会进行安装

wKioL1fPg0bjvT2OAABd7yyM9g0409.png


若是想要继续下发其余软件，将脚本中软件名称修改便可，




打赏

本文链接：https://www.kinber.cn/post/1721.html 转载需授权！

分享到：


推荐本站淘宝优惠价购买喜欢的宝贝:

image.png

 您阅读本篇文章共花了： 

群贤毕至

访客