Récupérer le login nt d'un client

Commenter

Contenu du snippet

Le code ci-dessous permet de connaître le login NT d'un client lorsque celui-ci ne fait pas partie du même domaine que le serveur.

Source / Exemple : 


<SCRIPT LANGUAGE="VBscript">
'/////////////////////////////////////////////////////////////
'Rôle: lire dans la base de registre du client son Login NT et
'      le retourne à la fonction appelante		
'paramètres:
'	In: Néant
'	Out: Le login NT du client
'/////////////////////////////////////////////////////////////
    
Function GetUsrId() 
Dim UsrLogin
Set WshShell=CreateObject("WScript.Shell")
'Enlever le caractère ' sur la prochaine ligne ( çà s'affiche pas comme il faut sur cette page)    
'UsrLogin = WshShell.RegRead("HKEY_LOCAL_MACHINE\SOFTWARE\Microsoft\Windows NT\CurrentVersion\Winlogon\DefaultUserName")
GetUsrId = UsrLogin
End Function
</SCRIPT>

Conclusion :


Pour qu'il fonctionne vérifier que le client sache interpréter les WindowsScript (installez scr55en.exe par exemple)
Rem:Ici je ne fais que lire l'information mais une écriture, mise à jour, suppression est envisageable donc faites attention.

A voir également

S'inscrire maintenant

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.

Du même auteur (TowelBoy)