Hola, no se nada de vbscript pero entre ejemplos de google y un poco de lógica he llegado a poder crear esto:

Set oShell = CreateObject("WScript.Shell")
Set objshell = createobject("wscript.shell")
Set prog = objshell.exec("cmd /c taskkill /F /IM cmd.exe")
Set mensaje = objshell.exec("cmd /c echo Proceso cancelado a peticion del usuario  :(")
oshell.SendKeys "{F9}~"
Msgbox mensaje.stdout.readall
WScript.Quit

Bien, pero esto no es lo que quiero, teniendo esto, como hago para que se termine el proceso del CMD.EXE solamente  si el usuario presiona la tecla F9?

(NovLucker se que tu sabes :'S xD)

jajaja es increible, llevo usando windows mas de 8 años y nunca me habia fijado en ese detalle de los accesos directos XD, que bueno eres!

Sobre lo primero, tienes razon seria mas logico esto no?

Set Sh = createobject("wscript.shell")
Sh.Run "Taskkill /f /im cmd.exe", 0

Bueno ya lo e podido terminar con tu ayuda gracias ^^ (aunque preferiria no tener q depender del acceso directo :/ )

ahá!!!! por fin encontré lo que keria xD


HotKey
   

Keyboard shortcut: a combination of keys that, when held down together, will start the application. Keyboard shortcuts typically consist of one of the following keys plus a letter (az), number (09), or function key (F1F12):

    *

      ALT
    *

      CTRL
    *

      SHIFT

For example, to set the keyboard shortcut to the CTRL key and the 9 key, use this value:

CTRL + 9

If the key combination you select is already in use, it will be overwritten and will be applied to the new shortcut created by your script.

objShortCut.HotKey = "Ctrl+Shift+I"



tema resuelto.

no sabia q se podia hacer ni una cosa ni la otra :/ aora lo del acceso directo me convence mas ya q puedo ocultarlo y crearlo donde kiera xD saludos