IT-Expert
  IT-Expert / Веблог / Правильный скрипт подключения сетевого диска
Авторизация
Логин:
Пароль:


 
Поиск по записям:

Ключевые слова:
Записей в блоге
 за 2023 год
 за 2022 год
 за 2021 год
 за 2015 год
 за 2014 год
 за 2013 год
 за 2012 год
 за 2011 год

     за 2010 год

       за 2009 год
       за 2008 год
       за 2007 год
       за 2006 год
       за 2005 год
      RSS лента Лента новостей IT-Expert 

      Правильный скрипт подключения сетевого диска

      11:48, 20 апреля 2007 ( Microsoft Administration  )

      Выглядит так:

      Set objNetwork = CreateObject("WScript.Network")
      Set oDrives=objNetwork.EnumNetworkDrives
      mydrv = "U:"
      mapped = false
      myshare = "\\it\dfs"
      For i = 0 to oDrives.Count - 1 Step 2
      '      WScript.Echo "Drive " & oDrives.Item(i) & " = " & oDrives.Item(i+1)
            If oDrives.Item(i)=mydrv Then mapped = true
      Next
      'WScript.echo "mapped = " & mapped
      If Not mapped Then objNetwork.MapNetworkDrive mydrv, myshare
       

      Скрипт подключит сетевой диск \\it\dfs к букве U:, скрипт хорош тем, что проверяет, возможно по каким-то причинам диск уже был однажды подлючен, ошибки в этом случае не произойдет.

      Скачать скрипт.
      Оставить комментарий
      © Максим Прокопов 2005-2024 О сервере