vbscriptheadphonesaudio-device

Detect if headphones are plugged in or not via VBScript


Is any a way to detect if headphones are plugged in or not via VBScript?

This link doesnt help Switching current active sound device using VBScript?


Solution

  • You should be able to use the Win32_SoundDevice WMI class. Here is a sample script that might be a good starting point:

    strComputer = "."
    Set objWMIService = GetObject("winmgmts:\\" & strComputer & "\root\cimv2")
    Set colItems = objWMIService.ExecQuery("Select * from Win32_SoundDevice",,48)
    For Each objItem in colItems
        Wscript.Echo "Availability: " & objItem.Availability
        Wscript.Echo "Caption: " & objItem.Caption
        Wscript.Echo "Description: " & objItem.Description
        Wscript.Echo "Name: " & objItem.Name
        Wscript.Echo "Status: " & objItem.Status
        Wscript.Echo "StatusInfo: " & objItem.StatusInfo
    Next
    

    (source)

    I would do some comparison runs before and after plugging in your headphones and go from there.