Проверка на онлайн
 |
Наши проекты:
Журнал · Discuz!ML · Wiki · DRKB · Помощь проекту |
|
| ПРАВИЛА | FAQ | Помощь | Поиск | Участники | Календарь | Избранное | RSS |
| [3.138.200.66] |
|
|
Правила раздела Visual Basic: Общие вопросы
Здесь обсуждаются вопросы по языку Visual Basic 1-6 (а так же по схожим языкам, как, например, PowerBASIC).
Вопросы по Visual Basic .NET (это который входит в состав Visual Studio 2002/2003/2005/2008+, для тех, кто не в курсе) обсуждаются в разделе .NET.
Обратите внимание:
1. Прежде чем начать новую тему или отправить сообщение, убедитесь, что Вы не нарушаете правил форума!
2. Обязательно воспользуйтесь поиском. Возможно, Ваш вопрос уже обсуждали. Полезные ссылки приведены ниже.
3. Темы с просьбой выполнить какую-либо работу за автора в этом разделе не обсуждаются. Студенты, вам сюда: ПОМОЩЬ СТУДЕНТАМ!
4. Используйте теги [ code=vba ] ...текст программы... [ /code ] для выделения текста программы подсветкой.
5. Помните, здесь телепатов нет. Формулируйте свой вопрос максимально грамотно и чётко: Как правильно задавать вопросы
6. Запрещено отвечать в темы месячной (и более) давности, без веских на то причин.
Полезные ссылки:
FAQ Сайта FAQ Раздела Кладовка 
Наши Исходники API-Guide 
Поиск по Разделу 
MSDN Library Online 
Google
Ваше мнение о модераторах:
SCINER, B.V.
Вопросы по Visual Basic .NET (это который входит в состав Visual Studio 2002/2003/2005/2008+, для тех, кто не в курсе) обсуждаются в разделе .NET.
Обратите внимание:
1. Прежде чем начать новую тему или отправить сообщение, убедитесь, что Вы не нарушаете правил форума!
2. Обязательно воспользуйтесь поиском. Возможно, Ваш вопрос уже обсуждали. Полезные ссылки приведены ниже.
3. Темы с просьбой выполнить какую-либо работу за автора в этом разделе не обсуждаются. Студенты, вам сюда: ПОМОЩЬ СТУДЕНТАМ!
4. Используйте теги [ code=vba ] ...текст программы... [ /code ] для выделения текста программы подсветкой.
5. Помните, здесь телепатов нет. Формулируйте свой вопрос максимально грамотно и чётко: Как правильно задавать вопросы
6. Запрещено отвечать в темы месячной (и более) давности, без веских на то причин.
Полезные ссылки:
FAQ Сайта FAQ Раздела Кладовка Наши Исходники API-Guide Поиск по Разделу MSDN Library Online GoogleВаше мнение о модераторах:
SCINER, B.V.
Проверка на онлайн
|
Сообщ.
#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
,
|
|
|
|
Без пинга определение идет долго, но можно попытаться подключить. Если подключен - то компьютер в сети.
|
0 пользователей читают эту тему (0 гостей и 0 скрытых пользователей)
0 пользователей:
[ Script execution time: 0,0300 ] [ 16 queries used ] [ Generated: 24.04.24, 22:04 GMT ]