Page 1 sur 1

[R] Changer l'icone de la session utilisateur de windows

Posté : dim. 29 sept. 2013 18:17
par Stevanovich35
Bonjour,

Après moultes recherches sur le net , je n'arrive pas à trouver l'endroit ou est stoquée l'image ou logo de la session de l'utilisateur.
Et ce aussi bien du coté du VB que de autoit.
Je cherche à automatiser la création de login / password pour créer des installations par défaut pour des PC .
Voici un début de code récupéré sur le net pour la partie création login.

Code : Tout sélectionner

Func CreateAccount($strUserName,$strFullName,$strPassword,$strGroup)
   ToolTip ( "$strUserName="&$strUserName&@CRLF&"$strFullName="&$strFullName&@CRLF&"$strPassword="&$strPassword&@CRLF&"$strGroup="&$strGroup  , 10 , 10 , "Création User" , 2 , 1)
; RETRIEVE Computer Name
Dim $objNetwork, $strComputerName
$objNetwork = ObjCreate("WScript.Network")
local $strComputer = $objNetwork.ComputerName

local $objUser = ObjGet("WinNT://" & $strComputer & "/" & $strUserName)

If @error then
; Code To add User
local $objSystem = ObjGet("WinNT://" & $strComputer)
local $objUser = $objSystem.Create("user", $strUserName)
$objUser.FullName = $strFullName
$objUser.SetPassword ($strPassword)

;~ Pour Info Voici les différents flags en hexa.
;~ 0x2      Account Disabled
;~ 0x10     Account Locked out
;~ 0x20     Password Not Required
;~ 0x40     Cannot Change Password
;~ 0x10000  Password Never Expires
;~ 0x800000 Password Expired

$objUser.userFlags = 0x10000
$objUser.SetInfo
; Code to add User to Group
local $objGroup = ObjGet("WinNT://" & $strComputer & "/" & $strGroup)
$objGroup.Add("WinNT://" & $strUserName)
Else
   MsgBox(0,"Error", "Found :" & $strUserName)
   $objUser.FullName = $strFullName
   $objUser.SetPassword ($strPassword)
   $objUser.SetInfo

EndIf
EndFunc
 
Merci pour votre aide / conseil à ce sujet.

Cordialement.

Re: [...] Changer l'icone de la session utilisateur de windo

Posté : dim. 29 sept. 2013 19:02
par Tlem
Bonjour.
Sur mon PC qui est sous XP, j'ai trouvé ça :

Code : Tout sélectionner

[HKEY_LOCAL_MACHINE\SOFTWARE\Microsoft\Windows\CurrentVersion\Hints\Tlem]
"PictureSource"="C:\\Documents and Settings\\All Users\\Application Data\\Microsoft\\User Account Pictures\\Default Pictures\\chess.bmp"
 

Re: [...] Changer l'icone de la session utilisateur de windo

Posté : lun. 30 sept. 2013 11:00
par Stevanovich35
Oui, merci pour cette réponse,
Effectivement on retrouve l'origine mais pas la sélection en cours , Exemple pour mon login, il y a un mois, je me suis amusé à mettre ma photo située sur ma clé USB :

Code : Tout sélectionner

[HKEY_LOCAL_MACHINE\SOFTWARE\Microsoft\Windows\CurrentVersion\Hints\moi.moi]
"PictureSource"="E:\\Documents\\Personnel\\CV\\Small IMAG0139.jpg"
 
Hors ma clé USB n'est plus insérée et l’icône de mon login de session est toujours activée et fonctionnelle .

Maintenant si je change la valeur en la faisant pointer sur une image existante et valide, rien ne se produit lors de la réouverture de session : c'est toujours la précédente icône qui est affichée...

Quelqu'un a-t-il une autre piste ?
Merci.

Re: [...] Changer l'icone de la session utilisateur de windo

Posté : lun. 30 sept. 2013 21:58
par Tlem
Désolé, c'était tellement évident que je ne l'avais pas vu !

Les images utilisateurs sont dans ce dossier sous XP et probablement sur les autres systèmes (jusqu'à Windows 7) :

Code : Tout sélectionner

C:\Documents and Settings\All Users\Application Data\Microsoft\User Account Pictures
Merci RegShoot !

Re: [...] Changer l'icone de la session utilisateur de windo

Posté : lun. 30 sept. 2013 22:39
par Stevanovich35
Merci à tous pour cette précieuse aide !
Testé et fonctionnel dès la fermeture de session .
Cordialement.