تقييم الموضوع :
  • 0 أصوات - بمعدل 0
  • 1
  • 2
  • 3
  • 4
  • 5
طلب كود تعبئة اعمدة محددة لجدولين مختلفين الى DataGridView
#1
السلام عليكم  اخوة 
مطلوب  كود    vb لجلب   بيانات   من عمودين  في  جدولين مختلفين   الى  داتا  جريد فيو    مثلا  عندنا   جدول  الاول اسمه  A وفيه اعمدة اسمها 1..2 ..3.....وعندنا جدول اسمع B  وفيه اعمدة اسمها  4  و 5  و6  ..... المطلوب  كود   يجلب  العمود  1  من  الجدول  A  و يجلب   العمود 4  من  الجدول B...  وتعبئتهما  في  داتا جريد فيو ......قاعدة البيانات  الاكسيس
الرد }}
تم الشكر بواسطة: ابو انس
#2
وعليكم السلام
كود لجلب بيانات من جدولين / سيكوال سيرفر اتمنى انه ينجح مع اكسس/
كود :
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 هو متغير داتاتيبل تمت تعبئة البيانات فيه
سورس كود برنامج محاسبة ومبيعات احترافي ومتكامل- قم بالاطلاع على البرنامج 

واتساب 00963951283515
الرد }}
تم الشكر بواسطة: egy_program
#3
(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
الرد }}
تم الشكر بواسطة:
#4
انا افهم من سؤالك انك تعرف كيف تجلب بيانات من جدول
تصرف وكأنك تتعامل مع جدول واحد
الكود الاول هو استعلام ضعه في نفس المكان الذي تضع فيه استعلام جلب بيانات من جدول واحد
ولا تنسى ان تغير اسماء الجداول والحقول بما يتوافق عندك انا استخدمت الاحرف A و B والارقام 1 و 4 بناء على التسميات التي ذكرتها انت في سؤالك
سورس كود برنامج محاسبة ومبيعات احترافي ومتكامل- قم بالاطلاع على البرنامج 

واتساب 00963951283515
الرد }}
تم الشكر بواسطة:
#5
(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
الرد }}
تم الشكر بواسطة:
#6
كما ذكرت لك قي السطر الثاني من مشاركتي الاولى الكود للسيكوال
ولكن للاسف يظهر انه لا يعمل مع اكسس
سورس كود برنامج محاسبة ومبيعات احترافي ومتكامل- قم بالاطلاع على البرنامج 

واتساب 00963951283515
الرد }}
تم الشكر بواسطة:



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


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