2012年8月5日日曜日

Microsoft AppLocale Utility VBS 啟動範本

本來是用登錄檔做成右鍵選單
只是後來覺得雙擊還是比較方便使用

Set WshShell = WScript.CreateObject("WScript.Shell")
Dim argument(2)
argument(0) = "C:\Windows\AppPatch\AppLoc.exe"
argument(1) = "" 'application path(執行程式的完整路徑和檔名)
argument(2) = "" 'taiwan(/L0404),prc(/L0804),japan(/L0411),korea(/L0412) (想要執行的語系)
Return = WshShell.Run(argument(0) &Chr(32) _
                     &argument(1) &Chr(32) _
                     &argument(2) , 1, true)

0 件のコメント: