通过TCP发送大字符串时丢失数据。 (客户端服务器)

时间:2012-05-16 06:37:26

标签: java vb.net tcp

我有一个客户端/服务器应用程序,其中Server在java中,Client在Vb.net中。

当我从客户端向服务器发送大字符串时,我没有收到完整的文本。 请帮忙。

下面附带的代码。

客户端 - VB.net -

      Try
         Dim clientSocket As New System.Net.Sockets.TcpClient()

        ' msg("Client Started")
        clientSocket.Connect(StrIP_Add, intPort)
        clientSocket.SendBufferSize=104857600
        '6511 6522
        ' Label1.Text = "Client Socket Program - Server Connected ..."

        Dim serverStream As NetworkStream = clientSocket.GetStream()
        Dim outStream(104857600) As Byte

        ' MsgBox(strValidator.Trim.Length)

        outStream = System.Text.Encoding.ASCII.GetBytes(strValidator.Trim)
        ' Dim outStream As Byte() = "sdsfd"
        System.Threading.Thread.Sleep(2000)
        serverStream.Write(outStream, 0, outStream.Length)
        System.Threading.Thread.Sleep(2000)
        serverStream.Flush()

        Dim inStream(104857600) As Byte
        serverStream.Read(inStream, 0, outStream.Length) '104857600) ' CInt(clientSocket.ReceiveBufferSize))
        Dim returndata As String = _
        System.Text.Encoding.ASCII.GetString(inStream)
        '  msg("Data from Server : " + returndata)
        clientSocket.Close()

    Catch ex As Exception
        ' VikUcMsg.AddMessage("<b><u>" & Page.Title & "</u></b><br><br>" & "No Connectivity on the port :" & intPort, enmMessageType.Error)


    End Try

server-- Java

BufferedInputStream RecievedBuffer = new BufferedInputStream(
                TCPIP_Client_SOCKET.getInputStream());
        InputStreamReader RecievedInputStreamReader = new InputStreamReader(
                RecievedBuffer);

        System.out.println(RecievedBuffer.toString().length());
        //char[] RecievedChars = new char[TCPIP_Client_SOCKET
                //.getReceiveBufferSize()];

        char[] RecievedChars = new char[100000];
        //Thread.sleep(5000);
        RecievedInputStreamReader.read(RecievedChars);
        //Thread.sleep(5000);
        String strRecievedData=null;
        //Thread.sleep(5000);
        strRecievedData = new String( RecievedChars ).trim();
        //strRecievedData = RecievedChars.;
        Thread.sleep(5000);
        if (strRecievedData!=null)
        {
            System.out.println(strRecievedData);
                         }

strRecievedData始终只有8192。

1 个答案:

答案 0 :(得分:1)

简而言之,你必须在从套接字读取时循环,因为无法保证每次尝试读取时会收到多少字节。

伪代码:

while (!msgCompleted && !overallTimeout)
{
   bytesRead = netstream.Read(readBuffer);

   if (bytesRead > 0)
   {
      // here append readBuffer to msgBuffer from offset to offset+bytesRead 

      offset += bytesRead // update offset so you can keep appending

     // inspect the msgBuffer to see if the message is completed
   }

}

总而言之,你的代码中还有其他许多问题。例如......

您在此处分配104857601(而不是104857600)字节缓冲区:

Dim outStream(104857600) As Byte

然后丢弃并用从strValidator重新包含的任何内容替换该缓冲区:

outStream = System.Text.Encoding.ASCII.GetBytes(strValidator.Trim)

预先分配它只是为了替换它没有意义。

另一个......

您分配一定长度的输入缓冲区:

Dim inStream(104857600) As Byte

然后使用不同缓冲区的长度读入缓冲区:

serverStream.Read(inStream, 0, outStream.Length)

根据长度的不同,这很容易出错。

您还需要循环使用此VB读取,就像Java读取一样。