Как узнать имена всех компьютеров, которые находятся в сети - VB
Формулировка задачи:
НАРОДИЧЕК!
Подскажите пож-ста! Как вывести в ComboBox имена всех компов локальной сети.
С уваженьицем Dan
removed@mail.ru
Решение задачи: «Как узнать имена всех компьютеров, которые находятся в сети»
textual
Листинг программы
- Set cClsData = CreateObject("svrAccess.clsAccess")
- vData = cClsData.GetComputerList(sDomen)
- Set cClsData = Nothing
- List1.Clear
- If IsEmpty(vData) = False Then
- For i = 1 To UBound(vData)
- List1.AddItem Trim$(vData(i)): List1.ItemData(List1.NewIndex) = i
- Next i
- List1.ToolTipText = "всего компьютеров в домене " & sDomen & " : " & UBound(vData)
- End If
ИИ поможет Вам:
- решить любую задачу по программированию
- объяснить код
- расставить комментарии в коде
- и т.д
