Наши проекты:
Журнал · Discuz!ML · Wiki · DRKB · Помощь проекту |
||
ПРАВИЛА | FAQ | Помощь | Поиск | Участники | Календарь | Избранное | RSS |
[3.14.70.203] |
|
Сообщ.
#1
,
|
|
|
Приветствую!
Может кто подскажет, как сделать, что бы при нажатии на кнопку софтинка проверяла ип компьютера на онлайн (В локалке). Заранее благодарю |
Сообщ.
#2
,
|
|
|
Что такое "онлайн" в твоём понимании?
|
Сообщ.
#4
,
|
|
|
Спасибо за идею, но может есть более простой код? (Просто отправка 1-го пакета и если он дошел, то выводить сообщение) |
Сообщ.
#5
,
|
|
|
Ещё примеры для проверки:
Function Avaible(name) 'пингом проверяет доступность компьютера name в сети On Error Resume Next Set objPing = GetObject("winmgmts:{impersonationLevel=impersonate}")._ ExecQuery("select * from Win32_PingStatus where address = '"_ & name & "'") For Each objStatus in objPing If IsNull(objStatus.StatusCode) Or objStatus.StatusCode = 0 Then Avaible = False Else Avaible = True End If Next End Function ' примеры вызова Print Avaible("Vasya") Print Avaible("192.168.0.1") |
Сообщ.
#6
,
|
|
|
А если на шлюзе запрещено хождение ICMP?
|
Сообщ.
#7
,
|
|
|
Без пинга определение идет долго, но можно попытаться подключить. Если подключен - то компьютер в сети.
|