```
        Try
            Do
                read = stream.Read(datain, 0, datain.Length)
                responseData = System.Text.Encoding.ASCII.GetString(datain, 0, read)
                finalResponse = finalResponse + responseData
            Loop While read > 0
        Catch ex As Exception

```

Sometimes the program is stuck at that stream.read If it fails I want to moveon.

How to fix that?