@DIV
@echo off
REM メモ帳強制終了用のスクリプトを作成
echo Wscript.Sleep 500 > %TEMP%\test.vbs
echo Set WshShell = WScript.CreateObject("WScript.Shell") >> %TEMP%\test.vbs
echo WshShell.SendKeys "%%(N)" >> %TEMP%\test.vbs
REM メモ帳を実行して、クリップボードの内容を貼り付けます。
FOR /F %%i IN ('run_and_win_handle.exe notepad.exe') DO (
postmessage.exe %%i 273 770 0
)
FOR /F %%i IN ('run_and_win_handle.exe notepad.exe') DO (
postmessage.exe %%i 273 770 0
)
FOR /F %%i IN ('run_and_win_handle.exe notepad.exe') DO (
postmessage.exe %%i 273 770 0
)
REM 終了確認に応答して全てのメモ帳を終了させる
:do_next
FOR /F %%i IN ('findwindow.exe "無題 - メモ帳"') DO (
if "%%i"=="0" (
goto end
)
postmessage.exe %%i 16 0 0
foreground.exe %%i
cscript.exe %TEMP%\test.vbs
goto do_next
)
:end
@END |