以下は、5 分ごとにマウスの中ボタンをクリックすることを実装する VBScript スクリプトです。
Set objShell = CreateObject("WScript.Shell")
Do
WScript.Sleep(300000) ' 延时5分钟
objShell.SendKeys("{MIDDLEBUTTON}") ' 模拟鼠标中键点击
Loop
次に、VBScript スクリプト コンパイラを使用して、上記のスクリプトを実行可能ファイルのみにコンパイルできます。
手順は次のとおりです。
-
メモ帳などのテキスト エディタを開き、上記の VBScript コードをコピーします。
-
ファイルを「mouse_click.vbs」として保存します。(ここで使用できます。exe ファイルにパッケージ化する方法は次のとおりです)
-
VBScript コンパイラをダウンロードしてインストールします。コンパイラは次のリンクからダウンロードできます: https://www.vbsedit.com/download
-
VBScript コンパイラを開き、[ファイル] メニューの [開く] を選択し、上記で保存した「mouse_click.vbs」ファイルを見つけて開き、編集します。
-
「コンパイル」をクリックし、保存ファイルのパスとファイル名を選択し、「ファイルの種類」で「実行可能ファイル」(または「.exe」)を選択し、「保存」ボタンをクリックします。
このようにして、実行可能ファイルのみが生成され、マウスの中ボタンが 5 分ごとにクリックされて、コンピューターのロック画面や企業の WeChat が回避されます。