以下の同じコードを使用して、必要な機能を追加するためにいくつかの小さな変更を加えることができるかどうかを知りたいです。それが書かれている方法:
::::Set WshShell = CreateObject("WScript.Shell")
::::WshShell.SendKeys "{capslock}"
Set WshShell = Nothing
findstr "^::::" "%~sf0" > temp.vbs & Cscript //nologo temp.vbs & del temp.vbs
echo Capslock is off
結果 :
- すでにオフになっている場合は、CAPSONをアクティブにします
- すでにオンになっている場合は、CAPSOFFをアクティブにします
常にOFFに変更したいのですが。コードでこのわずかな修正を行うにはどうすればよいですか?
ありがとう