Почему не коннектит?

[alex-lev9]

Разве здесь есть какая-нибудь ошибка:

Private Sub CommandButton1_Click()
Winsock1.Close
Winsock1.RemoteHost = "www.yandex.ru"
Winsock1.RemotePort = 80
Winsock1.Connect
End Sub

Private Sub Winsock1_Connect()
TextBox1.Text = Winsock1.State
End Sub

В TextBox ничего не заносится

[alex-lev9]

Примечание: если подставить Winsock1.RemotePort = 25, соединение происходит нормально, т.е. TextBox1.Text = 7.

[Sirik]

проверь событие Error

[alex-lev9]

Код ошибки 10060. Как я понимаю, Winsock просто отключился по прошествии определенного времени.

[Sirik]

10060 - ошибка возникает когда нет долго ответа от сервера (сайта).

[keks-n]

Ошибка не в коде (у меня всё работает), проследи за изменением State из таймера.

[Sirik]

может просто прокси стоит ?

[alex-lev9]

Путем несложных манипуляций установил:
- при запуске State = 4;
- через 10 секунд State = 6;
- еще через 15-20 секунд выдается сообщение об ошибке 10060 и State = 9

[keks-n]

Гм, это значит тока у тебя... у меня после 6 сразу 7
З. Ы. Попробуй в адресе http://www.yandex.ru, может поможет (ИМХО)

[Sirik]

попробуй к 213.180.204.11

[alex-lev9]

Те же орехи, вид сбоку.

[Sirik]

тогда не знаю, этот IP есть www.yandex.ru

[keks-n]

А у тебя из файрволлов(брандмаузеров) ничего не стоит? Они ведь и блокировать могут! Ооооочень похожая картинка

[alex-lev9]

На машине не стоит, а на сервере - не знаю. Машина в локалке, но соединение с интернетом не через прокси.

[keks-n]

Ключевое слово - прокси. Надо с нетом не напрямую работать, а через этот самый прокси, поиши по форуму много нароешь. А напрямки никак не законнектишся!

[alex-lev9]

Таки ДА, как говорят в Одессе.
Коннект при помощи Winsock не проходит только на работе. Хотя в свойствах подключения - стоит не прокси, а назначен айпи адрес. Но выяснить, в чем дело, будет сложно, т.к. сисадмина лично я не знаю.
Дома эта проблема снялась. Практически мгновенно Winsock1.State = 7.
А для компа на работе придется видимо искать альтернативные методы. Как насчет Webbrowser?