I've sent my Question in fiddler google group to, so i'have my answer, thanks you Tsviatko Yovtchev
Response is here : https://groups.google.com/forum/#!topic/httpfiddler/zXiHPOprR5s
My code is here :
Imports Fiddler
Imports Fiddler.Utilities
Imports System.Text.Encoding
[... more code]
Public Sub OnWebSocketMessageHandler(Sender As Object, e As WebSocketMessageEventArgs)
If Not e.oWSM.IsOutbound And e.oWSM.PayloadData.Any Then
Dim FirstByte As New BitArray(New Byte() {e.oWSM.ToByteArray(0)}) 'Get first byte from header
Dim UseDeflate As Boolean = FirstByte.Get(FirstByte.Length - 2) 'Get 2nd bit value (RSV1)
Dim Response As String = Nothing
If UseDeflate Then
Response = UTF8.GetString(DeflaterExpand(e.oWSM.PayloadData))
Else
Response = e.oWSM.PayloadAsString()
End If
If Not Response = String.Empty Then
ReadResponse(Response)
#If DEBUG Then
Debug.Print(Response)
#End If
End If
End If
End Sub