Prüfen ob Computer oder Laptop – Script

In manchen Umgebungen ist es notwendig zu überprüfen, ob es sich um einem Computer oder Laptop handelt. Zum Beispiel wird auf Laptops ein VPN Client installiert, auf einem normalen Desktop PC nicht. Dies ist am einfachsten mit einem VB Script (VBS) zu erledigen. Um welches Gerät es sich handelt, wird euch ausgegeben. Es wird lediglich überprüft, ob das System einen Akku hat, oder nicht.

Pexels / Pixabay

Computer oder Laptop prüfen – Script

Das ist hier die Frage. Aber im Endeffekt ist das ganz einfach. Lediglich wird überprüft, ob das System eine “Batterie” / einen Akku hat. Wenn ja, kann es nur ein Mobilgerät sein.

CheckComputerOrLaptop.vbs

' SYNOPSIS:     Computer oder Laptop pruefen - VBS
' DESCRIPTION:  Script prueft, ob es sich um Computer oder Laptop handelt.
' VERSION:      1.0
' AUTHOR:       www.ITnator.net | Johannes Huber
' CREATED:      18.08.2018


If IsLaptop( "." ) Then
    WScript.Echo "System ist ein Laptop"
Else
    WScript.Echo "System ist ein Desktop oder Server"
End If


Function IsLaptop( myComputer )
    On Error Resume Next
    Set objWMIService = GetObject( "winmgmts://" & myComputer & "/root/cimv2" )
    Set colItems = objWMIService.ExecQuery( "Select * from Win32_Battery" )
    IsLaptop = False
    For Each objItem in colItems
        IsLaptop = True
    Next
    If Err Then Err.Clear
    On Error Goto 0
End Function

Mit dem Ausführen des VB Script könnt ihr nun ganz einfach überprüfen, ob es sich um einen Computer oder Laptop handelt 🙂

Hier findet ihr weitere VB Scripts: