VBSを利用した自動的にスクリーンセーバーが起動しない対応「5分後にスクリーンセーバーが自動的に起動する」「スクリーンセーバーのOFF設定がない」環境向けにオススメです。 ソースコード この例では3.5分毎に「Shift」キーを自動的に押すことでスクリーンセーバー画面に移らないようにしています。 Set objShell = WScript.CreateObject("WScript.Shell") Do ' WScript.Echo "Shiftを押す" WScript.Sleep 1000*60*3.5 objShell.SendKeys "+" Loop 上記をファイルに保存して、保存したファイルをダブルクリックすれば動作します。 無限ループの止め方は、次のように行います cscriptで実行したときは[Ctrl]+[C]を押す wscriptで実行したときはタスクマネージャーから選択 キー情報の一覧 上記の例では「Shift」キーでしたが
