Help with Speech Recognition Macros

[Casual Degeneracy]

Hello. I recently started trying to make speech recognition macros on my pc to create a jarvis like system. Right now im stuck on one using music. This is the macro:


<speechMacros>
<command>

<listenFor>Play Dubstep 1</listenFor>

<script language='VBScript'>
<![CDATA[
Dim WshShell
set WshShell = CreateObject("Wscript.Shell")
music = "C:\Users\George Limberis\Documents\Music\Dubstep.mp3"
WshShell.Run "wmplayer """ & music & """",0,True
Wscript.quit
]]>
</script>

</command>
</speechMacros>


Could someone please give me a macro for pausing the music and closing media player?
Thank you.