Visual Basic Script




Глава 5_2_ Сетевые диски



     5.2. Сетевые диски

        Для работы с сетевыми дисками Windows Script Host предоставляет несколько методов, которые позволяют получать сведения о подключенных сетевых дисках, подключать сетевые диски и отключаться от них.

        EnumNetworkDrives - возвращает список подключенных сетевых дисков.

         Синтаксис:

         objDrives = object.EnumNetworkDrive

         где

         object - объект WshNetwork

         objDrives - переменная, которой присваивается ссылка на коллекцию сетевых дисков

         VBScript:

    Dim WshNetwork, Drives
    Set WshNetwork = WScript.CreateObject("WScript.Network")
    Set Drives = WshNetwork.EnumNetworkDrives
    WScript.Echo "Подключены сетевые диски: "
    For i = 0 to Drives.Count - 1 Step 2
    WScript.Echo "Диски " & Drives.Item(i) & " = " & Drives.Item(i+1)
    Next
 

         JScript:

         var WshNetwork = new ActiveXObject("WScript.Network");
    var Drives = WshNetwork.EnumNetworkDrives();
    WScript.Echo("Подключены сетевые диски: ");
    for(i=0; i<Drives.Count(); i+=2)



Содержание  Назад  Вперед