如何使用.NET NetworkStream和TcpClient连接到远程IP并等待数据？

Question

我在这段代码上遇到了很大的困难，我正试图开始工作。我已成功将 TcpClient 对象连接到两台单独的远程计算机并向它们传输数据。本质上，我正在尝试连接到端口 80 上的计算机 1 并发送 GET 请求。发送请求后，我希望保持连接处于活动状态，以便另一端的软件可以在准备好时向我发送数据。如何保持连接打开并在每次流中可用时读取数据？我尝试过使用 NetworkStream.Read 和 BeginRead 但没有成功。我最接近的是每 30 秒休眠一次线程，然后执行另一个不需要的 GET 请求。这是我从流中读取的当前代码。我知道我需要在此处的某处循环：

注意：RemoteSocket 是我在这一点连接的 TcpClient 对象

Dim serverStream As NetworkStream = RemoteSocket.GetStream()
rqst = "GET /Control/Clip_Forwarding_Stream?CameraName=" & URL_Encode(Name) & " HTTP/1.0" & vbCrLf & vbCrLf
Dim stream As Byte() = Encoding.GetEncoding("Windows-1252").GetBytes(rqst)
serverStream.Write(stream, 0, stream.Length)
Dim inStream(1024) As Byte
Dim recv = serverStream.Read(inStream, 0, inStream.Length)
Dim data = Encoding.GetEncoding("Windows-1252").GetString(inStream, 0, recv)

我对数据所做的是将其传递给此方法：

注意：ForwardSocket 是我在这一点连接的另一个 TcpClient 对象

Dim serverStream As NetworkStream = ForwardSocket.GetStream()
Dim stream As Byte() = Encoding.GetEncoding("Windows-1252").GetBytes(data)
serverStream.Write(stream, 0, stream.Length)

Any示例可以使用 C# 或 VB 编写，因为我对 C# 最满意，只需用 VB 编写即可。

Answer 1

您需要在循环内阅读（类似于 NoAlias 的答案）。但是你不应该只是循环直到 DataAvailable 为 false，因为如果出于争论的目的，你输入了 4K 数据，那么会有一个小暂停（网络拥塞，等等），然后另外 2K 数据输入，你就会丢失数据结束，因为在该暂停期间 DataAvailable 将为 false。

相反，您需要依赖更高级别的协议，在本例中为 HTTP。 HTTP 使用一个名为 Content-Length 的标头，它可以准确地告诉您正文中将存在多少字节。您需要循环直到收到一定数量的内容（或者当然达到超时值，除非您想永远等待）。

编辑1

再次阅读您的问题后，您似乎正在获取内容长度未知的数据。 HTTP 支持使用 multipart 分块发送数据。手动编码并不有趣，您可能需要考虑使用 HttpRequest 和 HttpResponse 类来为您处理这个问题。它仍然为您提供包含您的内容的流，但会为您处理 HTTP。

Answer 2

Do

   Dim inStream(1024) As Byte 
   Dim recv = serverStream.Read(inStream, 0, inStream.Length) 
   Dim data = Encoding.GetEncoding("Windows-1252").GetString(inStream, 0, recv)

Loop While serverStream.DataAvailable

您可能对 BeginRead 感兴趣方法也。