I'm currently working on an vb6(winsock) program that is supposed to capture realtime ticket over ethernet and write to a file.
The problem I am facing is that the captured ticket is showing blank only (2 blank characters in the textbox).
When getting the variable length, it is equal to 772bytes.
Code: Select all
Private Sub Winsock1_DataArrival(ByVal bytesTotal As Long)
Dim Data as String
Winsock1.GetData Data
Text2.Text = Text2.Text & vbNewLine & Data
Text2.Text = Text2.Text & vbNewLine & Len(Data)
End Sub
I am not programming expert though.
Regards