передача данных пользовательского типа , через Winsock

[Penumbra]

Как передать пользовательский тип данных от серрверного клиентскому приложению через винсок?

это есть и на сервере и на клиенте:

'Тип обьектов схемы
Public Type SXEMTYPE
UnitLabelU_KK() As SXEMTYPE_KK
UnitUnitKK_KK() As Long
UnitIndexKK_KK() As Variant
UnitAdrKK_KK() As Byte
SerNUnit_KK() As String
UnitLabel_Sw() As SXEMTYPE_Sw
LabeTxt_Tx() As SXEMTYPE_Tx
Line_NT() As SXEMTYPE_NT
pArrow_Ar() As SXEMTYPE_Ar
Count_KK As Long
Count_Sw As Long
Count_Tx As Long
Count_NT As Long
Count_Ar As Long
End Type
 
 
Public SendClSxem As SXEMTYPE

передаю данные

wsClients(Index).SendData ID & "@" & SendClSxem & "@" & CLN_MESSAGE

Сообщение отредактировано: Penumbra - 04.01.09, 00:34

[Black Star]

dim buff() as byte
  redim buff(1 to len(SendClSxem))
  senddata buff

Для текста не прокатит. Нужен другой подход
Penumbra, догадаетесь сами?

[Penumbra]

эээ, а как SendClSxem запихнуть в байтовый массив?

п.с. максимум до чего я догадался так это записать SendClSxem As SXEMTYPE в бинарный файл, затем считать его в текстовую переменную txtTemp as string , затем переслать ее клиенту, затем уже у клиента txtTemp as string записать в файл а уж потом с бинарного файла прочитать в GetClSxem As SXEMTYPE
ну, дык, этож геморойно...

Сообщение отредактировано: Penumbra - 05.01.09, 11:49

[Black Star]

Цитата Penumbra @ 05.01.09, 11:48

этож геморойно...

Но мысль работает!!! Это один из вариантов.

[Penumbra]

Цитата Black Star @ 05.01.09, 14:11

Но мысль работает!!!

это меня не сильно утешает
а какие другие варианты? и всетаки, как SendClSxem запихнуть в байтовый массив?

[Akina]

Создать функцию, которая конвертирует структуру в строку, и комплементарную ей функцию. И передавать...

[Penumbra]

Цитата Akina @ 05.01.09, 20:56

Создать функцию, которая конвертирует структуру в строку, и комплементарную ей функцию. И передавать...

Иии???
Мне эта мысль пришла самая первая, но, если б я знал как это сделать, то не было бы этого топика
в том-то и проблема что я НЕ знаю как структуру конвертнуть в строку, а потом обратно...

[Black Star]

Penumbra, ну не все так радостно
Массив создаешь сразу... большой.
и копипастишь в него все составляющие....
типа

  copymemory buff(x+0),varLONG1,4
  copymemory buff(x+4),varLONG2,4
  buff2=strconv(varSTRING,vbFromUnicode)
  copymemory buff(x+8),buff2(0),len(varSTRING)

и т.д. и т.п.

Потом все это дело обратно

[Akina]

Цитата Penumbra @ 06.01.09, 01:03

Иии???
Мне эта мысль пришла самая первая, но, если б я знал как это сделать, то не было бы этого топика
в том-то и проблема что я НЕ знаю как структуру конвертнуть в строку, а потом обратно...

И что же ты не можешь конвертировать в string? какой из типов? говори, не стесняйся... или проблема в том, как выпполнить конкатенацию конвертированных элементов структуры?