Макрос Excel VBA для подключения нескольких сеансов удаленного рабочего стола на одном ПК
806
Omar Wd
У меня есть несколько сеансов удаленного рабочего стола на одном компьютере (с разными именем пользователя и паролем для каждого сеанса), и я хочу подключаться к ним последовательно и запускать макрос в каждом сеансе, я использую приведенный ниже код для подключения к каждому сеансу, но он всегда открыт последний сеанс, который я открыл, я сохранил IP-адрес сервера в столбце B и имя пользователя сеанса в столбце C и пароли в столбце D
Sub open_RDP() Dim RetVal As Variant For a = 2 To 3 Target = Cells(a, 2) user = Cells(a, 4) pass = Cells(a, 5) RetVal = Shell("cmdkey /generic:""" & Target & """ /user:""" & user & """ /pass:""" & pass & """", 1) RetVal = Shell("c:\Windows\System32\mstsc.exe /admin /v:" & Target, 1) Next a
0 ответов на вопрос
Похожие вопросы
-
13
Как получить новую сессию браузера при открытии новой вкладки или окна в Firefox / Chrome?
-
8
Как предотвратить сжатие панели задач при использовании удаленного рабочего стола?
-
3
Мой файл заблокирован в Excel 2007, что происходит?
-
-
3
Почему я не могу подключиться к своему Windows 7 через удаленный рабочий стол?
-
2
Есть ли способ заставить Excel 2007 автоматически восстанавливать фоновые файлы, как в MS Word?
-
11
Удаленный рабочий стол, нажав клавишу Windows случайно
-
1
Excel Word Wrap + исчезающий текст
-
1
Простое объединение / очистка с помощью Excel
-
7
Как вы поддерживаете Microsoft Excel на полной скорости, даже если у него нет фокуса окна?
-
8
Как я могу удаленный рабочий стол из Windows XP в Windows Vista?