Déplacer et paramétrer la barre des taches / le menu démarrer et explorateur

Télécharger le projet
Commenter

Description

Ce script VBS a pour but premier de placer automatiquement le menu Démarrer / Barre des tâches sur le bord supérieur de l'écran.

Après de longues recherches et un peut par hasard, j'ai enfin trouvé le moyen de placer automatiquement le Menu Démarrer en haut de l'écran tout en bloquant ses propriétés à l'utilisateur.

Par la même occasion, le paramétrage par défaut de l'explorateur et autres est traité.

Source / Exemple : 


Const HKEY_CURRENT_USER = &H80000001
 Dim oReg, ValeurCle, WshShell

  'Gestion position et paramèters du menu démarrer
  Set oReg = GetObject("winmgmts:{impersonationLevel=impersonate}!\\.\root\default:StdRegProv")
  'Lecture dans la base de registre
  oReg.GetBinaryValue HKEY_CURRENT_USER, "Software\Microsoft\Windows\CurrentVersion\Explorer\StuckRects2", "Settings", ValeurCle

  Set WshShell = CreateObject("WScript.Shell")
  'Paramètres globaux
  WshShell.Run "REGEDIT /S Bases.reg", 1, True
    
  If ValeurCle(8) <> &H0 Or ValeurCle(12) <> &H1 Then
    'Paramètres
    ValeurCle(8) = &H0  'Paramètres d'affichage
    ValeurCle(12) = &H1 'Position de la barre des tâches 0:Gauche, 1:Haut, 2:Droite, 3:bas
  
    'Inscription dans la base de registre
    oReg.SetBinaryValue HKEY_CURRENT_USER, "Software\Microsoft\Windows\CurrentVersion\Explorer\StuckRects2", "Settings", ValeurCle
    Set oReg = Nothing

    'Terminaison du processus Explorer pour redémarrage avec nouveau paramètres
    For Each Process In GetObject("winmgmts:").ExecQuery("select * from Win32_Process where name='explorer.exe'")
      Process.Terminate (0)
    Next
    WshShell.Run "EXPLORER", 3, False
  End If

Conclusion :


Petite remarque : Joint le fichier des paramètres (Bases.reg) de base à personnaliser à souhait.

Merci de me laisser vos commentaires.

++

MS1969
Télécharger le projet

Codes Sources

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.