Socket发送图片

最新推荐文章于 2023-01-06 16:29:31 发布

EricBai

最新推荐文章于 2023-01-06 16:29:31 发布

阅读量2.3k

点赞数

文章标签： socket byte image 服务器

博客给出服务器端和客户端关于图片传输的代码。服务器端通过文件流读取图片数据并以字节形式发送，客户端接收字节数据，利用内存流创建图片对象并显示。涉及socket、byte和image等信息技术相关内容。

摘要生成于 C知道，由 DeepSeek-R1 满血版支持，前往体验 >

服务器端（发送图片）代码如下：
With Me.OpenFileDialog1
            .AddExtension = True
            .CheckFileExists = True
            .CheckPathExists = True
            .Filter = "位图(*.bmp)|*.bmp|jpg图象(*.jpg)|*.jpg"
            .ShowDialog()
            Name = .FileName
        End With
        Dim filestream As New IO.FileStream(Name, IO.FileMode.OpenOrCreate)
        Dim msg(filestream.Length) As Byte
        filestream.Read(msg, 0, msg.Length - 1) '读取文件中的数据，然后保存到msg中
        clientsocket.Send(msg, msg.Length, SocketFlags.None)
        filestream.Close() '关闭文件流

客户端代码（接收图片）
Public Sub socketReceive()    '接收图片的函数
        While (True)
            Dim recvbytes(2000000) As Byte
            clientsocket.Receive(recvbytes, recvbytes.Length,SocketFlags.None)
            '使用内存流创建image对象
            Dim mStream As IO.MemoryStream = New IO.MemoryStream(recvbytes)
            Me.PictureBox1.Image = Image.FromStream(mStream)
             mStream.Close()
        End While
    End Sub