![]() |
|
Модераторы: Akina |
![]()
|
|
| Sernij |
|
|||
|
Unregistered |
Ну черти программеры подскажите соседу по планете как сделать прогу клиент-сервер, точнее как правильно настроить эти грёбаные winsock ну нифига не возникает диалога между прогами, подскажите как правильно??Можете кидануть каких нить ссылочек на подобную тему или литертуру вообщем информацию к размышлению
|
|||
|
||||
| Hamlet |
|
|||
|
Новичок Профиль Группа: Участник Сообщений: 16 Регистрация: 3.10.2002 Репутация: нет Всего: нет |
Жаль Админ енто не читал...
Ты тут поаккуратнее с выражениями... |
|||
|
||||
| AdvancedLamer |
|
|||
![]() Новичок Профиль Группа: Участник Сообщений: 4 Регистрация: 22.12.2002 Репутация: нет Всего: нет |
могу поделится опытом... напсал прогу для управления инет кафе. она как раз из 2-х частей состоит.если есть конкретные вопросы то чиркни
|
|||
|
||||
| Виталиум |
|
|||
|
Unregistered |
Зайди сюда - http://www.vbmike.narod.ru/.
Я сам охотился за функцией передачи файлов через винсок, а как зашел туда в раздел софт, как увдивел... Так аж стало тяжело дышать и слюни потекли. Я свой чат уже написал, и теперь апдейтаю. Вот надумал сделать функцию передачи файлов и остановился. Пока еще зипы не смотрел, тока скачал. Посмотри и ты. Если хочешь посмотреть на мой чат - мыль [email protected] P.S. Только исходники не дам!!! Екзюк могу дать помостреть |
|||
|
||||
| VIRUS |
|
|||
|
Unregistered |
Уважаемые программеры!
Очень нужна ваша помощь. Столкнулся с траблом. Вот кусок кода: Private Sub Text1_KeyPress(KeyAscii As Integer) If KeyAscii = 13 Then Dim snd As String Dim a As Integer snd = Text1 a = 1 For a = ws.LBound + 1 To ws.UBound If ws(a).State = sckClosed Then GoTo skip ws(a).SendData snd skip: Next End If End Sub По логике вещей данная подпрограмма должна рассылать на все указанные открытые винсоки массива данные "SND". В режиме отладки (пошаговое выполнение программы) все происходит без сучка и задоринки. Но как только происходит запуск проги "RUN" или после ее компиляции, сообщение приходит только последнему присоединившемуся клиенту! Что это? Глюк или есть выход? Помогите пожалуйста! Заранее благодарен за любую инфу. |
|||
|
||||
| Guest |
|
|||
|
Unregistered |
Вопрос снимается. После команды на отправку, след. строкой ставится DoEvents.
|
|||
|
||||
| VIRUS |
|
|||
|
Unregistered |
Вопрос снимается. После команды на отправку, след. строкой ставится DoEvents.
|
|||
|
||||
![]()
|
| Правила форума "VB6" | |
|
|
Запрещается! 1. Публиковать ссылки на вскрытые компоненты 2. Обсуждать взлом компонентов и делиться вскрытыми компонентами
Если Вам понравилась атмосфера форума, заходите к нам чаще! С уважением, Akina. |
| 0 Пользователей читают эту тему (0 Гостей и 0 Скрытых Пользователей) | |
| 0 Пользователей: | |
| « Предыдущая тема | VB6 | Следующая тема » |
|
|
По вопросам размещения рекламы пишите на vladimir(sobaka)vingrad.ru
Отказ от ответственности Powered by Invision Power Board(R) 1.3 © 2003 IPS, Inc. |