Как читать веб-ответ - PullRequest
Новая
       46

Как читать веб-ответ

0 голосов
/ 07 мая 2020

Я не могу прочитать исходный код сайта через Tcp Client.

Пожалуйста, не говорите мне, что вы можете читать исходный код через httpwebrequest, webclient или http-клиент - я не хочу использовать эти методы.

Я могу прочитать ответ заголовков, но не могу прочитать html ответ.

Вот мой код: 

Dim address As String = " Write your site here "

Dim tcp As TcpClient = New TcpClient(address, 80)
Dim o As NetworkStream = tcp.GetStream

Dim buffer() As Byte = Encoding.ASCII.GetBytes("GET / HTTP/1.1" + vbCrLf + "Host: " + address + vbCrLf + vbCrLf)
o.Write(buffer, 0, buffer.Length)

Dim xbytes(tcp.ReceiveBufferSize) As Byte

o.Read(xbytes, 0, tcp.ReceiveBufferSize)

Console.WriteLine(Encoding.ASCII.GetString(xbytes))

MsgBox("Done")

Ответ заголовка 

HTTP/1.1 200 OK
Content-Type: text/plain
Server: proxygen-bolt
Date: Thu, 07 May 2020 19:39:59 GMT
Vary: Cookie, Accept-Language, Accept-Encoding
Content-Language: en
Content-Encoding: gzip
Connection: keep-alive
Content-Length: 11351
X-Content-Type-Options: nosniff
X-XSS-Protection: 0

Проблема в том, что я не могу прочитать ответ html, я могу только прочитать ответ заголовков.

...