none
Подключение сетевых дисков RRS feed

  • Вопрос

  • Есть скрипт, который, помимо прочего, маппит сетевые папки.

    Например, строка - net use w: \\domain.name\DFS\share_name

    У юзера в "Мой комьютер" диск w: появляется, но название его выглядит именно так, как написано в скрипте, а именно

    share_name on 'domain.name\DFS' (W:)

    А как бы мне скрыть путь, на котором живет эта шара? И даже вместо ее имени (shate_name) чтоб юзер видел некое другое название, которое я (как админ) хочу дать этой папке?

    23 марта 2010 г. 15:20

Ответы

  • Добавьте в скрипт (естественно, vbs).

    mDrive = "W:\"
    Set oShell = CreateObject("Shell.Application")
    oShell.NameSpace(mDrive).Self.Name = "share_name"


    MCTS, STS, TCSP
    23 марта 2010 г. 15:45
  • легко:

    map_disk.vbs

     

    Set WshNetwork = CreateObject("WScript.Network")
    Set objShell = CreateObject("Shell.Application")
    On Error Resume Next

    'удаляем диск (а вдруг  захотим поменять таргет ?)
    wshNetwork.RemoveNetworkDrive "m:",true, true

    'аттачим
    wshNetwork.MapNetworkDrive "m:", "\\Domain_name\DFS_share_name"
    objShell.NameSpace("m:").Self.Name = "Общие документы"

     

    Не использовать GPP что-то не позволяет ?

    Причем в администрирование в разы легче, чет отлавливать ошибки - проблемы в скриптах.
    Я лично уже давно отказался по большей части от таких скриптов.... Трудозатраты больше, результат тот же.
    Тут описал наш коллега    и еще тут

     


    Если сообщение было информативным, отметьте его как правильный ответ. Сразу видно ответ на вопрос :-)
    • Предложено в качестве ответа Bakanov Denis 23 марта 2010 г. 15:48
    • Помечено в качестве ответа Vinokurov YuriyModerator 25 марта 2010 г. 7:45
    23 марта 2010 г. 15:45

Все ответы

  • Просто я видел, что такое возможно.

    А именно, шара в обозревателе выглядит как "ШАРА (W:)", а где она живет - и не видно...

    23 марта 2010 г. 15:32
  • Добавьте в скрипт (естественно, vbs).

    mDrive = "W:\"
    Set oShell = CreateObject("Shell.Application")
    oShell.NameSpace(mDrive).Self.Name = "share_name"


    MCTS, STS, TCSP
    23 марта 2010 г. 15:45
  • легко:

    map_disk.vbs

     

    Set WshNetwork = CreateObject("WScript.Network")
    Set objShell = CreateObject("Shell.Application")
    On Error Resume Next

    'удаляем диск (а вдруг  захотим поменять таргет ?)
    wshNetwork.RemoveNetworkDrive "m:",true, true

    'аттачим
    wshNetwork.MapNetworkDrive "m:", "\\Domain_name\DFS_share_name"
    objShell.NameSpace("m:").Self.Name = "Общие документы"

     

    Не использовать GPP что-то не позволяет ?

    Причем в администрирование в разы легче, чет отлавливать ошибки - проблемы в скриптах.
    Я лично уже давно отказался по большей части от таких скриптов.... Трудозатраты больше, результат тот же.
    Тут описал наш коллега    и еще тут

     


    Если сообщение было информативным, отметьте его как правильный ответ. Сразу видно ответ на вопрос :-)
    • Предложено в качестве ответа Bakanov Denis 23 марта 2010 г. 15:48
    • Помечено в качестве ответа Vinokurov YuriyModerator 25 марта 2010 г. 7:45
    23 марта 2010 г. 15:45
  • Спасибо, братья!

    Работает... :)

     

    23 марта 2010 г. 15:57