Определение имен компов в локалке

Программирование на Visual Basic, главный форум. Обсуждение тем программирования на VB 1—6.
Даже если вы плохо разбираетесь в VB и программировании вообще — тут вам помогут. В разумных пределах, конечно.
Правила форума
Темы, в которых будет сначала написано «что нужно сделать», а затем просьба «помогите», будут закрыты.
Читайте требования к создаваемым темам.
AjaxVS
Постоялец
Постоялец
 
Сообщения: 506
Зарегистрирован: 01.12.2004 (Ср) 13:12
Откуда: Donetsk, Battle.Net

Определение имен компов в локалке

Сообщение AjaxVS » 19.10.2005 (Ср) 11:49

Собственно, сабж... Прошу код для определения имен компов, подключенных по локалке...
Знаю, что на делается на WMI, но как?

Brusco
Обычный пользователь
Обычный пользователь
 
Сообщения: 50
Зарегистрирован: 22.10.2004 (Пт) 3:16
Откуда: Reutov, Russia

Сообщение Brusco » 20.10.2005 (Чт) 3:22

Примерчик - получение имени сети, рабочих групп и компов в них. Только если локалки нет прога виснет (зацикливается) :)
Вложения
computerlist.rar
(17.24 Кб) Скачиваний: 125

AjaxVS
Постоялец
Постоялец
 
Сообщения: 506
Зарегистрирован: 01.12.2004 (Ср) 13:12
Откуда: Donetsk, Battle.Net

Сообщение AjaxVS » 24.10.2005 (Пн) 10:50

Не, ну нормально?
Скачано уже 10 раз... И никто ничего не может добавить от себя?[/b]

Antonariy
Повелитель Internet Explorer
Повелитель Internet Explorer
Аватара пользователя
 
Сообщения: 4824
Зарегистрирован: 28.04.2005 (Чт) 14:33
Откуда: Мимо проходил

Сообщение Antonariy » 24.10.2005 (Пн) 13:00

От себя:
RTFM!
Лучший способ понять что-то самому — объяснить это другому.

SeT
Постоялец
Постоялец
Аватара пользователя
 
Сообщения: 362
Зарегистрирован: 29.12.2004 (Ср) 13:11

Сообщение SeT » 24.10.2005 (Пн) 15:37

не 10 а 14
01000100
Причиняет боль 0010
Виртуальная любовь 00100
Индустрия снов 0010

Brusco
Обычный пользователь
Обычный пользователь
 
Сообщения: 50
Зарегистрирован: 22.10.2004 (Пт) 3:16
Откуда: Reutov, Russia

Сообщение Brusco » 24.10.2005 (Пн) 15:56

AjaxVS писал(а):Не, ну нормально?
Скачано уже 10 раз... И никто ничего не может добавить от себя?[/b]

А что добавлять-то :)
Работает ведь...

Sirik
Perspicaz
Perspicaz
Аватара пользователя
 
Сообщения: 2280
Зарегистрирован: 19.02.2004 (Чт) 16:09
Откуда: Бердичев, Украина

Сообщение Sirik » 25.10.2005 (Вт) 8:12

у меня с сетью всё ок, результат: твоя программа задумалась минут на ...
Состояний же любви — десять: любовный взгляд, привязанность в мыслях, рождение желания, бессонница, исхудание, отвращение к предметам восприятия, утрата стыда, безумие, потеря сознания и смерть — вот их признаки

Antonariy
Повелитель Internet Explorer
Повелитель Internet Explorer
Аватара пользователя
 
Сообщения: 4824
Зарегистрирован: 28.04.2005 (Чт) 14:33
Откуда: Мимо проходил

Сообщение Antonariy » 25.10.2005 (Вт) 9:32

Судя по объему (не качал) этот пример производит инспекцию всей сети включая принтеры и расшаренные ресурсы, а на это тратится львиная доля времени. Что мешает убрать лишнее? Кроме того, можно поискать в сети пример под названием NetBrowse, он перечисляет только компьютеры, меньше, чем за секунду.
Лучший способ понять что-то самому — объяснить это другому.

Viper
Артефакт VBStreets
Артефакт VBStreets
Аватара пользователя
 
Сообщения: 4394
Зарегистрирован: 12.04.2005 (Вт) 17:50
Откуда: Н.Новгород

Сообщение Viper » 25.10.2005 (Вт) 11:09

Народ, а чем вам функция NetServerEnum для определния имен компов в локальной сети не подходит? Возвращает то что запросишь, работает быстро
Весь мир матрица, а мы в нем потоки байтов!

Sirik
Perspicaz
Perspicaz
Аватара пользователя
 
Сообщения: 2280
Зарегистрирован: 19.02.2004 (Чт) 16:09
Откуда: Бердичев, Украина

Сообщение Sirik » 25.10.2005 (Вт) 11:50

нет, ресурсы она не сканирует, хотя и может
+ имеет ряд приятных функций
Состояний же любви — десять: любовный взгляд, привязанность в мыслях, рождение желания, бессонница, исхудание, отвращение к предметам восприятия, утрата стыда, безумие, потеря сознания и смерть — вот их признаки

Brusco
Обычный пользователь
Обычный пользователь
 
Сообщения: 50
Зарегистрирован: 22.10.2004 (Пт) 3:16
Откуда: Reutov, Russia

Сообщение Brusco » 26.10.2005 (Ср) 1:09

Sirik писал(а):у меня с сетью всё ок, результат: твоя программа задумалась минут на ...


Ну во-первых прога не моя, т.е. не я писал, а скачал с какого-то сайта (не помню с какого) :) .
А во-вторых - проверял у нас в универе, прога выдала все компы сети по рабочим группам, причём очень быстро :!:

alibek
Большой Человек
Большой Человек
 
Сообщения: 14205
Зарегистрирован: 19.04.2002 (Пт) 11:40
Откуда: Russia

Сообщение alibek » 26.10.2005 (Ср) 7:57

Sirik писал(а):у меня с сетью всё ок, результат: твоя программа задумалась минут на ...

Значит не все в порядке.
WINS и DNS настроены правильно?
Lasciate ogni speranza, voi ch'entrate.

Ennor
Конструктивный критик
Конструктивный критик
 
Сообщения: 2504
Зарегистрирован: 18.12.2001 (Вт) 3:58
Откуда: Калуга -> Москва

Сообщение Ennor » 26.10.2005 (Ср) 8:14

При чем тут DNS? Скорее уж NetBIOS over TCP/IP.

alibek
Большой Человек
Большой Человек
 
Сообщения: 14205
Зарегистрирован: 19.04.2002 (Пт) 11:40
Откуда: Russia

Сообщение alibek » 26.10.2005 (Ср) 8:16

Обычно он во всех бедах виноват :)
Если сетка на основе W2k тормозит, то чаще всего дело в DNS.
Если используется Windows 9x и NT4, то скорее всего не поднят WINS.
А может и NetBIOS.
Lasciate ogni speranza, voi ch'entrate.

Sirik
Perspicaz
Perspicaz
Аватара пользователя
 
Сообщения: 2280
Зарегистрирован: 19.02.2004 (Чт) 16:09
Откуда: Бердичев, Украина

Сообщение Sirik » 26.10.2005 (Ср) 9:00

в сетки в основном компы на 9x и Me, единственный мой notebook на XP Home.

DNS настроен правильно, WINS вобще отключён
Состояний же любви — десять: любовный взгляд, привязанность в мыслях, рождение желания, бессонница, исхудание, отвращение к предметам восприятия, утрата стыда, безумие, потеря сознания и смерть — вот их признаки

alibek
Большой Человек
Большой Человек
 
Сообщения: 14205
Зарегистрирован: 19.04.2002 (Пт) 11:40
Откуда: Russia

Сообщение alibek » 26.10.2005 (Ср) 9:01

Sirik писал(а):WINS вобще отключён

Вот потому и тормозит.
Lasciate ogni speranza, voi ch'entrate.

Sirik
Perspicaz
Perspicaz
Аватара пользователя
 
Сообщения: 2280
Зарегистрирован: 19.02.2004 (Чт) 16:09
Откуда: Бердичев, Украина

Сообщение Sirik » 26.10.2005 (Ср) 9:05

да, но почему мой пример не тормозит, а показывает все компы отлично?
Состояний же любви — десять: любовный взгляд, привязанность в мыслях, рождение желания, бессонница, исхудание, отвращение к предметам восприятия, утрата стыда, безумие, потеря сознания и смерть — вот их признаки

alibek
Большой Человек
Большой Человек
 
Сообщения: 14205
Зарегистрирован: 19.04.2002 (Пт) 11:40
Откуда: Russia

Сообщение alibek » 26.10.2005 (Ср) 9:13

Я твой пример не видел.
Видимо, он не использует WNet* функции.
Lasciate ogni speranza, voi ch'entrate.

Sirik
Perspicaz
Perspicaz
Аватара пользователя
 
Сообщения: 2280
Зарегистрирован: 19.02.2004 (Чт) 16:09
Откуда: Бердичев, Украина

Сообщение Sirik » 26.10.2005 (Ср) 9:34

вот смотри http://bbs.vbstreets.ru/viewtopic.php?t=20337
только это недоделаная версия программы
Состояний же любви — десять: любовный взгляд, привязанность в мыслях, рождение желания, бессонница, исхудание, отвращение к предметам восприятия, утрата стыда, безумие, потеря сознания и смерть — вот их признаки

alibek
Большой Человек
Большой Человек
 
Сообщения: 14205
Зарегистрирован: 19.04.2002 (Пт) 11:40
Откуда: Russia

Сообщение alibek » 26.10.2005 (Ср) 9:43

Sirik, у меня твоя программа ничего не показала.
Правда у тебя тоже используется WNet* (Windows Network).
Не знаю, это уже надо детально разбираться. Возможно в данном примере неправильно сделан опрос сети, из-за чего срабатывает рекурсия на каждом элементе сети.
Lasciate ogni speranza, voi ch'entrate.

Sirik
Perspicaz
Perspicaz
Аватара пользователя
 
Сообщения: 2280
Зарегистрирован: 19.02.2004 (Чт) 16:09
Откуда: Бердичев, Украина

Сообщение Sirik » 26.10.2005 (Ср) 9:47

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

AjaxVS
Постоялец
Постоялец
 
Сообщения: 506
Зарегистрирован: 01.12.2004 (Ср) 13:12
Откуда: Donetsk, Battle.Net

Сообщение AjaxVS » 26.10.2005 (Ср) 13:29

>> От себя: RTFM!
Спасибо, очень помогли... =(
>>не 10 а 14
Оооо! У меня с математикой, конечно, проблемы, но не с логикой... Я ща еще ра качану, будет еще больше +_+

В общем, как всегда, придется делать все самому...

ЗЫ. Brusco - за прогу спасибо!


Вернуться в Visual Basic 1–6

Кто сейчас на конференции

Сейчас этот форум просматривают: AhrefsBot, Google-бот и гости: 31

    TopList