Запуск VPN и RDP
// для тех кто часто работает с RDP
ПутьVPN = "C:\Program Files (x86)\Cisco\Cisco AnyConnect Secure Mobility Client\vpnui.exe";
ПутьRDP = "D:\Работа.rdp";
Если (Файлы.Есть(ПутьVPN)=0) Тогда
Сообщить("Не найдена программа для VPN", ПутьVPN);
Возврат;
КонецЕсли;
Если (Файлы.Есть(ПутьRDP)=0) Тогда
Сообщить("Не найден настроенный RDP", ПутьRDP);
Возврат;
КонецЕсли;
П = "123"; // здесь пароль
Запустить(ПутьVPN);
Подождать(8);
Окна.Активизировать("Cisco AnyConnect Secure Mobility Client");
Подождать(4);
Нажать(Клавиши.Ввод);
Подождать(8);
Ввести(П);
Подождать(1);
Нажать(Клавиши.Ввод);
Подождать(8);
Запустить(ПутьRDP);
Подождать(6);
Ввести(П);
Подождать(1);
Нажать(Клавиши.Ввод);