[plata]

Originariamente inviato da plata

Scusa, avevo erroneamente frainteso il backspace con spacebar, che funge da click sinistro mouse. Alla fine questo è quello corretto e quindi funziona:

Set WshShell = CreateObject("WScript.Shell")
WshShell.Run """C:\Program Files\ASUS Essence STX II Audio Device\Customapp\AsusAudioCenter.exe""", 3, True
WshShell.SendKeys " "
WScript.Sleep 1000
WshShell.SendKeys "{ESCAPE}"

Ne ho creati due (SVN On e SVN Off) a chiusura di foobar tramite orario con scheduler. Sai però come avviarlo automaticamente ad ogni avvio di foobar? Altrimenti li avvio tramite pianificazione eventi di Windows.

Una cosa: nel caso abbia smanettato nella console, gli sendkey impartiti dal batch risulteranno inefficaci, quindi, l'unica soluzione pratica che mi viene in mente è quella di resettarla killare il servizio C:\Program Files\ASUS Essence STX II Audio Device\Customapp\AsusAudioCenter.exe dal batch per poi riavviarlo. Come fare?

Dopo diverse modifiche sono giunto alla stringa finale, finalmente funzionante (vanno regolati i valori di sleep, aggiunto il keystroke ESCAPE e tolta la funzione ",3, True"), ma vorrei onde possibile evitare la duplicazioni dell'icona nella tray accanto all'orologio Window, magari impartendo un comando di mouse hover, altrimenti va già bene così.

Infine, se qualcuno sa come far avviare il batch ad ogni avvio di foobar, nel caso il PC era rimasto spento, lo ringrazio.

Dim oShell : Set oShell = CreateObject("WScript.Shell")
oShell.Run "taskkill /f /im AsusAudioCenter.exe"
WScript.Sleep 600

set WshShell = createobject("WScript.Shell")
WshShell.Run """C:\Program Files\ASUS Essence STX II Audio Device\Customapp\AsusAudioCenter.exe"""
WScript.Sleep 600

WshShell.SendKeys "{ESCAPE}"
WshShell.Run """C:\Program Files\ASUS Essence STX II Audio Device\Customapp\AsusAudioCenter.exe""", 3, True
WshShell.SendKeys "{RIGHT}"
WshShell.SendKeys " "
WScript.Sleep 1000
WshShell.SendKeys "{ESCAPE}"