vbs sendKeys 16進制的結(jié)合使用(打開IE，靜音，打開播放器等)

    看到demon.tw的文章，發(fā)現(xiàn)的sendkeys 16進制的效果，非常的不錯，喜歡的朋友可以參考下。
    代碼如下:
    Dim WshShell
    Set WshShell = CreateObject("Wscript.Shell")
    下面的每一行都是一個不錯的命令，請說出運行下列每個語句的效果。不要一次運行全部，逐個看效果。
    '打開IE
    'WshShell.SendKeys Chr(&H88AC)
    '系統(tǒng)靜音
    'WshShell.SendKeys Chr(&H88AD)
    'WshShell.SendKeys Chr(&H88AE)
    'WshShell.SendKeys Chr(&H88AF)
    'WshShell.SendKeys Chr(&H88B4)
    'WshShell.SendKeys Chr(&H88B5)
    'WshShell.SendKeys Chr(&H88B6)
    'WshShell.SendKeys Chr(&H88B7)
    結(jié)合使用打開IE，輸入www.jb51.net 回車
    代碼如下:
    Dim WshShell
    Set WshShell = CreateObject("Wscript.Shell")
    WshShell.SendKeys Chr(&H88AC)
    Wscript.Sleep 2000
    WshShell.SendKeys "www.jb51.net"
    WshShell.SendKeys "{enter}"
    讓系統(tǒng)靜音的代碼，將下面的代碼保存為1.vbs,雙擊運行即可。
    代碼如下:
    Dim WshShell
    Set WshShell = CreateObject("Wscript.Shell")
    WshShell.SendKeys Chr(&H88AD)
    剩下的自己研究吧，研究出來的朋友可以留言補充。
    一般來說SendKeys并不可靠，因為窗口焦點經(jīng)常難以預(yù)料和控制。AppActivate方法有時會導(dǎo)致窗口閃爍，然后無法再激活，且對未知窗口標題的程序更是沒有辦法。