نمایش تصویر پرسنل در VSFLEXGRID

[m.4.r.m]

من یه برنامه نوشتم می خوام لیست پرسنل رو نشون بدم البته نام ، نام خانوادگی ، عکس پرسنل یعنی ستون سوم عکس پرسنل رو می خوام نشون بدم خیلی ضروریه کمک کنید ممنون میشم خیلی ضروری .

[hrj1981]

With VSFlexGrid1
.Cell(flexcpPicture, Row, Col) = LoadPicture(PicturePath)
End With

[m.4.r.m]

خوب این درست : اولا من آدرس تصاویر رو توی فیلد img دیتابیس ذخیره کردم مثلا درایو C در ضمن من میخوام وقتی همه پرسنل رو نشون میده مثلا 10 تا پرسنل رو عکس همه 10 تا پرسنل تو گرید نشون بده ممنون میشم .

[m.4.r.m]

به لطف زحمات چند روزه خودم بالاخره خودم کدشو پیدا کردم میزارم اینجا هر کی خواست استفاده کنه البته بگم شما دو تا فیلد تو دیتابیس تولید می کنید به نام های مثلا img , imgview در فیلد img مسیر تصویر رو ذخیره می کنید نه عکس رو دقت کنید فقط مسیر تصویر سپس با کد زیر در imgview توسط آدرس مسیر ذخیره شده در img تصویر رو نمایش میدید .

With VSFlexGrid1

For i = 1 To .Rows - 1
.RowHeight(i) = 2500
.ColWidth(5) = 1700
.Cell(flexcpPicture, i, 5) = LoadPicture(Adodc1.Recordset.Fields("img"))
Adodc1.Recordset.MoveNext
Next i
End With