Hey guys

When im receiving data from winsock I get error saving it all what I get is
a part of the screen shot I have taken
Dont really know what im doing wrong but please take a look at my code

thanks

The data Im receiving are : "screen" & "||" & pic.jpg

Code:
Case "screen"

Dim FilePic as string
Dim FileNum as integer

FilePic = FilePic & Data(1)
FileNum = FreeFile
Open "C:\pic.bmp" For Binary Lock Write As FileNum
Put FileNum, , FilePic
Close FileNum