WEB开发网
开发学院软件开发VB 怎样在vb.net中将图片存入SQL Server 2000并能读出... 阅读

怎样在vb.net中将图片存入SQL Server 2000并能读出来使用?

 2007-01-21 21:14:23 来源:WEB开发网   
核心提示:在数据库中建一个Img表,其中包含一个Img字段,类型为Image或Binary'将Bytes存入数据库Dim Stream As New IO.MemoryStreamPictureBox1.Image.Save(Stream, System.Drawing.Imaging.ImageFormat.Bmp)S

在数据库中建一个Img表,其中包含一个Img字段,类型为Image或Binary
'将Bytes存入数据库
Dim Stream As New IO.MemoryStream
PictureBox1.Image.Save(Stream, System.Drawing.Imaging.ImageFormat.Bmp)
Stream.Flush()
Dim Bytes As Byte() = Stream.ToArray
Dim SQL As String = "insert into Img values (@bytes) "
Dim command As New SqlClient.SqlCommand(SQL, Connection)
command.Parameters.Add("@bytes", SqlDbType.Binary).Value = Bytes
command.ExecuteNonQuery

'读取
Dim Command As New SqlClient.SqlCommand(SQL, Connection)
Dim Reader As SqlClient.SqlDataReader = Command.ExecuteReader()
Dim Bytes as Byte()=Reader.Item("Img")
Dim mStream As New IO.MemoryStream
mStream.Write(Bytes, 0, Bytes.Length)
mStream.Flush()
Dim Img As New Bitmap(mStream)
PictureBox1.Image = Img

Tags:怎样 vb net

编辑录入:爽爽 [复制链接] [打 印]
赞助商链接