Как получить все имена компьютеров в сети Ad-Hoc в VB 6?

Question

У меня есть поле со списком и командная кнопка в моей форме. Как заполнить список со всеми именами компьютеров, подключенных к специальной сети?

Answer 1

К сожалению, нет простого способа сделать это. API задокументирован по следующему адресу:

http://msdn.microsoft.com/en-us/library/ms706584(v=VS.85).aspx

Корень документации для беспроводной сети находится по адресу:

http://msdn.microsoft.com/en-us/library/ms706556(v=VS.85).aspx

В нем говорится, что документация предназначена для программистов на C / C ++. Для создания кода на VB, который может взаимодействовать с ним, потребуется много знаний о COM.

Единственный способ, который я могу предложить, - найти утилиту командной строки, которая выводит эту информацию и анализирует ее вывод.

Answer 2

вау, это очень утомительно в VB , но вы также можете получить все имена компьютеров в вашей специализированной сети или любой другой сети, используя команду подскажите .с помощью:

net view /all

, чтобы получить имена в приложении vb, вы можете направить вывод команды выше в текстовый файл с помощью:

net view /all >>names.txt

в VB , который будет

shell("net view /all >> names.txt")

, затем прочитайте в текстовом файле, используя VB

Answer 3

Прошло очень много времени с тех пор, как я что-то делал с VB6, но я могу вспомнить, что перечисление компьютеров в локальной сети проходило примерно так: this.