تقييم الموضوع :
  • 0 أصوات - بمعدل 0
  • 1
  • 2
  • 3
  • 4
  • 5
مشكله في طباعة التقرير يوجد تكرار
#11
(28-10-22, 11:33 PM)Taha Okla كتب : أتمنى لو كنت أستطيع مساعدتك في هذا الأمر
ولكن للأسف لم أٌقم بتزيل الـ SQL Server  على أي جهاز عندي 

وبدون تجريب لا يمكنني التأكد من الأمر .

عسى أن يستطيع أحد الاخوة هنا مساعدتك ..

ولكن يفضل أن ترفق مثال فيه نفس المشكلة حتى يستطيعوا مساعدتك فيه....
وبدون مشروع لا أظن ستجد من يتفرغ ليصنع لك مشروع من الصفر.

انا الدي احاول فعله مثل الاخ خالد السعداني في فيديو التالي شاهد من دقيقة 21:43 
ماعرفت كيف اعمل مثله مرفق فيديو 
ياريت تقول لي كيف 
كود :
https://www.youtube.com/watch?v=8jfsMN33MUQ&t=1853s
الرد }}}
تم الشكر بواسطة:
#12
(28-10-22, 11:20 PM)ali_ahmed12 كتب :
(28-10-22, 07:39 PM)ali_ahmed12 كتب :
(28-10-22, 07:07 PM)Taha Okla كتب :
(28-10-22, 05:21 PM)ali_ahmed12 كتب : السلام عليكم ورحمة الله وبركاته
لدي مشكلة في عملية طباعة التقرير وهو يطبع موجود في فاتورة مع موجود سابقا 
مرفق كود طباعة واستعلام التقرير 
كود :
Dim CR As New CrystalReport5
       Form_print.CrystalReportViewer1.ReportSource = CR
       Form_print.Show()

كود :
create  proc [dbo].[Get_order_detils_for_print]  
as
SELECT Tbl_Order_detils.ID_product
     ,Tbl_Orderes.Des
      ,Tbl_Orderes.ID_Order
        ,order_date
        ,salesman
        ,TBL_Customers.ID
        ,TBL_Customers.FullName
        ,TBL_Customers.TEL
        ,PRODUCTS.ID_product
        ,PRODUCTS.label
     ,Tbl_Order_detils.Qty
     ,Tbl_Order_detils.price
     ,Tbl_Order_detils.Amount
 FROM [dbo].[Tbl_Order_detils]
inner join Tbl_Orderes
on Tbl_Orderes.ID_Order=Tbl_Order_detils.ID_Order
inner join TBL_Customers
on TBL_Customers.ID=Tbl_Orderes.ID_CUSTOMER
inner join PRODUCTS
on PRODUCTS.ID_product=Tbl_Order_detils.ID_product


وعليكم السلام ورحمة الله وبركاته


راجع معلوماتك في الـ SQL
المشكلة في الاستعلام ..
يجب أن تحدد على أي أساس تريد طباعة التقرير 
(Where)

غيرت فيه  اجراء مخزن ولزالت نفس مشكله
كود :
ALTER  proc [dbo].[Get_order_detils_for_print]  
@id int
as
SELECT Tbl_Order_detils.ID_product
     ,Tbl_Orderes.Des
      ,Tbl_Orderes.ID_Order
        ,order_date
        ,salesman
        ,TBL_Customers.ID
        ,TBL_Customers.FullName
        ,TBL_Customers.TEL
        ,PRODUCTS.ID_product
        ,PRODUCTS.label
     ,Tbl_Order_detils.Qty
     ,Tbl_Order_detils.price
     ,Tbl_Order_detils.Amount
 FROM [dbo].[Tbl_Order_detils]
inner join Tbl_Orderes
on Tbl_Orderes.ID_Order=Tbl_Order_detils.ID_Order
inner join TBL_Customers
on TBL_Customers.ID=Tbl_Orderes.ID_CUSTOMER
inner join PRODUCTS
on PRODUCTS.ID_product=Tbl_Order_detils.ID_product
where Tbl_Orderes.ID_Order=@id
وهدا كود طباعه تكست بوكس 2 وهو رقم فاتورة id_order ولزالت نفس مشكله يوجد تكرار في تقرير 
كود :
 Dim CR As New CrystalReport5
       CR.SetParameterValue("@id", TextBox2.Text)
       Form_print.CrystalReportViewer1.ReportSource = CR
       Form_print.Show()
هدا تكرار في صورة اخر اثنين منتجات اثنين جدد اما فوق منهم من فاتورة سابقة هدا تكرار اقصد به في الطباعه
لا يزال يوجد تكرار اثناء طباعه سابق مع جديد ماحل اخ طه

هذه الطريقة التي اعمل عليها لطباعة تقرير سجل واحد محدد ب id
اعمل استدعاء الاستعلام من الفيجوال بيسيك ثم اربط النتيجة DT بالتقرير CR.SetDataSource
PHP كود :
Dim CR As New CrystalReport5

Dim DT 
As New DataTable
Dim DA 
As New SqlDataAdapter("Get_order_detils_for_print"con)
DA.SelectCommand.CommandType CommandType.StoredProcedure
DA
.SelectCommand.Parameters.AddWithValue("@id"TextBox2.Text)

DA.Fill(DT)
CR.SetDataSource(DT)

Form_print.CrystalReportViewer1.ReportSource CR
Form_print
.Show() 
الرد }}}
تم الشكر بواسطة:
#13
(29-10-22, 02:31 PM)O27 كتب :
(28-10-22, 11:20 PM)ali_ahmed12 كتب :
(28-10-22, 07:39 PM)ali_ahmed12 كتب :
(28-10-22, 07:07 PM)Taha Okla كتب :
(28-10-22, 05:21 PM)ali_ahmed12 كتب : السلام عليكم ورحمة الله وبركاته
لدي مشكلة في عملية طباعة التقرير وهو يطبع موجود في فاتورة مع موجود سابقا 
مرفق كود طباعة واستعلام التقرير 
كود :
Dim CR As New CrystalReport5
       Form_print.CrystalReportViewer1.ReportSource = CR
       Form_print.Show()

كود :
create  proc [dbo].[Get_order_detils_for_print]  
as
SELECT Tbl_Order_detils.ID_product
     ,Tbl_Orderes.Des
      ,Tbl_Orderes.ID_Order
        ,order_date
        ,salesman
        ,TBL_Customers.ID
        ,TBL_Customers.FullName
        ,TBL_Customers.TEL
        ,PRODUCTS.ID_product
        ,PRODUCTS.label
     ,Tbl_Order_detils.Qty
     ,Tbl_Order_detils.price
     ,Tbl_Order_detils.Amount
 FROM [dbo].[Tbl_Order_detils]
inner join Tbl_Orderes
on Tbl_Orderes.ID_Order=Tbl_Order_detils.ID_Order
inner join TBL_Customers
on TBL_Customers.ID=Tbl_Orderes.ID_CUSTOMER
inner join PRODUCTS
on PRODUCTS.ID_product=Tbl_Order_detils.ID_product


وعليكم السلام ورحمة الله وبركاته


راجع معلوماتك في الـ SQL
المشكلة في الاستعلام ..
يجب أن تحدد على أي أساس تريد طباعة التقرير 
(Where)

غيرت فيه  اجراء مخزن ولزالت نفس مشكله
كود :
ALTER  proc [dbo].[Get_order_detils_for_print]  
@id int
as
SELECT Tbl_Order_detils.ID_product
     ,Tbl_Orderes.Des
      ,Tbl_Orderes.ID_Order
        ,order_date
        ,salesman
        ,TBL_Customers.ID
        ,TBL_Customers.FullName
        ,TBL_Customers.TEL
        ,PRODUCTS.ID_product
        ,PRODUCTS.label
     ,Tbl_Order_detils.Qty
     ,Tbl_Order_detils.price
     ,Tbl_Order_detils.Amount
 FROM [dbo].[Tbl_Order_detils]
inner join Tbl_Orderes
on Tbl_Orderes.ID_Order=Tbl_Order_detils.ID_Order
inner join TBL_Customers
on TBL_Customers.ID=Tbl_Orderes.ID_CUSTOMER
inner join PRODUCTS
on PRODUCTS.ID_product=Tbl_Order_detils.ID_product
where Tbl_Orderes.ID_Order=@id
وهدا كود طباعه تكست بوكس 2 وهو رقم فاتورة id_order ولزالت نفس مشكله يوجد تكرار في تقرير 
كود :
 Dim CR As New CrystalReport5
       CR.SetParameterValue("@id", TextBox2.Text)
       Form_print.CrystalReportViewer1.ReportSource = CR
       Form_print.Show()
هدا تكرار في صورة اخر اثنين منتجات اثنين جدد اما فوق منهم من فاتورة سابقة هدا تكرار اقصد به في الطباعه
لا يزال يوجد تكرار اثناء طباعه سابق مع جديد ماحل اخ طه

هذه الطريقة التي اعمل عليها لطباعة تقرير سجل واحد محدد ب id
اعمل استدعاء الاستعلام من الفيجوال بيسيك ثم اربط النتيجة DT بالتقرير CR.SetDataSource
PHP كود :
Dim CR As New CrystalReport5

Dim DT 
As New DataTable
Dim DA 
As New SqlDataAdapter("Get_order_detils_for_print"con)
DA.SelectCommand.CommandType CommandType.StoredProcedure
DA
.SelectCommand.Parameters.AddWithValue("@id"TextBox2.Text)

DA.Fill(DT)
CR.SetDataSource(DT)

Form_print.CrystalReportViewer1.ReportSource CR
Form_print
.Show() 

يظهر خطا اثناء الطباعة
كود :
Dim CR As New CrystalReport5

       Dim DT As New DataTable
       Dim DA As New SqlDataAdapter("Get_order_detils_for_print", Module1.con)
       DA.SelectCommand.CommandType = CommandType.StoredProcedure
       DA.SelectCommand.Parameters.AddWithValue("@id", TextBox2.Text)

       DA.Fill(DT)
       CR.SetDataSource(DT)

       Form_print.CrystalReportViewer1.ReportSource = CR
       Form_print.Show()


الملفات المرفقة صورة/صور
   
الرد }}}
تم الشكر بواسطة:
#14
(29-10-22, 02:40 PM)ali_ahmed12 كتب :
(29-10-22, 02:31 PM)O27 كتب :
(28-10-22, 11:20 PM)ali_ahmed12 كتب :
(28-10-22, 07:39 PM)ali_ahmed12 كتب :
(28-10-22, 07:07 PM)Taha Okla كتب : وعليكم السلام ورحمة الله وبركاته


راجع معلوماتك في الـ SQL
المشكلة في الاستعلام ..
يجب أن تحدد على أي أساس تريد طباعة التقرير 
(Where)

غيرت فيه  اجراء مخزن ولزالت نفس مشكله
كود :
ALTER  proc [dbo].[Get_order_detils_for_print]  
@id int
as
SELECT Tbl_Order_detils.ID_product
     ,Tbl_Orderes.Des
      ,Tbl_Orderes.ID_Order
        ,order_date
        ,salesman
        ,TBL_Customers.ID
        ,TBL_Customers.FullName
        ,TBL_Customers.TEL
        ,PRODUCTS.ID_product
        ,PRODUCTS.label
     ,Tbl_Order_detils.Qty
     ,Tbl_Order_detils.price
     ,Tbl_Order_detils.Amount
 FROM [dbo].[Tbl_Order_detils]
inner join Tbl_Orderes
on Tbl_Orderes.ID_Order=Tbl_Order_detils.ID_Order
inner join TBL_Customers
on TBL_Customers.ID=Tbl_Orderes.ID_CUSTOMER
inner join PRODUCTS
on PRODUCTS.ID_product=Tbl_Order_detils.ID_product
where Tbl_Orderes.ID_Order=@id
وهدا كود طباعه تكست بوكس 2 وهو رقم فاتورة id_order ولزالت نفس مشكله يوجد تكرار في تقرير 
كود :
 Dim CR As New CrystalReport5
       CR.SetParameterValue("@id", TextBox2.Text)
       Form_print.CrystalReportViewer1.ReportSource = CR
       Form_print.Show()
هدا تكرار في صورة اخر اثنين منتجات اثنين جدد اما فوق منهم من فاتورة سابقة هدا تكرار اقصد به في الطباعه
لا يزال يوجد تكرار اثناء طباعه سابق مع جديد ماحل اخ طه

هذه الطريقة التي اعمل عليها لطباعة تقرير سجل واحد محدد ب id
اعمل استدعاء الاستعلام من الفيجوال بيسيك ثم اربط النتيجة DT بالتقرير CR.SetDataSource
PHP كود :
Dim CR As New CrystalReport5

Dim DT 
As New DataTable
Dim DA 
As New SqlDataAdapter("Get_order_detils_for_print"con)
DA.SelectCommand.CommandType CommandType.StoredProcedure
DA
.SelectCommand.Parameters.AddWithValue("@id"TextBox2.Text)

DA.Fill(DT)
CR.SetDataSource(DT)

Form_print.CrystalReportViewer1.ReportSource CR
Form_print
.Show() 

يظهر خطا اثناء الطباعة
كود :
Dim CR As New CrystalReport5

       Dim DT As New DataTable
       Dim DA As New SqlDataAdapter("Get_order_detils_for_print", Module1.con)
       DA.SelectCommand.CommandType = CommandType.StoredProcedure
       DA.SelectCommand.Parameters.AddWithValue("@id", TextBox2.Text)

       DA.Fill(DT)
       CR.SetDataSource(DT)

       Form_print.CrystalReportViewer1.ReportSource = CR
       Form_print.Show()

قم بتعديل خصائص المشروع في TargetCPU إلى x86

ثم في ملف app.config عدل الجزء startup ليكون كالتالي
PHP كود :
<startup useLegacyV2RuntimeActivationPolicy="true"><supportedRuntime version="v4.0" sku=".NETFramework,Version=v4.0"/></startup


إذا استمرت المشكلة عليك بمراجعة هذه المشاركة
(28-10-22, 11:33 PM)Taha Okla كتب : أتمنى لو كنت أستطيع مساعدتك في هذا الأمر
ولكن للأسف لم أٌقم بتزيل الـ SQL Server  على أي جهاز عندي 

وبدون تجريب لا يمكنني التأكد من الأمر .

عسى أن يستطيع أحد الاخوة هنا مساعدتك ..

ولكن يفضل أن ترفق مثال فيه نفس المشكلة حتى يستطيعوا مساعدتك فيه....
وبدون مشروع لا أظن ستجد من يتفرغ ليصنع لك مشروع من الصفر.
الرد }}}
تم الشكر بواسطة:
#15
(29-10-22, 04:10 PM)O27 كتب :
(29-10-22, 02:40 PM)ali_ahmed12 كتب :
(29-10-22, 02:31 PM)O27 كتب :
(28-10-22, 11:20 PM)ali_ahmed12 كتب :
(28-10-22, 07:39 PM)ali_ahmed12 كتب : غيرت فيه  اجراء مخزن ولزالت نفس مشكله
كود :
ALTER  proc [dbo].[Get_order_detils_for_print]  
@id int
as
SELECT Tbl_Order_detils.ID_product
     ,Tbl_Orderes.Des
      ,Tbl_Orderes.ID_Order
        ,order_date
        ,salesman
        ,TBL_Customers.ID
        ,TBL_Customers.FullName
        ,TBL_Customers.TEL
        ,PRODUCTS.ID_product
        ,PRODUCTS.label
     ,Tbl_Order_detils.Qty
     ,Tbl_Order_detils.price
     ,Tbl_Order_detils.Amount
 FROM [dbo].[Tbl_Order_detils]
inner join Tbl_Orderes
on Tbl_Orderes.ID_Order=Tbl_Order_detils.ID_Order
inner join TBL_Customers
on TBL_Customers.ID=Tbl_Orderes.ID_CUSTOMER
inner join PRODUCTS
on PRODUCTS.ID_product=Tbl_Order_detils.ID_product
where Tbl_Orderes.ID_Order=@id
وهدا كود طباعه تكست بوكس 2 وهو رقم فاتورة id_order ولزالت نفس مشكله يوجد تكرار في تقرير 
كود :
 Dim CR As New CrystalReport5
       CR.SetParameterValue("@id", TextBox2.Text)
       Form_print.CrystalReportViewer1.ReportSource = CR
       Form_print.Show()
هدا تكرار في صورة اخر اثنين منتجات اثنين جدد اما فوق منهم من فاتورة سابقة هدا تكرار اقصد به في الطباعه
لا يزال يوجد تكرار اثناء طباعه سابق مع جديد ماحل اخ طه

هذه الطريقة التي اعمل عليها لطباعة تقرير سجل واحد محدد ب id
اعمل استدعاء الاستعلام من الفيجوال بيسيك ثم اربط النتيجة DT بالتقرير CR.SetDataSource
PHP كود :
Dim CR As New CrystalReport5

Dim DT 
As New DataTable
Dim DA 
As New SqlDataAdapter("Get_order_detils_for_print"con)
DA.SelectCommand.CommandType CommandType.StoredProcedure
DA
.SelectCommand.Parameters.AddWithValue("@id"TextBox2.Text)

DA.Fill(DT)
CR.SetDataSource(DT)

Form_print.CrystalReportViewer1.ReportSource CR
Form_print
.Show() 

يظهر خطا اثناء الطباعة
كود :
Dim CR As New CrystalReport5

       Dim DT As New DataTable
       Dim DA As New SqlDataAdapter("Get_order_detils_for_print", Module1.con)
       DA.SelectCommand.CommandType = CommandType.StoredProcedure
       DA.SelectCommand.Parameters.AddWithValue("@id", TextBox2.Text)

       DA.Fill(DT)
       CR.SetDataSource(DT)

       Form_print.CrystalReportViewer1.ReportSource = CR
       Form_print.Show()

قم بتعديل خصائص المشروع في TargetCPU إلى x86

ثم في ملف app.config عدل الجزء startup ليكون كالتالي
PHP كود :
<startup useLegacyV2RuntimeActivationPolicy="true"><supportedRuntime version="v4.0" sku=".NETFramework,Version=v4.0"/></startup


إذا استمرت المشكلة عليك بمراجعة هذه المشاركة
(28-10-22, 11:33 PM)Taha Okla كتب : أتمنى لو كنت أستطيع مساعدتك في هذا الأمر
ولكن للأسف لم أٌقم بتزيل الـ SQL Server  على أي جهاز عندي 

وبدون تجريب لا يمكنني التأكد من الأمر .

عسى أن يستطيع أحد الاخوة هنا مساعدتك ..

ولكن يفضل أن ترفق مثال فيه نفس المشكلة حتى يستطيعوا مساعدتك فيه....
وبدون مشروع لا أظن ستجد من يتفرغ ليصنع لك مشروع من الصفر.

يظهر تقرير فارغ
الرد }}}
تم الشكر بواسطة:



التنقل السريع :


يقوم بقرائة الموضوع: بالاضافة الى ( 1 ) ضيف كريم