Пакетный файл удерживайте клавишу Shift для подсветки

Question

мы запускаем WinSQL с операторами начала и конца DB2.У нас есть несколько скриптов в одном файле.Мне было интересно, есть ли способ удерживать Shift с помощью SendKeys, чтобы использовать стрелки вправо / вниз, чтобы выделить текст, который я хочу запустить.Нужна ли петля?И как мне сделать 5-секундную задержку до ее запуска, чтобы я мог переключать окна при запуске?Я попытался:

set /P "=Wait and send a command: " < NUL
ping -n 1 -w 1 127.0.0.1 > NUL
%SendKeys% "^{RIGHT}"

для выделения несколько раз, но он забывает о клавише Shift и просто перемещается вправо несколько раз.

Спасибо

Answer 1

Попробуйте это для ваших sendkeys.

Пример

%SendKeys% "+{right}"

^ для клавиши CTRL, а не shift.

Затем для задержки попробуйте команду cmd timeout /t 5

С другой стороны, поскольку вы также используете vbs, вы также можете использовать это для переключения окон.

Dim ObjShell :Set ObjShell = CreateObject("Wscript.Shell")
ObjShell.AppActivate("Notepad")