100 Continue issue

[mmustala]

Hi,

Looks like the 100 Continue response is causing trouble again. You fixed one issue related to this in #125

Now the server is returning two Continue 100 rows before the actual response. The response looks like this

HTTP/1.1 100 Continue

HTTP/1.1 100 Continue

HTTP/1.1 200 OK
...

This may be a result of a change in my server configuration. I changed my web server from Puma to Phusion passenger lately. And in general my web server is configured so that it uses internal port forwarding. There is Apache forwarding requests to internal web servers.

I believe it is best to just delete all the Continue lines from the response. Some server configurations may have even more forwards.

[mmustala]

I changed the web_FindStatusLine function to be like this and now it works. Should work for any response.

Private Function web_FindStatusLine(web_CurlResponseLines() As String) As Long
    For web_FindStatusLine = LBound(web_CurlResponseLines) To UBound(web_CurlResponseLines)
        If VBA.Trim$(web_CurlResponseLines(web_FindStatusLine)) <> "" Then
            If VBA.Split(web_CurlResponseLines(web_FindStatusLine), " ")(1) <> "100" Then
                Exit Function
            End If
        End If
    Next web_FindStatusLine
End Function

[timhall]

Yep, that looks like a much more robust solution than the existing, I'll update the library soon.