Страница: 1 |
Помогите пожалуйста найти руководство по созданию чатов...! ЗЫ Извинямс за каламбур
Это тебе не руководство по чатам надо, а инфа по контролу WinSock. Тут вроде в примерах где то было. A eще здесь Или на rusdok.ru А вот здесь практический пример, для начала. Пример на эту тему есть на http://shop.piter.com/bugs/5-8046-0054-0/Skill18.EXE Это листинг к книге по VB http://vbrussian.com/Winsock.asp А что ето тама за sckServer Если додавить контрол Winsock с именем sckServer то "Procedure declarations does nont math description of event or procedure having same name" "Да ты пр-ав, я Труфальдино из Бергамооооо...."   есть такой код Private Sub txtSendData_Change() intMax-количество подключеных клиентов. Программа должна отправлять одно и тоже сообщение всем клиентам. НО! сообщение получает только клиент2(отправлено через sckServer(2)) а клиент1-нет(sckServer(1)) Но ведь в ПОШАГОВОМ(F8) режиме получают ОБА клиента.... Страница: 1 |
Вопрос: Чаты...
Добавлено: 08.09.02 23:36
Автор вопроса:
Matrix | Web-сайт:
(Интересует КАК компьютер распознаёт что пришло сообщение. Именно пришло, а не что пришедшее-сообщение)
Ответы
Всего ответов: 8
Номер ответа: 1
Автор ответа: MAGNUS
Вопросов: 12
Ответов: 430
Профиль | | #1
Добавлено: 09.09.02 18:28
http://www.winsockvb.com/
http://vbrussian.com/Winsock.asp
Номер ответа: 2
Автор ответа: paul_sn
Вопросов: 16
Ответов: 164
Web-сайт:
Профиль | | #2
Добавлено: 09.09.02 19:10
Номер ответа: 3
Автор ответа: Matrix
Вопросов: 34
Ответов: 62
Web-сайт:
Профиль | | #3
Добавлено: 09.09.02 23:56
? и как его юзать. По примеру из ссылки-не работает пишет "Sub or function not defined"
=>
=
=...
Номер ответа: 4
Автор ответа: MAGNUS
Вопросов: 12
Ответов: 430
Профиль | | #4
Добавлено: 10.09.02 00:14
c) x/ф "Труфальдино из Бергамо" шутка...
но в ней ест доля правды... Ето деыствител-но контрол с таким именем. А ошибку ты получик скорее всего потому потому что сначала сделал проект с готовым кодом а потом уже изменил имя контроля. Попробуй все сделать заново. Но сначала вставь контроли и задай им правил-ные имена как показано в примере. Все работает.
Номер ответа: 5
Автор ответа: Matrix
Вопросов: 34
Ответов: 62
Web-сайт:
Профиль | | #5
Добавлено: 11.09.02 17:59
For i = 1 To intMax
sckServer(i).SendData txtSendData.Text
Next i
End If
End Sub Енто глюк али нет??? и как ету обойти
Номер ответа: 6
Автор ответа: MAGNUS
Вопросов: 12
Ответов: 430
Профиль | | #6
Добавлено: 12.09.02 15:46
Ты уверен что все сделал правильно? А остальной код? На каких портах слуьают адресаты? Если поставил тот же самый порт, то ничего не будет. Если используешь массив серверов ИМХО ставь разные порты!
Номер ответа: 7
Автор ответа: Matrix
Вопросов: 34
Ответов: 62
Web-сайт:
Профиль | | #7
Добавлено: 13.09.02 20:00
Номер ответа: 8
Автор ответа: MAGNUS
Вопросов: 12
Ответов: 430
Профиль | | #8
Добавлено: 13.09.02 21:15
Так бы сразу ои говорил. Дело в том что он отправляет быстрее чем слушает. Так что после отправки делай паузу в секунд пару(или меньше, незнаю точно, проверь). И все будет работать.