كار با عكس

[brownbear]

سلام من از اين كد براي خواندن اطلاعاتم استفاده مي كنم ولي وقتي مي خوام عكس را فراخواني كنم ايراد مي گيره
ديتابيسم هم sql است
با تشكر

Dim cmd1 AsNew SqlCommand("select * from information ", Cnn)
cmd1.CommandText = "select * from information Where (code=" & txtcode.Text & ")"
cmd1.Parameters.Clear()

Cnn.Open()
cmd1.ExecuteNonQuery()
Cnn.Close()
Dim dr As SqlDataReader
Cnn.Open()
dr = cmd1.ExecuteReader
While (dr.Read())
txtname.Text = dr("fname") : txtcard.Text = dr("card")
txtfamily.Text = dr("lname") : txtfather.Text = dr("faname")
txtsh.Text = dr("sh") : covahed.Text = dr("vahed")
cosemat.Text = dr("semat")
txtuser.Text = dr("usern")
txtpass.Text = dr("pass") : cmbgrade.Text = dr("grade")
picbox.Image = (dr("aks"))

وقتي مي خواد picbox.image رو لود كنه ايراد مي گيره

[brownbear]

سلام
یعنی اینقدر سخته
اگه میشه یه کدی برام بنویسید که یه عکسو تو دیتابیس جستجو کنه و تو picbox نمایش بده

[Navid Asadi]

دوست عزیز نحوه ذخیره سازی شما بسیار مهم هستش...
من برای این کار از روش زیر برای ذخیره استفاده میکنم:
Cmd.Parameters.Add(New SqlClient.SqlParameter("Pic", SqlDbType.Binary)).Value = IO.File.ReadAllBytes(pic)
البته میتونید از همین روش برای ذخیره به صورت image هم استفاده کنید...
اما برای فراخوانی :
Dim arrPicture() As Byte = CType(DataGridView1.CurrentRow.Cells("pic").Value, Byte())
Dim ms As New MemoryStream(arrPicture)
PictureBox2.BackgroundImage = System.Drawing.Image.FromStream(ms)

خیلی ها میگن این روش باعث کندی میشه که من موافق نیستم!

[Navid Asadi]

راستی یادم رفت بگه تو روش بالا من عکس رو از grid خواندم که با خوندن از dataview و dataset فرقی نداره

[brownbear]

سلام
من درست متوجه نشدم
من می خوام یک عکس رو که تو دیتابیس ذخیره کردم توی یک PICBOX بیارم شما عکسو از دیتاگرید آوردین من می خوام مثلا با شماره عکس اونو توی دیتابیس جستجو کنم و توی PIC BOX نمایش بدم

[Navid Asadi]

خوب به جای :
DataGridView1.CurrentRow.Cells("pic").Value
کد زیر رو بنویس ()برای دیتاست :
dataset.Tables("Your Table").Rows(Your row index).Item(your item index or name)

[brownbear]

با تشکر از شما دوست عزیز