十年網(wǎng)站開(kāi)發(fā)經(jīng)驗(yàn) + 多家企業(yè)客戶 + 靠譜的建站團(tuán)隊(duì)
量身定制 + 運(yùn)營(yíng)維護(hù)+專業(yè)推廣+無(wú)憂售后,網(wǎng)站問(wèn)題一站解決
這篇文章主要為大家展示了“vbs如何實(shí)現(xiàn)判讀盤符被雙擊的腳本”,內(nèi)容簡(jiǎn)而易懂,條理清晰,希望能夠幫助大家解決疑惑,下面讓小編帶領(lǐng)大家一起研究并學(xué)習(xí)一下“vbs如何實(shí)現(xiàn)判讀盤符被雙擊的腳本”這篇文章吧。
復(fù)制代碼 代碼如下:
do while true
set WshShell = WScript.CreateObject("WScript.Shell")
IF WshShell.AppActivate("D:\") Then
MsgBox "ok"
wscript.quit
End If
loop
試都不要試,就知道這段代碼是錯(cuò)誤的。因?yàn)閃shShell.AppActivate考慮的是窗體的Caption中包含的字符或字符串,你用WshShell.AppActivate("D:\")這個(gè),就是說(shuō)窗體Caption里要包含"D:\"這個(gè)字符串。可你打開(kāi)D盤看看,是這樣的嗎?都是“本地磁盤(D:)”。如果有卷標(biāo),那更說(shuō)不準(zhǔn)。所以應(yīng)該寫成WshShell.AppActivate("(D:)"),考慮到內(nèi)存節(jié)約的問(wèn)題,應(yīng)該這樣寫:
set WshShell = WScript.CreateObject("WScript.Shell")
do
IF WshShell.AppActivate("(D:)") Then
MsgBox "ok"
wscript.quit
End If
loop
以上是“vbs如何實(shí)現(xiàn)判讀盤符被雙擊的腳本”這篇文章的所有內(nèi)容,感謝各位的閱讀!相信大家都有了一定的了解,希望分享的內(nèi)容對(duì)大家有所幫助,如果還想學(xué)習(xí)更多知識(shí),歡迎關(guān)注創(chuàng)新互聯(lián)行業(yè)資訊頻道!