Как проверить сайт на доступность через VB6
Формулировка задачи:
Через AUTOIT можно сделать так
но увы не работает в 2000 винде, как такую проверку можно организовать на VB6. Консольное приложение которое проверяет доступен ли сайт и если он доступен то...
но увы не работает в 2000 винде, как такую проверку можно организовать на VB6. Консольное приложение которое проверяет доступен ли сайт и если он доступен то...
Решение задачи: «Как проверить сайт на доступность через VB6»
textual
Листинг программы
Private Sub Form_Load()
Call Inet1.Execute("http://site.ru", "GET")
Do Until Inet1.StillExecuting = False
DoEvents
Loop
If InStr(1, Inet1.GetHeader(), "200") > 0 Then
Call MsgBox("Good")
Else
End If
Unload Me
End Sub
ИИ поможет Вам:
- решить любую задачу по программированию
- объяснить код
- расставить комментарии в коде
- и т.д