Impersonification utilisateur en réseau

Soyez le premier à donner votre avis sur cette source.

Vue 5 493 fois - Téléchargée 436 fois

Description

Cette dll est écrit d'après les sources Microsoft. Elle est utile pour mapper un compte ou une application dans un contexte de sécurité différent que le contexte actuel (comme le Run AS sous Win 2000)

Elle nécéssite que le compte vers le quel on veut faire le mapping soit dans les users locaux de la machine.
Je le publie car j'ai eut beaucoup de mal à trouver cette information, mais ce n'est pas de moi.

Codes Sources

Ajouter un commentaire Commentaires
Messages postés
43
Date d'inscription
lundi 31 décembre 2001
Statut
Membre
Dernière intervention
5 février 2005

Une Question ?? J'au aussi des problèmes avec L'Api qui me permet de créér un share avec un service en compte système.
Le service "compte système" n'a pas de droits réseaux.
Or si mon process instance une session Administrateur le temps de la création du share...crois-tu que cela va fonctionner ?
Messages postés
2865
Date d'inscription
samedi 2 novembre 2002
Statut
Membre
Dernière intervention
11 mai 2009
10
merci pour ton explication...
Messages postés
21
Date d'inscription
jeudi 19 décembre 2002
Statut
Membre
Dernière intervention
7 décembre 2004

Voici un exemple d'utilisation dans un script :
-----------------------------------------------------
Option Explicit

Dim impo
Dim oNet
Dim oFSO
Set oNet = CreateObject("Wscript.Network")
Set oFso = CreateObject("Scripting.FileSystemObject")
'On affiche le compte de domaine utilisé actuellement
MsgBox "Avant :" & oNet.UserDomain & "" & oNet.UserName

'on crée un objet en référence avec la DLL d'impersonification
Set impo = CreateObject("LoginAdmin.ImpersonateUser")

'On provoque l'authentification
impo.Logon "le login a utiliser", "son mot de passe", "le domaine ou est situé le compte"
'On affiche le compte de domaine utilisé actuellement
'Ici on peux acceder à des ressources normalement accessibles qu'avec le compte ci-dessus
'Même si l'appli reste plantée à cet endroit, le contexte de sécurité et réservé au script ou logiciel qui l'a instancié
MsgBox "Aprés :" & oNet.UserDomain & "" & oNet.UserName

'Une fois les opération effectuée, on revient au contexte de sécurité standard.
impo.Logoff

MsgBox "Retour :" & oNet.UserDomain & "" & oNet.UserName

----------------------------------------------------------------

Dans le cadre de VB il suffit d'enregistrer la DLL puis de créer une référence à cette dll dans un projet VB, après c'est les classique commandes :

----------------------------------------------
Private Sub Command1_Click()
Dim impo As LoginAdmin.ImpersonateUser
Set impo = LoginAdmin.ImpersonateUser
impo.Logon "nom user", "pass", "domain"

'les action.....
impo.Logoff

End Sub
-----------------------------------------------

voili, voilou
Messages postés
42
Date d'inscription
vendredi 11 janvier 2002
Statut
Membre
Dernière intervention
22 mai 2003

vachement interessant mas je ne sais comment l'utiliser!!!

peus tu mettre un ex stp !!!

Merci
Messages postés
21
Date d'inscription
jeudi 19 décembre 2002
Statut
Membre
Dernière intervention
7 décembre 2004

Prenons le cas ou tu es administrateur d'un domaine Microsoft, tu souhaite créer une appli qui effectue des taches qui ont besoin de droits administrateur, mais tu ne veux pas que les personnes l'utilisant aient ces droits. Ca te permet de donner les droit liées au compte paramétré à l'application et son environnement. Donc ton utilisateur peux effectuer les taches administratives de l'appli sans être dans un quelquonque groupe administrateur.
Afficher les 6 commentaires

Vous n'êtes pas encore membre ?

inscrivez-vous, c'est gratuit et ça prend moins d'une minute !

Les membres obtiennent plus de réponses que les utilisateurs anonymes.

Le fait d'être membre vous permet d'avoir un suivi détaillé de vos demandes et codes sources.

Le fait d'être membre vous permet d'avoir des options supplémentaires.