تقييم الموضوع :
  • 0 أصوات - بمعدل 0
  • 1
  • 2
  • 3
  • 4
  • 5
[VB.NET] نسخ بيانات من داتاجريد فيو لاخري
#1
السلام عليكم ورحمة الله وبركاتة 


اريد نسخ بيانات من داتاجريد فيو لاخري حيث الاتي 

الاولي تحتوي علي اربع اعمدة 


   

والثانية تحتوي علي 8 اعمدة هم في الواقع تكرار للداتاجريد الاولي ولكن لكي يتم تجميع البيانات بجوار بعض 


   

ما ايدة تجميع البيانات من الداتاجريد فيو الاولي بالثانية بحيث تصبح الاعمدة التي تبدا داخل العمود الاول بحرف A  باول الداتاجريد فيو والتي تحمل رمزB بالجزء التاني بالداتاجريد فيو 2 علي نفس الاسم الخاص بيها

   

ويصبح الشكل النهائي مع العلم يمكن اعمدة حرف A ان تكون اكتر او العكس ولكن الطلب كما هو  تجميع البيانات بجوار البعض حتي وان ظهرت بعض الحقول فارغة عند عدم تساوي الحقول بين A,B  ليس هاما المهم التجميع 


   

حاولت بالكود التالي النتيجة طلعت بالشكل دة 


كود :
  For ii = 0 To DATAG_CLIENT.Rows.Count - 1



               If DATAG_CLIENT.Rows(ii).Cells(0).Value.ToString.Contains("A") Then
                   PRINTSHOW.DATGR_PRINT.Rows(ii).Cells(0).Value = DATAG_CLIENT.Rows(ii).Cells(2).Value
                   PRINTSHOW.DATGR_PRINT.Rows(ii).Cells(1).Value = DATAG_CLIENT.Rows(ii).Cells(3).Value
                   PRINTSHOW.DATGR_PRINT.Rows(ii).Cells(2).Value = DATAG_CLIENT.Rows(ii).Cells(4).Value
                   PRINTSHOW.DATGR_PRINT.Rows(ii).Cells(3).Value = DATAG_CLIENT.Rows(ii).Cells(5).Value

               End If

               If DATAG_CLIENT.Rows(ii).Cells(0).Value.ToString.Contains("B") Then


                   PRINTSHOW.DATGR_PRINT.Rows(ii).Cells(4).Value = DATAG_CLIENT.Rows(ii).Cells(2).Value
                   PRINTSHOW.DATGR_PRINT.Rows(ii).Cells(5).Value = DATAG_CLIENT.Rows(ii).Cells(3).Value
                   PRINTSHOW.DATGR_PRINT.Rows(ii).Cells(6).Value = DATAG_CLIENT.Rows(ii).Cells(4).Value
                   PRINTSHOW.DATGR_PRINT.Rows(ii).Cells(7).Value = DATAG_CLIENT.Rows(ii).Cells(5).Value

               End If


           Next


النتيجة بالشكل دة 

   


الملفات المرفقة صورة/صور
   
الرد
تم الشكر بواسطة:


المواضيع المحتمل أن تكون متشابهة .
الموضوع : الكاتب الردود : المشاهدات : آخر رد
  العمل على قاعدة بيانات أونلاين وأوفلاين بنفس الوقت بشار نصري 0 50 21-04-21, 11:49 PM
آخر رد: بشار نصري
  البحث في بيانات الجريد عن نص مكتوب في RichTextBox aftfm 5 146 09-04-21, 08:07 PM
آخر رد: messry
  [سؤال] كيفية التعامل مع عدة قواعد بيانات ابو انس 6 319 26-03-21, 02:52 AM
آخر رد: ابو انس
Rainbow [سؤال] سؤال عن طريقة توصيل كامبرا الموبايل بقاعدة بيانات خالد دياب 0 175 25-03-21, 07:13 PM
آخر رد: خالد دياب
  [سؤال] ممكن فكرة حفظ عدد غير معلوم من الصور بقاعدة بيانات سيكوال ahmedramzyaish 1 280 12-03-21, 09:34 PM
آخر رد: محمد فوزى محمد
  قاعدة بيانات Sql Server ghias 2 340 28-02-21, 08:57 AM
آخر رد: العتيق
  [VB.NET] كيفية حفظ ملف pdf الي قاعدة بيانات اكسس واسترجاعها Lathe1 5 394 20-02-21, 12:47 AM
آخر رد: Lathe1
  كيفية حفظ ملف pdf الي قاعدة بيانات اكسس واسترجاعها Lathe1 0 200 19-02-21, 10:04 AM
آخر رد: Lathe1
  تثبيت قاعدة بيانات SQL على جهاز العميل Owz 3 379 18-02-21, 11:04 PM
آخر رد: ابو انس
  [سؤال] سؤال كيفية حفظ بيانات مع تشفيرها alims 8 706 18-02-21, 10:54 PM
آخر رد: سعيد كنيمو

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


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