Utilisation de VBScript lors de la connection pour déterminer si powershell est installé

J'ai un mélange de machines Win7 et XP sur mon réseau. Chaque user se connecte à l'aide d'un script d'ouverture de session basé sur VBS et pour les clients qui le supportent, je souhaite afficher une window contextuelle d'information comme indiqué ici .

Comment puis-je détecter si Powershell est installé à l'aide de VBScript?

    Vous pouvez utiliser quelque chose comme le suivant. Il lit la key de registre pour PowerShell. Si la lecture est réussie (code de return 0) ou non, vous obtenez la boîte de message correspondante, que vous pouvez changer pour une autre logique que vous devez faire – comme installer PowerShell si elle n'est pas détectée. Consultez les liens sources ci-dessous pour plus d'informations.

    Option Explicit Dim oShell Dim value 'If the key isn't there when we try to read it, an error will be generated 'that we will later test for, so we want to automatically resume execution. On Error Resume Next '#Try reading the registry value Set oShell = CreateObject("WScript.Shell") value = oShell.RegRead("HKEY_LOCAL_MACHINE\SOFTWARE\Microsoft\PowerShell\1\") 'Catch the error If Err.Number = 0 Then 'Error code 0 indicates success MsgBox(Err.Number & "PowerShell is installed.") Else 'Any other error code indicates failure MsgBox(Err.Number & "PowerShell is NOT installed.") End If 

    VBScript pour vérifier le registre d'une application (exemple .NET): https://stackoverflow.com/questions/4394607/vbscript-to-check-if-net-2-0-installé

    Clés de registre pour vérifier PowerShell: http://blogs.msdn.com/b/powershell/archive/2009/06/25/detection-logic-poweshell-installation.aspx