Executer un Sscript vbs avec des droits administrateur
2 réponses
Pépane 13
Bonjour à tous,
Je suis un novis en VBS, je l'utilise pour le déploiement AD.
Voici mon problème:
Je souhaite que les utilisateurs de mon domaine soit administrateur de leur
machine.
ci-joint mon script:
Set oWshNet = CreateObject("WScript.Network")
sNetBIOSDomain = oWshNet.UserDomain
sComputer = oWshNet.ComputerName
Set WshNetwork = WScript.CreateObject("WScript.Network")
user= wshNetwork.UserName
Set oLocalGroup = GetObject("WinNT://" & sComputer & "/Administrateurs,group")
Set oDomainGroup = GetObject("WinNT://" & sNetBIOSDomain & "/" & user &
",user")
' suppress errors in case group is already a member
On Error Resume Next
oLocalGroup.Add(oDomainGroup.ADsPath)
On Error Goto 0
Mais pour qu'il fonctionne, il faut qu'il s'execute avec des droits
administrateur du domaine. (lorsque je l'execute avec une session
administrateur, il est ok)
Est-il possible d'intégrer une commande pour obtenir ce résultat?
Cette action est irreversible, confirmez la suppression du commentaire ?
Signaler le commentaire
Veuillez sélectionner un problème
Nudité
Violence
Harcèlement
Fraude
Vente illégale
Discours haineux
Terrorisme
Autre
Fred
Dans son message Pépane 13 nous dit :
Bonjour à tous,
Je suis un novis en VBS, je l'utilise pour le déploiement AD.
Voici mon problème:
Je souhaite que les utilisateurs de mon domaine soit administrateur de leur machine.
ci-joint mon script:
Set oWshNet = CreateObject("WScript.Network") sNetBIOSDomain = oWshNet.UserDomain sComputer = oWshNet.ComputerName
Set WshNetwork = WScript.CreateObject("WScript.Network") user= wshNetwork.UserName
Set oLocalGroup = GetObject("WinNT://" & sComputer & "/Administrateurs,group") Set oDomainGroup = GetObject("WinNT://" & sNetBIOSDomain & "/" & user & ",user")
' suppress errors in case group is already a member On Error Resume Next oLocalGroup.Add(oDomainGroup.ADsPath) On Error Goto 0
Mais pour qu'il fonctionne, il faut qu'il s'execute avec des droits administrateur du domaine. (lorsque je l'execute avec une session administrateur, il est ok)
Est-il possible d'intégrer une commande pour obtenir ce résultat?
Par avance merci,
Amicalment Stéphane
Bonjour, J.C. Bellamy a un fait un programme pour exécuter des logiciels en tant qu'administrateur : http://www.bellamyjc.org/fr/superexec.html
Ceci dit, puisque tu es en Active Directory, tu peux arriver au même résultat sans script avec une stratégie de groupe dans laquelle tu ajoutes un groupe restreint Administrateurs dans lequel tu places tes utilisateurs. Je fonctionne ainsi sur mon réseau. Plus précisément, j'ai créé un groupe Administrateurs locaux que j'ai placé dans le groupe restreint. Cela me permet de facilement passer un groupe d'utilisateurs en admin sans rebooter la machine. Une déconnexion-reconnexion des utilisateurs suffit. J'ai également procédé ainsi pour les Utilisateurs avec pouvoir.
-- Fred
Dans son message B3F894BD-9256-462F-9807-849EDBA15955@microsoft.com
Pépane 13 nous dit :
Bonjour à tous,
Je suis un novis en VBS, je l'utilise pour le déploiement AD.
Voici mon problème:
Je souhaite que les utilisateurs de mon domaine soit administrateur
de leur machine.
ci-joint mon script:
Set oWshNet = CreateObject("WScript.Network")
sNetBIOSDomain = oWshNet.UserDomain
sComputer = oWshNet.ComputerName
Set WshNetwork = WScript.CreateObject("WScript.Network")
user= wshNetwork.UserName
Set oLocalGroup = GetObject("WinNT://" & sComputer &
"/Administrateurs,group") Set oDomainGroup = GetObject("WinNT://" &
sNetBIOSDomain & "/" & user & ",user")
' suppress errors in case group is already a member
On Error Resume Next
oLocalGroup.Add(oDomainGroup.ADsPath)
On Error Goto 0
Mais pour qu'il fonctionne, il faut qu'il s'execute avec des droits
administrateur du domaine. (lorsque je l'execute avec une session
administrateur, il est ok)
Est-il possible d'intégrer une commande pour obtenir ce résultat?
Par avance merci,
Amicalment Stéphane
Bonjour,
J.C. Bellamy a un fait un programme pour exécuter des logiciels en tant
qu'administrateur :
http://www.bellamyjc.org/fr/superexec.html
Ceci dit, puisque tu es en Active Directory, tu peux arriver au même
résultat sans script avec une stratégie de groupe dans laquelle tu ajoutes
un groupe restreint Administrateurs dans lequel tu places tes utilisateurs.
Je fonctionne ainsi sur mon réseau.
Plus précisément, j'ai créé un groupe Administrateurs locaux que j'ai placé
dans le groupe restreint.
Cela me permet de facilement passer un groupe d'utilisateurs en admin sans
rebooter la machine. Une déconnexion-reconnexion des utilisateurs suffit.
J'ai également procédé ainsi pour les Utilisateurs avec pouvoir.
Je suis un novis en VBS, je l'utilise pour le déploiement AD.
Voici mon problème:
Je souhaite que les utilisateurs de mon domaine soit administrateur de leur machine.
ci-joint mon script:
Set oWshNet = CreateObject("WScript.Network") sNetBIOSDomain = oWshNet.UserDomain sComputer = oWshNet.ComputerName
Set WshNetwork = WScript.CreateObject("WScript.Network") user= wshNetwork.UserName
Set oLocalGroup = GetObject("WinNT://" & sComputer & "/Administrateurs,group") Set oDomainGroup = GetObject("WinNT://" & sNetBIOSDomain & "/" & user & ",user")
' suppress errors in case group is already a member On Error Resume Next oLocalGroup.Add(oDomainGroup.ADsPath) On Error Goto 0
Mais pour qu'il fonctionne, il faut qu'il s'execute avec des droits administrateur du domaine. (lorsque je l'execute avec une session administrateur, il est ok)
Est-il possible d'intégrer une commande pour obtenir ce résultat?
Par avance merci,
Amicalment Stéphane
Bonjour, J.C. Bellamy a un fait un programme pour exécuter des logiciels en tant qu'administrateur : http://www.bellamyjc.org/fr/superexec.html
Ceci dit, puisque tu es en Active Directory, tu peux arriver au même résultat sans script avec une stratégie de groupe dans laquelle tu ajoutes un groupe restreint Administrateurs dans lequel tu places tes utilisateurs. Je fonctionne ainsi sur mon réseau. Plus précisément, j'ai créé un groupe Administrateurs locaux que j'ai placé dans le groupe restreint. Cela me permet de facilement passer un groupe d'utilisateurs en admin sans rebooter la machine. Une déconnexion-reconnexion des utilisateurs suffit. J'ai également procédé ainsi pour les Utilisateurs avec pouvoir.
-- Fred
Pépane 13
Bonjour Fred,
Merci pour ces informations.
Je fais le test de ce pas.
Amicalement Stéphane
Dans son message Pépane 13 nous dit :
Bonjour à tous,
Je suis un novis en VBS, je l'utilise pour le déploiement AD.
Voici mon problème:
Je souhaite que les utilisateurs de mon domaine soit administrateur de leur machine.
ci-joint mon script:
Set oWshNet = CreateObject("WScript.Network") sNetBIOSDomain = oWshNet.UserDomain sComputer = oWshNet.ComputerName
Set WshNetwork = WScript.CreateObject("WScript.Network") user= wshNetwork.UserName
Set oLocalGroup = GetObject("WinNT://" & sComputer & "/Administrateurs,group") Set oDomainGroup = GetObject("WinNT://" & sNetBIOSDomain & "/" & user & ",user")
' suppress errors in case group is already a member On Error Resume Next oLocalGroup.Add(oDomainGroup.ADsPath) On Error Goto 0
Mais pour qu'il fonctionne, il faut qu'il s'execute avec des droits administrateur du domaine. (lorsque je l'execute avec une session administrateur, il est ok)
Est-il possible d'intégrer une commande pour obtenir ce résultat?
Par avance merci,
Amicalment Stéphane
Bonjour, J.C. Bellamy a un fait un programme pour exécuter des logiciels en tant qu'administrateur : http://www.bellamyjc.org/fr/superexec.html
Ceci dit, puisque tu es en Active Directory, tu peux arriver au même résultat sans script avec une stratégie de groupe dans laquelle tu ajoutes un groupe restreint Administrateurs dans lequel tu places tes utilisateurs. Je fonctionne ainsi sur mon réseau. Plus précisément, j'ai créé un groupe Administrateurs locaux que j'ai placé dans le groupe restreint. Cela me permet de facilement passer un groupe d'utilisateurs en admin sans rebooter la machine. Une déconnexion-reconnexion des utilisateurs suffit. J'ai également procédé ainsi pour les Utilisateurs avec pouvoir.
-- Fred
Bonjour Fred,
Merci pour ces informations.
Je fais le test de ce pas.
Amicalement Stéphane
Dans son message B3F894BD-9256-462F-9807-849EDBA15955@microsoft.com
Pépane 13 nous dit :
Bonjour à tous,
Je suis un novis en VBS, je l'utilise pour le déploiement AD.
Voici mon problème:
Je souhaite que les utilisateurs de mon domaine soit administrateur
de leur machine.
ci-joint mon script:
Set oWshNet = CreateObject("WScript.Network")
sNetBIOSDomain = oWshNet.UserDomain
sComputer = oWshNet.ComputerName
Set WshNetwork = WScript.CreateObject("WScript.Network")
user= wshNetwork.UserName
Set oLocalGroup = GetObject("WinNT://" & sComputer &
"/Administrateurs,group") Set oDomainGroup = GetObject("WinNT://" &
sNetBIOSDomain & "/" & user & ",user")
' suppress errors in case group is already a member
On Error Resume Next
oLocalGroup.Add(oDomainGroup.ADsPath)
On Error Goto 0
Mais pour qu'il fonctionne, il faut qu'il s'execute avec des droits
administrateur du domaine. (lorsque je l'execute avec une session
administrateur, il est ok)
Est-il possible d'intégrer une commande pour obtenir ce résultat?
Par avance merci,
Amicalment Stéphane
Bonjour,
J.C. Bellamy a un fait un programme pour exécuter des logiciels en tant
qu'administrateur :
http://www.bellamyjc.org/fr/superexec.html
Ceci dit, puisque tu es en Active Directory, tu peux arriver au même
résultat sans script avec une stratégie de groupe dans laquelle tu ajoutes
un groupe restreint Administrateurs dans lequel tu places tes utilisateurs.
Je fonctionne ainsi sur mon réseau.
Plus précisément, j'ai créé un groupe Administrateurs locaux que j'ai placé
dans le groupe restreint.
Cela me permet de facilement passer un groupe d'utilisateurs en admin sans
rebooter la machine. Une déconnexion-reconnexion des utilisateurs suffit.
J'ai également procédé ainsi pour les Utilisateurs avec pouvoir.
Je suis un novis en VBS, je l'utilise pour le déploiement AD.
Voici mon problème:
Je souhaite que les utilisateurs de mon domaine soit administrateur de leur machine.
ci-joint mon script:
Set oWshNet = CreateObject("WScript.Network") sNetBIOSDomain = oWshNet.UserDomain sComputer = oWshNet.ComputerName
Set WshNetwork = WScript.CreateObject("WScript.Network") user= wshNetwork.UserName
Set oLocalGroup = GetObject("WinNT://" & sComputer & "/Administrateurs,group") Set oDomainGroup = GetObject("WinNT://" & sNetBIOSDomain & "/" & user & ",user")
' suppress errors in case group is already a member On Error Resume Next oLocalGroup.Add(oDomainGroup.ADsPath) On Error Goto 0
Mais pour qu'il fonctionne, il faut qu'il s'execute avec des droits administrateur du domaine. (lorsque je l'execute avec une session administrateur, il est ok)
Est-il possible d'intégrer une commande pour obtenir ce résultat?
Par avance merci,
Amicalment Stéphane
Bonjour, J.C. Bellamy a un fait un programme pour exécuter des logiciels en tant qu'administrateur : http://www.bellamyjc.org/fr/superexec.html
Ceci dit, puisque tu es en Active Directory, tu peux arriver au même résultat sans script avec une stratégie de groupe dans laquelle tu ajoutes un groupe restreint Administrateurs dans lequel tu places tes utilisateurs. Je fonctionne ainsi sur mon réseau. Plus précisément, j'ai créé un groupe Administrateurs locaux que j'ai placé dans le groupe restreint. Cela me permet de facilement passer un groupe d'utilisateurs en admin sans rebooter la machine. Une déconnexion-reconnexion des utilisateurs suffit. J'ai également procédé ainsi pour les Utilisateurs avec pouvoir.
