Hi,

Im using this function to convert data before sending with winsock

Code:
Public Function URLEncode(ByVal Txt As String) As String
    Dim i      As Double
    Dim ch     As String
    Dim ch_asc As Integer
    Dim result As String

    SetSafeChars

    result = ""

    For i = 1 To Len(Txt)
        ' Translate the next character.
        ch = Mid$(Txt, i, 1)
        ch_asc = Asc(ch)

        If ch_asc = vbKeySpace Then
            ' Use a plus.
            result = result & "+"
        ElseIf m_SafeChar(ch_asc) Then
            ' Use the character.
            result = result & ch
        Else
            ' Convert the character to hex.
            result = result & "%" & Right$("0" & Hex$(ch_asc), 2)
        End If

    Next i

    URLEncode = result
End Function
If i use an ascii like █ winsock will send the data only till this char █...

any ideas how to fix that?

Cheers