Då ska vi se... då vänder jag mig till det här forumet numer då, herr moderator :)

Har nu som jag funderade på och du tipsade om att lagra allt i en sträng. Detta fungerar fint. Jag skickar alla data i en sträng från klient till server. Svaret som sedan skickas från servern inkommer till klienten, men strängfunktionerna för att "sortera ut" strängens id-del fungerar inte som jag vill... jag skriver som följer:

<code>
Dim message_type As Integer
...
message_type = Int(Left(in_data, 5))
...
</code>

... men detta fungerar inte... vad göra?

Tacksam för svar,

/Hempa

Kan vara så att Left(in_data, 5) innehåller en bit av meddelandet.
T.ex.
strTemp=Left(in_data, 5)
debug.Print strTemp
Ger:
1;Te

Detta skulle ge felmeddelande.
Rekommenderar att du slår ihop strängen med en separator och delar den Split.

Exempel:

Dim Data() as string
Dim message_type As Integer
Dim message_Text As string

in_data = 1 & ";"& "Test"

Data = Split(in_data,";",2)

message_type = Data(0)
message_Text = Data(1)

Du kan ju göra som Andreas föreslog, det är väl bättre... Men jag blev inte klok på left-funktionen, om man däremot använder Mid fungerar det utmärkt... Är väl en bugg som vanligt...

Dim message_type As Integer
message_type = Int(Mid(in_data, 1, 5))

/Johan