منتدى فيجوال بيسك لكل العرب | منتدى المبرمجين العرب
طلب كود تعبئة اعمدة محددة لجدولين مختلفين الى DataGridView - نسخة قابلة للطباعة

+- منتدى فيجوال بيسك لكل العرب | منتدى المبرمجين العرب (http://vb4arb.com/vb)
+-- قسم : قسم لغة الفيجوال بيسك VB.NET (http://vb4arb.com/vb/forumdisplay.php?fid=182)
+--- قسم : قسم اسئلة VB.NET (http://vb4arb.com/vb/forumdisplay.php?fid=183)
+--- الموضوع : طلب كود تعبئة اعمدة محددة لجدولين مختلفين الى DataGridView (/showthread.php?tid=39279)

طلب كود تعبئة اعمدة محددة لجدولين مختلفين الى DataGridView - bilgacim - 11-08-21

السلام عليكم  اخوة 
مطلوب  كود    vb لجلب   بيانات   من عمودين  في  جدولين مختلفين   الى  داتا  جريد فيو    مثلا  عندنا   جدول  الاول اسمه  A وفيه اعمدة اسمها 1..2 ..3.....وعندنا جدول اسمع B  وفيه اعمدة اسمها  4  و 5  و6  ..... المطلوب  كود   يجلب  العمود  1  من  الجدول  A  و يجلب   العمود 4  من  الجدول B...  وتعبئتهما  في  داتا جريد فيو ......قاعدة البيانات  الاكسيس

RE: طلب كود تعبئة اعمدة محددة لجدولين مختلفين الى DataGridView - ابو انس - 11-08-21

وعليكم السلام
كود لجلب بيانات من جدولين / سيكوال سيرفر اتمنى انه ينجح مع اكسس/
كود :
select A.1,B.4 from A,B
كود لادخال البيانات التي تم جلبها الى داتا جريد فيو
كود :
For I As Integer = 0 To DT.Rows.Count - 1
               DGV.Rows(I).Cells(0).Value = DT.Rows(I)(0).ToString()
               DGV.Rows(I).Cells(1).Value = DT.Rows(I)(1).ToString()
         NEXT
حيث DT هو متغير داتاتيبل تمت تعبئة البيانات فيه

RE: طلب كود تعبئة اعمدة محددة لجدولين مختلفين الى DataGridView - bilgacim - 11-08-21

(11-08-21, 08:46 AM)ابو انس كتب : وعليكم السلام
كود لجلب بيانات من جدولين / سيكوال سيرفر اتمنى انه ينجح مع اكسس/
كود :
select A.1,B.4 from A,B
كود لادخال البيانات التي تم جلبها الى داتا جريد فيو
كود :
For I As Integer = 0 To DT.Rows.Count - 1
               DGV.Rows(I).Cells(0).Value = DT.Rows(I)(0).ToString()
               DGV.Rows(I).Cells(1).Value = DT.Rows(I)(1).ToString()
         NEXT
حيث DT هو متغير داتاتيبل تمت تعبئة البيانات فيه


للاسف لم تنجح   ممكن  توضيح اين اضع الكود الاول ؟؟؟   .....
كود :
select A.1,B.4 from A,B


RE: طلب كود تعبئة اعمدة محددة لجدولين مختلفين الى DataGridView - ابو انس - 11-08-21

انا افهم من سؤالك انك تعرف كيف تجلب بيانات من جدول
تصرف وكأنك تتعامل مع جدول واحد
الكود الاول هو استعلام ضعه في نفس المكان الذي تضع فيه استعلام جلب بيانات من جدول واحد
ولا تنسى ان تغير اسماء الجداول والحقول بما يتوافق عندك انا استخدمت الاحرف A و B والارقام 1 و 4 بناء على التسميات التي ذكرتها انت في سؤالك

RE: طلب كود تعبئة اعمدة محددة لجدولين مختلفين الى DataGridView - bilgacim - 11-08-21

(11-08-21, 06:25 PM)ابو انس كتب : انا افهم من سؤالك انك تعرف كيف تجلب بيانات من جدول
تصرف وكأنك تتعامل مع جدول واحد
الكود الاول هو استعلام ضعه في نفس المكان الذي تضع فيه استعلام جلب بيانات من جدول واحد
ولا تنسى ان تغير اسماء الجداول والحقول بما يتوافق عندك انا استخدمت الاحرف  A و B والارقام 1 و 4 بناء على التسميات التي ذكرتها انت في سؤالك

نعم اخي  الكريم  :   وضعتها  في مكانها  لكن لم ينجح  في  جلب  والكود الكامل  لجلب البيانات  هو  هذا 

كود :
Imports System.Data.OleDb

Public Class Form16

   Dim con As New OleDbConnection("Provider=Microsoft.ACE.OLEDB.12.0; Data Source=DA.accdb")
   Dim da As New OleDbDataAdapter()
   Dim dt As New DataTable



   Sub load_data()
       dt.Clear()
       da = New OleDbDataAdapter("Select * From TAB12", con)
       da.Fill(dt)
   End Sub

   Sub save_date()
       Dim save As New OleDbCommandBuilder(da)
       save.QuotePrefix = "["
       save.QuoteSuffix = "]"
       da.Update(dt)
       dt.AcceptChanges()
   End Sub


RE: طلب كود تعبئة اعمدة محددة لجدولين مختلفين الى DataGridView - ابو انس - 11-08-21

كما ذكرت لك قي السطر الثاني من مشاركتي الاولى الكود للسيكوال
ولكن للاسف يظهر انه لا يعمل مع اكسس