2 votes

"Listen to device" Autohotkey a besoin d'un conseil pour finir

En toute honnêteté, je n'ai aucune idée de ce que je fais et j'aurais vraiment besoin d'aide. J'essaie d'activer et de désactiver l'option "Écouter le microphone" à l'aide de la touche "end" et de créer un raccourci sur le bureau. J'ai fait un peu de travail mais j'ai juste besoin d'aide pour terminer. Pour faire le processus manuellement, il faut

Panneau de configuration > Matériel et son > gérer les périphériques audio > enregistrement > Microphone (un seul dans la liste) > Propriétés > Écouter > Écouter ce périphérique .

Je fais ce processus au moins 15 fois par jour et ça me rend fou. Voici ce que j'ai jusqu'à présent

Exécuter, mmsys.cpl

WinWait,Sound

Envoyer, {CTRL DOWN}{TAB}{CTRL UP}

ControlSend,SysListView321,{Down}

ControlClick,&Propriétés

Propriétés de winwait

winwait mircophone properties

J'apprécierais vraiment toute aide

3voto

Sicco Points 31

Créez un fichier Toggle.ini et remplissez-le avec le nom du périphérique qui doit être activé et désactivé (case à cocher "Écouter ce périphérique")

Je l'ai compilé en un exe : Fonctionne parfaitement pour mon cas... Le PC (Windows 10) ne se mettait pas en veille ou en hibernation et les demandes de powercfg ne fonctionnaient pas alors j'ai fait ceci.

#SingleInstance
#NoTrayIcon

isExist:=WinExist("ahk_exe rundll32.exe ahk_class #32770")
Run, % "rundll32.exe shell32.dll,Control_RunDLL mmsys.cpl,,recording",,, uPID
WinWait, % "ahk_pid"uPID,, 1

WinWait,Sound

Send {CTRL DOWN}{Down}{CTRL UP}

ControlGet, List, List,, SysListView321, % "ahk_pid"uPID

FileRead, OutputVar, toggle.ini

Loop, Parse, List, `n
{
    IfInString, A_LoopField, %OutputVar%
    {
        ControlClick,&Properties
        Send {CTRL DOWN}{Tab}{CTRL UP}
        Send {Space}
        Send {Enter}
        break
    }
    else 
    {
        ControlSend,SysListView321,{Down}
    }
}

WinWait,Sound
Send {Esc}

ExitApp

J'espère que cela pourra aider quelqu'un...

0voto

liquidat Points 510
#KeyHistory, 0
ListLines, Off
SetBatchLines, -1

End::
   isExist:=WinExist("ahk_exe rundll32.exe ahk_class #32770")
   Run, % "rundll32.exe shell32.dll,Control_RunDLL mmsys.cpl,,recording",,, uPID
   WinWait, % "ahk_pid"uPID,, 1
   If Not ErrorLevel
   {
      SendInput, {Down}
      ControlClick, % "Button3", % "ahk_pid"uPID,,, 3
      WinWait, % "A"
      PostMessage, 0x1330, 1,, % "SysTabControl321", % "ahk_pid"uPID
      WinWait, % "A"
      ControlGet, isEnabled, Checked,, % "Button1", % "ahk_pid"uPID
      Control, % isEnabled ? "UnCheck":"Check",, % "Button1", % "ahk_pid"uPID
      ControlClick, % "Button9", % "ahk_pid"uPID,,, 3
      Process, Close, % uPID
   }
   IfEqual, ErrorLevel, % True, MsgBox, % 2621 (isExist ? 92:60)
                                      , % isExist ? "Info:":"Oops:"
                                      , % isExist ? "Close other window":"Something went wrong!"
                                      , % isExist ? 1.5:3
   KeyWait, % A_ThisHotkey
   Exit, uPID:=isEnabled:=isExist:=""

SistemesEz.com

SystemesEZ est une communauté de sysadmins où vous pouvez résoudre vos problèmes et vos doutes. Vous pouvez consulter les questions des autres sysadmins, poser vos propres questions ou résoudre celles des autres.

Powered by:

X