在VB中将图片发送到TcpClient

时间:2012-07-30 10:02:54

标签: vb.net image tcpclient

我是Visual Basic的新手。目前正在开发visual studio 2005.我有一个应用程序,它使用Visual Basic中的TcpClient向客户端(在我们的域上)发送文本消息。就文本而言,我可以轻松发送它,客户端会收到它。但是,我打算将图片发送到客户端并强制他们保存在特定位置。有关如何在VB中执行此操作的任何建议。非常感谢

1 个答案:

答案 0 :(得分:1)

将图片读入字节数组,发送字节数组,然后将字节数组保存到另一端的文件中。来自this site的一些(未经测试的)示例代码进行转换:

Private Function BytesToImage(ByVal ImageBytes() As Byte) As Image
    Dim imgNew As Image
    Dim memImage As New System.IO.MemoryStream(ImageBytes)
    imgNew = Image.FromStream(memImage)
    Return imgNew
End Function

Private Function ImageToBytes(ByVal Image As Image) As Byte()
    Dim memImage As New System.IO.MemoryStream
    Dim bytImage() As Byte

    Image.Save(memImage, Image.RawFormat)
    bytImage = memImage.GetBuffer()

    Return bytImage
End Function