Sebas писал(а):Если рашать задачу глобально, выходя за рамки VB, то ARP тебе в помощь.
tyomitch писал(а):Sebas писал(а):Если рашать задачу глобально, выходя за рамки VB, то ARP тебе в помощь.
Это как раз не глобально, а очень даже локально.
Область действия ARP ограничена одним сегментом сети.
Sebas писал(а):Да, на уровне IP никак. Если нет достоверных данных, что ЭВМ доступен по какомунить порту или протоколу.
Если решать задачу глобально, выходя за рамки VB, то ARP тебе в помощь.
Sebas писал(а):...доступен по какомунить порту или протоколу.
Wild VB Code for Food писал(а):если комп с виндой можно попробовать подключится к порту COM (21 вроде), если не отвечает - либо выключен, либо фаерволл, либо....
Wild VB Code for Food писал(а):ЗЫ. 135 порт а не 2х, вот.. конектся туда....если отвечает - работает, если не отвечает - не работает....
If WS_139.state <> sckClosed Then WS_139.Close
WS_139.RemoteHost = IP
WS_139.RemotePort = 139
DoEvents
WS_139.Connect
.......
Private Sub WS_139_Error(ByVal Number As Integer, Description As String, ByVal Scode As Long, ByVal Source As String, ByVal HelpFile As String, ByVal HelpContext As Long, CancelDisplay As Boolean)
Select Case Number
Case 10060 ' NOT Online
.....
Case 10053 ' Online
.....
Timer3.Enabled = True
Как узнать по IP?
Да, на уровне IP никак.
Сейчас этот форум просматривают: нет зарегистрированных пользователей и гости: 181