06-06-15, 01:59 AM
(06-06-15, 01:09 AM)ابوميار كتب : الحمد لله تم الوصول الى الحل وبواسطه الشرح للاستاذ احمد النجار
وكان الخطا عندى فى جمله الاستعلام
وده الكود وهو استعلام من اكثر من جدول وعرضها فى الجريد فيو
لتعم الفائده
Dim fat = (From d In DBVariable.Data.masterfatoras Join s In DBVariable.Data.fatoras On d.ID Equals s.mid
Join asn In DBVariable.Data.asnafs On s.idname Equals asn.ID
Join sup In DBVariable.Data.suppliers On d.idmord Equals sup.ID
Where d.num.Contains(txt)
Select asn.code, asn.Name, asn.unit, s.qty, s.price, s.totprice)
gridshraa.DataSource = fat
gridshraa.Columns(0).HeaderText = "كود الصنف"
gridshraa.Columns(1).HeaderText = "اسم الصنف"
gridshraa.Columns(2).HeaderText = "الوحدة"
gridshraa.Columns(3).HeaderText = "ألكميه"
gridshraa.Columns(4).HeaderText = "سعر "
gridshraa.Columns(5).HeaderText = "الاجمالى"
gridshraa.DataSource = fat
الحمد لله ان دروسي كانت مفيدة لك 

