1 Тема от IvanB

  • IvanB
  • Участник
  • Неактивен

Тема: VBS: Получение списка локальных дисков клиента в терминале

Привет всем!
Имеется Win2003R2 терминальный сервер. Рабочая группа, без AD. Клиенты подключаются с правами "Пользователи удалённого рабочего стола".
При входе на сервер по RDP, к сессии клиента подключаются его локальные диски.
В "Мой компьютер" они отаброжаются как "С на Комп1", "D на Комп1" и т.д.
Подскажите пожалуйста, как на сервере, в сессии клиента, скриптом получить список этих дисков.

2 Ответ от alexii

  • alexii
  • Разработчик
  • Неактивен

Re: VBS: Получение списка локальных дисков клиента в терминале

IvanB, эти диски напрямую доступны как сетевые: «\\tsclient\c$» и т.д.

Как получить — смогу попробовать, когда доберусь до терминала.

3 Ответ от IvanB

  • IvanB
  • Участник
  • Неактивен

Re: VBS: Получение списка локальных дисков клиента в терминале

alexii пишет:

IvanB, эти диски напрямую доступны как сетевые: «\\tsclient\c$» и т.д.

Как получить — смогу попробовать, когда доберусь до терминала.

То, что они доступны как сетевые, я знаю. Но вот как их скриптом достать?
Уже все классы посмотрел - нигде найти не могу.

4 Ответ от alexii

  • alexii
  • Разработчик
  • Неактивен

Re: VBS: Получение списка локальных дисков клиента в терминале

IvanB, я добрался до терминала, держите:

Option Explicit

Dim i

With WScript.CreateObject("WScript.Network").EnumNetworkDrives()
  For i = 0 to .Count - 1 Step 2
    WScript.Echo "Drive: [" & .Item(i) & "] mapped into UNC: [" & .Item(i + 1) & "]"
  Next
End With

WScript.Quit 0

Примерный результат:

Drive: [] mapped into UNC: [\\TSCLIENT\C]
Drive: [] mapped into UNC: [\\TSCLIENT\E]
Drive: [] mapped into UNC: [\\TSCLIENT\Q]
Drive: [] mapped into UNC: [\\TSCLIENT\T]

5 Ответ от IvanB (изменено: IvanB, 2012-06-04 06:03:59)

  • IvanB
  • Участник
  • Неактивен

Re: VBS: Получение списка локальных дисков клиента в терминале

alexii, спасибо.