VBNet - Форум - не работает массив Winsock

Вопрос: не работает массив Winsock Добавлено: 02.12.05 10:20

Автор вопроса: Trusishka | ICQ: 229751913

Когда у меня на форме накидано куча винсоков, то они работают, а когда я создал программно их массив, то они не коннектятся :-(

Dim Winsock_NOK() As Winsock
ReDim Winsock_NOK(100)
Dim RI As Integer

For RI = 9 To BSC_Const
        Winsock_NOK(RI).Protocol = sckTCPProtocol
        Winsock_NOK(RI).LocalPort = 0
        Winsock_NOK(RI).RemotePort = 23
Next
Ответить

Ответы Всего ответов: 4

Номер ответа: 1 Автор ответа: HACKER Разработчик Offline Client Вопросов: 236 Ответов: 8362	Профиль \| \| #1	Добавлено: 02.12.05 11:47
	создай на форме 1 не программно а кликая мышкой... только ж массив! т.е. Winsock1(0) ! а подгружать слейдущие через лоад: Load Winsock(1)... Ответить

Номер ответа: 2 Автор ответа: LamerOnLine ICQ: 334781088 Вопросов: 108 Ответов: 2822	Профиль \| \| #2	Добавлено: 02.12.05 11:50
	Хм... А где, собсно, сами винсоки? Я пока вижу пустые указатели. Погляди в отладчике на любой из своих Winsock_NOK(x) - будет Nothing Когда создаешь экземпляр класса, а не объектную переменную, используется ключевое слово New. Но винсок теюе New задать не позволит. Вариант простой: кидаешь на форму один Winsock, задаешь ему свойство Index=0. Затем, в коде, просто юзаешь Load Winsock(1) и т.п. Ответить

Номер ответа: 3 Автор ответа: LamerOnLine ICQ: 334781088 Вопросов: 108 Ответов: 2822	Профиль \| \| #3	Добавлено: 02.12.05 11:52
	Тьфу, обновлять страничку надо чаще. На три минуты разница Ответить

Номер ответа: 4 Автор ответа: Trusishka ICQ: 229751913 Вопросов: 36 Ответов: 48	Профиль \| \| #4	Добавлено: 02.12.05 13:23
	буря аплодисментов!! спасибо братцы, все заработало!!! Ответить

Страница: 1 |