ايران ويج

نسخه‌ی کامل: ذخیره عکس در بانک sql
شما در حال مشاهده‌ی نسخه‌ی متنی این صفحه می‌باشید. مشاهده‌ی نسخه‌ی کامل با قالب بندی مناسب.
سلام
چگونه می توان عکس را با هر فرمتی در بانک sql ذخیره کرد و دوباره آن را بازیابی کرد؟ :lol:
ذخیره عکس در بانک اطلاعاتی
Dim fs As New FileStream("C:\myImage.bmp", FileMode.OpenOrCreate, FileAccess.Read)
Dim MyData(fs.Length) As Byte
fs.Read(MyData, 0, CInt(fs.Length))
fs.Close()
SqlCommand.Parameters.Item("@Picture").Value = MyData
خواندن عکس از بانک اطلاعاتی
Sub ReadImage(ByVal B() As Byte)
If (B.Length > 0) Then
Dim stream As New MemoryStream(B, True)
stream.Write(B, 0, B.Length)
PB.Image = (New Bitmap(stream))
stream.Close()
End If
End Sub


موفق باشیدSmile
VB.NET 2005
-----------------------------------------------
Function WriteImage() as Byte()
Dim fs As New FileStream("C:\MyPicture.bmp", FileMode.OpenOrCreate, FileAccess.Read)
Dim MyData(fs.Length) As Byte
fs.Read(MyData, 0, CInt(fs.Length))
fs.Close()
Return MyDate()
End Function
------------------------------------------------
Sub ReadImage(ByVal B() As Byte)
If (B.Length > 0) Then
Dim stream As New MemoryStream(B, True)
stream.Write(B, 0, B.Length)
PB.Image = (New Bitmap(stream))
stream.Close()
End If
End Sub
------------------------------------------------