نمایش تصاویر ذخیره شده در بانک SQL در PictureBox

[yekta1]

سلام خدمت تمامی اساتید و دوستان عزیز
اگه ممکنه یکی لطف کنه کد نمایش تصاویر ذخیره شده در بانک SQL رو در یک PictuerBox را بذاره و اگه ممکن بود بفرمایید چطوری میشه از اون پرینت گرفت .
بی نهایت سپاسگرازم

[nasser_p]

Dim arrPicture As Byte() = CType(frmSearch.DataGrid1.Item(nr, 10), Byte())
Dim ms As New MemoryStream(arrPicture)
PictureBox1.Image = Image.FromStream(ms)
ms.Close


واسه پرینت آن فکر میکنم باید از گزارس گیری استفاده کنی.عکس ذخیره شده در پایگاه خیلی راحت در کریستال ریپورت جواب میدند

[vb_nima]

لطفا یه کم توضیح بدید و کدها را در تگ مناسب بنویسید.

[vb_nima]

این لینک را هم ببین من توضیح دادم هم ذخیره را هم باز کردن عکس را.
http://www.barnamenevis.org/sh...ad.php?t=65904

[CodeMasterX]

اگر اطلاعات عکس رو بصورت باینری ذخیره کرده باشین راه حل یک خط هست:

Dim dataBytes() As Byte

rs.Open "SELECT ImageField FROM tbl_Information" , CN , adOpenStatic,adLockOptimistic



dataBytes = rs.Fields("ImageField").Value

Open App.Path & "\Picture.jpg" For Binary As #1

Put #1 , , dataBytes

Close #1



rs.Close

MsgBox "Done!" , vbInformation

[engineer_vm]

سلام..
دوستمون آقای nasser_p گفته بودن: عکس ذخیره شده در پایگاه خیلی راحت در کریستال ریپورت جواب میدند...!
میخواستم بدونم شما نمونه برنامه داری که عکس از دیتابیس لود بشه و توی کریستال ریپورت نشون داده بشه.. منظورم توی net. بود ..
تا اونجا که من متوجه شدم با کریستال R2 11 میشه انکارو کرد اما متاسفانه هنوز من نتونستم..