Форум программистов, компьютерный форум, киберфорум
Visual Basic
Войти
Регистрация
Восстановить пароль
Блоги Сообщество Поиск Заказать работу  
 
Рейтинг 4.50/4: Рейтинг темы: голосов - 4, средняя оценка - 4.50
0 / 0 / 0
Регистрация: 01.03.2010
Сообщений: 223

Winsock и выгружение отработавшего сокета из памяти

16.02.2011, 17:38. Показов 947. Ответов 2
Метки нет (Все метки)

Студворк — интернет-сервис помощи студентам
тему уже поднимал, но понадеялся на собственный силы
итак, проблема такова: имеется мультисокетовое приложение (сервер), которое принимает запросы и создает копию себя методом Load
хочу сделать, чтобы отработавший сокет выгружал себя из памяти, но проблема в том, что при попытке соединения это вызовет ошибку 'типа контрол не существует'
кто сталкивался - помогите, ибо не хочется чтобы программа занимала много места в памяти.
0
cpp_developer
Эксперт
20123 / 5690 / 1417
Регистрация: 09.04.2010
Сообщений: 22,546
Блог
16.02.2011, 17:38
Ответы с готовыми решениями:

Полное выгружение объекта из памяти.
Я работаю с объектом (ActiveX для связи с БД) следующим образом: private Sub ObjWork() dim Obj as Object Set Obj=CreateObject(...) ...

Полное выгружение проги из памяти
Проблема такая. В проге много разных controls, и еще 3 recordset'а. Когда юзверь жмет выход, прога не выгружается из памяти. Т.Е. с экрана...

Повторное использование сокета winsock
Здравствуйте. Мне нужно написать FTP клиент с обязательным использованием winsock api. За последнее время перечитал много разнообразных...

2
0 / 0 / 0
Регистрация: 01.03.2010
Сообщений: 223
16.02.2011, 17:38  [ТС]
собственно код:
Code
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
37
38
39
40
41
42
43
Public ws_count As Long
Private Sub Command1_Click(Index As Integer)
If test(Index).State = sckClosed Then
test(Index).Connect '192.168.0.2', 81
Else
test(Index).Close
 
End If
 
End Sub
 
Private Sub Form_Load()
ws(0).Bind 81
ws(0).Listen
Load ws(1)
Load ws(2)
ws_count = 2
End Sub
 
Private Sub Timer1_Timer()
Label1(0).Caption = test(0).State
Label1(1).Caption = test(1).State
Label2(0).Caption = ws(1).State
Label2(1).Caption = ws(2).State
End Sub
 
Private Sub ws_Close(Index As Integer)
ws(Index).Close
'MsgBox (Index)
End Sub
 
Private Sub ws_ConnectionRequest(Index As Integer, ByVal requestID As Long)
For i = 1 To ws_count
    If ws(i).State = sckClosed Then ws(i).Accept requestID: Exit Sub
Next i
ws_count = ws_count + 1
Load ws(ws_count)
ws(ws_count).Accept requestID
End Sub
 
Private Sub ws_Error(Index As Integer, ByVal Number As Integer, Description As String, ByVal Scode As Long, ByVal Source As String, ByVal HelpFile As String, ByVal HelpContext As Long, CancelDisplay As Boolean)
MsgBox (Err.Description)
End Sub
0
0 / 0 / 0
Регистрация: 01.03.2010
Сообщений: 223
17.02.2011, 14:31  [ТС]
т.е. если добавить unload ws(index) после ws(index).close, то в момент ws_ConnectionRequest во время перебор закрытых сокетов и произойдет указанная ошибка. что делать?
0
Надоела реклама? Зарегистрируйтесь и она исчезнет полностью.
raxper
Эксперт
30234 / 6612 / 1498
Регистрация: 28.12.2010
Сообщений: 21,154
Блог
17.02.2011, 14:31
Помогаю со студенческими работами здесь

Winsock. Почему в приведенном коде не работает создание сокета?
Добрый день! Пробую освоить сетевое программирование под винду. Планируется клиентское приложение, которое сможет обмениваться данными с...

Не приходят сообщения от клиента при неблокирующем режиме сокета \winsock
Привет, хочу реализовать простой обмен сообщениями в локальной сети, с блокирующем сокетом все работает, при переходе на неблокирующей...

Использование не блокируемого WinSock TCP сокета. Реализации таймаута для ожидания connect()
Необходимо реализовать TCP подключение и обменяться данными. В случае не доступности узла, к которому осуществляется подключение, функция...

Написать соединение: много клиентов - сервер (Winsock; на сервере 3 сокета: 2 TCP и 1 UDP)
Всем здрасьте !!!! Мне надо написать соединение: много клиентов - сервер Тут мне надо иметь на сервере 3 сокета: 2 TCP и 1 UDP ...

Сворачивание формы (не выгружение)
Нужно сделать так чтобы при нажатии кнопки закрытя формы, форма не выгружалась, а сворачивалась (я пишу в unloading e.cancel=true и т.п.),...


Искать еще темы с ответами

Или воспользуйтесь поиском по форуму:
3
Ответ Создать тему
Новые блоги и статьи
SDL3 для Web (WebAssembly): Реализация движения на Box2D v3 - трение и коллизии с повёрнутыми стенами
8Observer8 20.02.2026
Содержание блога Box2D позволяет легко создать главного героя, который не проходит сквозь стены и перемещается с заданным трением о препятствия, которые можно располагать под углом, как верхнее. . .
Конвертировать закладки radiotray-ng в m3u-плейлист
damix 19.02.2026
Это можно сделать скриптом для PowerShell. Использование . \СonvertRadiotrayToM3U. ps1 <path_to_bookmarks. json> Рядом с файлом bookmarks. json появится файл bookmarks. m3u с результатом. # Check if. . .
Семь CDC на одном интерфейсе: 5 U[S]ARTов, 1 CAN и 1 SSI
Eddy_Em 18.02.2026
Постепенно допиливаю свою "многоинтерфейсную плату". Выглядит вот так: https:/ / www. cyberforum. ru/ blog_attachment. php?attachmentid=11617&stc=1&d=1771445347 Основана на STM32F303RBT6. На борту пять. . .
Камера Toupcam IUA500KMA
Eddy_Em 12.02.2026
Т. к. у всяких "хикроботов" слишком уж мелкий пиксель, для подсмотра в ESPriF они вообще плохо годятся: уже 14 величину можно рассмотреть еле-еле лишь на экспозициях под 3 секунды (а то и больше),. . .
И ясному Солнцу
zbw 12.02.2026
И ясному Солнцу, и светлой Луне. В мире покоя нет и люди не могут жить в тишине. А жить им немного лет.
«Знание-Сила»
zbw 12.02.2026
«Знание-Сила» «Время-Деньги» «Деньги -Пуля»
SDL3 для Web (WebAssembly): Подключение Box2D v3, физика и отрисовка коллайдеров
8Observer8 12.02.2026
Содержание блога Box2D - это библиотека для 2D физики для анимаций и игр. С её помощью можно определять были ли коллизии между конкретными объектами и вызывать обработчики событий столкновения. . . .
SDL3 для Web (WebAssembly): Загрузка PNG с прозрачным фоном с помощью SDL_LoadPNG (без SDL3_image)
8Observer8 11.02.2026
Содержание блога Библиотека SDL3 содержит встроенные инструменты для базовой работы с изображениями - без использования библиотеки SDL3_image. Пошагово создадим проект для загрузки изображения. . .
КиберФорум - форум программистов, компьютерный форум, программирование
Powered by vBulletin
Copyright ©2000 - 2026, CyberForum.ru