[R] Changer le thème de Windows XP automatiquement

[GELDROC]

bonjour je cherche depuis un long moment comment modifier le thème de Windows xp automatiquement et surtout en silence ci quelqu'un peut m'aider ce serait super cool

.

[jbnh]

Salut !

Jettes un oeil ici : http://www.autoitscript.com/forum/index ... opic=27960

Ou la ligne en question :

Code : Tout sélectionner

run ('%SystemRoot%\system32\rundll32.exe %SystemRoot%\system32\shell32.dll,Control_RunDLL %SystemRoot%\system32\desk.cpl desk,@Themes /Action:OpenTheme /file:"C:\WINDOWS\Resources\Themes\Windows Classic.theme"')

[GELDROC]

merci bauqoud

il reste plus cas trouver commeent faire la meme chose mais en "/silent"



sinon sujet clos

[ani]

bonjour,
pour ne pas afficher le panneau Propriétés d'affichage, vous pouvez utiliser dans la commande run le mode caché (Hidden/hide).
c'est le troisième paramètre de la commande run comme ci-dessous:
run(lacommande.desk.cpl.....,"",@sw_hide)
Il me semble qu'il doit exister une autre commande spécifique au changement de themes.

voilàvoilà, bonne continuation.

[GELDROC]

.
cette solution n'est toujours pas la bonne désoler

.

Code : Tout sélectionner

run ('c:\windows\system32\rundll32.exe c:\windows\system32\shell32.dll,Control_RunDLL c:\windows\system32\desk.cpl desk,@Themes /Action:OpenTheme /file:"C:\WINDOWS\Resources\Themes\Windows Classic.theme"',"c:\windows", @SW_HIDE)
sleep(1000)

Send("{enter}")
 

[ani]

le theme est-il associé au fichier msstyle ?
regarde dans cette partie de la ruche (regedit) : HKEY_LOCAL_MACHINE\SOFTWARE\Microsoft\Windows\CurrentVersion\Themes

soit en passant par executer

Code : Tout sélectionner

cmd /k reg query "HKEY_LOCAL_MACHINE\SOFTWARE\Microsoft\Windows\CurrentVersion\Themes"

ou par ms-dos

Code : Tout sélectionner

reg query "HKEY_LOCAL_MACHINE\SOFTWARE\Microsoft\Windows\CurrentVersion\Themes"

dans la cmd au niveau de l'action il y a OpenTheme et OpenMSTheme.
je vais faire une recherche chez microsoft
car là je me souvient plus des manipulations

En ce qui concerne le bout de code il me semble correct, enfin bon j'ai pas testé pour confirmé la chose ^^'

[GELDROC]

jais essayer d'utiliser un fichier de registre mais cela ne fonctionne pas

mais peut-être que ces possible actualiser le registre enfin façon de parler

?

Code : Tout sélectionner

Windows Registry Editor Version 5.00


[HKEY_CURRENT_USER\Software\Microsoft\Windows\CurrentVersion\Policies\System]

"SetVisualStyle"="C:\\WINDOWS\\Resources\\Themes\\Windows Classic.theme"

[HKEY_LOCAL_MACHINE\SOFTWARE\Microsoft\Windows\CurrentVersion\ThemeManager]
"ThemeActive"="0"
 

[ani]

je suis pas certain de la ruche que tu propose, enfin bon vaut voir les expert.
Que te retourne la ruche dont je propose ?
sans manipulation visuel et avec tu verra les changements apporté au valeur de clé.

Voilà après réflection pourquoi ne pas faire appel directement au fichier classic.theme

Toute extension est associé à un programme, il faudra juste faire un run/shellexecute et d'un petit winwait sur la fenêtre et un controlclick ou controlcommand sur le bouton ok au lieu d'un send({enter})

Pour obtenir l'identifiant du controle à cliquer, utilisez le logiciel AU3Info
=>scite->outils->au3info (ou ctrl+F6)
Pour la fonction controlclick/controlcommand faut le titre de la fenêtre, qu'on obtiend aussi avec au3info même si çà ne sert pas

Bon je part tester pour confirmer si pas doit avoir la bibliothèque uxtheme qui sert certainement pour cette effet ?

Edit:apparement avec la commande run (sous autoit), le fonctionnement ne s'applique pas, pourtant sous ms-dos si je tape la commande desk.cpl desk,@Themes /Action:OpenTheme /file:"C:\WINDOWS\Resources\Themes\Windows Classic.theme" ou l'appel du fichier %windir%\Resources\Themes"\Windows Classic.theme" j'obtiend bien le panneau de configuration avec la selection (étrange quand meme)

Passe plutôt par un shellexecute
exemple

Code : Tout sélectionner

ShellExecute("Windows Classic.theme","",@WindowsDir & "\Resources\Themes\")

ou

Code : Tout sélectionner

ShellExecute("Windows Classic.theme","","c:\windows\Resources\Themes\")

Pour un run je passerai de cette manière de 1 çà evite le rundll32

Code : Tout sélectionner

run('control desk.cpl desk,@Themes /Action:OpenTheme /file:"C:\WINDOWS\Resources\Themes\Windows Classic.theme"')

Si tu désire rendre le panneau completement invisible, faut capturer le handle et de la on la passe en mode hide. désolé d'avoir énnoncé le mode hide pour run

pour l'identifiant c'est button3 pour OK
mais ne faut-il pas d'abord appliquer avant d'appuyer sur ce bouton OK ?
l'id d'appliquer c'est button5

Je rentre chez moi

[GELDROC]

demande au professionnel comment actualise Windows ou bien une session de Windows sans la fermer