26-01-22, 09:58 PM
طب بعد اذنكم بالنسبة للطباعة انا أضفت عمود فيه اسم الطابعة لكل صنف بس التقرير عندي بياخد البيانات من الداتا سيت ازاي اعبي الداتا تيبل بصفوف حسب اسم الطابعة من الداتا جريد فيو ودي صور كود الطباعة الداتا تيبل والداتا جرد فيو في جملة اتش يعني لو عندي ١٠ صفوف وفي خمسة بطابعة ebson ازاي اعبي ال ٥ بس
الكود عندي بطبع بال xtrareport
ده اللي بيعبي التقرير
Dim xtr As New XtraReport
Dim dt As New datatable
Dt. Column s. Clear
Dt. Rows. Clear
With dt
Columans. Add("code" )
Columans. Add("item" )
Columans. Add("prentr" )
Columans. Add("total" )
Columans. Add("vat" )
Columans. Add("qty" )
For each d As datagridview in dgvsale. Rows
, Dt. Rows. Add(d. Column s. Value
, D. Column s0, value
D. Column s1. Value
D. Columns2. Value
الي آخره عاوز اعمل شرط لو سطر في الداتا جريد فيو فيه اسم طابعة معينة يضيفة في الداتا تيبل اللي بتعبي الداتا سيت فقط
الكود عندي بطبع بال xtrareport
ده اللي بيعبي التقرير
Dim xtr As New XtraReport
Dim dt As New datatable
Dt. Column s. Clear
Dt. Rows. Clear
With dt
Columans. Add("code" )
Columans. Add("item" )
Columans. Add("prentr" )
Columans. Add("total" )
Columans. Add("vat" )
Columans. Add("qty" )
For each d As datagridview in dgvsale. Rows
, Dt. Rows. Add(d. Column s. Value
, D. Column s0, value
D. Column s1. Value
D. Columns2. Value
الي آخره عاوز اعمل شرط لو سطر في الداتا جريد فيو فيه اسم طابعة معينة يضيفة في الداتا تيبل اللي بتعبي الداتا سيت فقط