تقييم الموضوع :
  • 0 أصوات - بمعدل 0
  • 1
  • 2
  • 3
  • 4
  • 5
اكثر من جدول
#1
كيف يمكن ادراج بيانات جدولين فى الداتا قرايد
الرد }}}
تم الشكر بواسطة:
#2


عن طريق جملة استعلام


Data from Two Tables in a Single DataGridView
الرد }}}
تم الشكر بواسطة:
#3
PHP كود :
select tb1.tid,tb1.tn,tb2.mo from tb1,tb2 
الرد }}}
تم الشكر بواسطة:
#4
المثال مرفق


الملفات المرفقة
.zip   BindTowTablesInOneDg.zip (الحجم : 45.61 ك ب / التحميلات : 70)
الرد }}}
تم الشكر بواسطة:
#5
PHP كود :
Imports System.Data.OleDb

Public Class Form1
    Dim ax
ay As Integer
    Dim ok 
As Boolean
    
Private Sub fildg()
        
Dim str As String "provider=microsoft.ace.oledb.12.0;data source=|datadirectory|\db.accdb"
        
Dim con As New OleDbConnection(str)
        
Dim ds As New DataSet
        ds
.Clear()
        
DataGridView1.DataSource Nothing

        Dim da 
As New OleDbDataAdapter("select tb1.tid,tb1.tn,tb2.mo from tb1,tb2"con)
        
da.Fill(ds"tb1")
        
DataGridView1.DataSource ds
        DataGridView1
.DataMember "tb1"
        
DataGridView1.Columns(0).HeaderText "م"
        
DataGridView1.Columns(0).Width "60"
        
DataGridView1.Columns(1).HeaderText "الاسم"
        
DataGridView1.Columns(1).Width "200"
        
DataGridView1.Columns(2).HeaderText "الجوال"
        
DataGridView1.Columns(2).Width "200"




    
End Sub
    
Private Sub Panel1_MouseDown(sender As ObjectAs System.Windows.Forms.MouseEventArgsHandles Panel1.MouseDown
        
If e.Button Windows.Forms.MouseButtons.Left Then
            ok 
True
            ax 
Windows.Forms.Cursor.Position.Me.Left
            ay 
Windows.Forms.Cursor.Position.Me.Top
        End 
If
    
End Sub

    
Private Sub Panel1_MouseMove(sender As ObjectAs System.Windows.Forms.MouseEventArgsHandles Panel1.MouseMove
        
If ok Then
            Me
.Left Windows.Forms.Cursor.Position.ax
            Me
.Top Windows.Forms.Cursor.Position.ay

        End 
If
    
End Sub

    
Private Sub Panel1_MouseUp(sender As ObjectAs System.Windows.Forms.MouseEventArgsHandles Panel1.MouseUp
        ok 
False
    End Sub
    
Private Sub Panel1_Paint(sender As System.ObjectAs System.Windows.Forms.PaintEventArgsHandles Panel1.Paint

    End Sub

    
Private Sub Button1_Click(sender As System.ObjectAs System.EventArgsHandles Button1.Click
        Me
.Hide()
        
Me.Dispose()
        
Me.Close()
        
End
    End Sub

    
Private Sub Form1_Load(sender As ObjectAs System.EventArgsHandles Me.Load
        fildg
()
    
End Sub
End 
Class 
الرد }}}
تم الشكر بواسطة: عابر سبيل
#6
اخى سعود والله ما قصرت
جعله الله فى ميزان حسناتك اخى ووفقك لما تحب وترضى
الرد }}}
تم الشكر بواسطة:
#7
اخى الكود نفذ لكن ماذا افعل فى الصفوف المتكررة حيث البيانات عندى تتكرر لان عندى بعض الصفوف المتكررة
الرد }}}
تم الشكر بواسطة:
#8
(14-05-14, 09:09 AM)mesm23 كتب : اخى الكود نفذ لكن ماذا افعل فى الصفوف المتكررة حيث البيانات عندى تتكرر لان عندى بعض الصفوف المتكررة

ضع كلمة DISTINCT بعد كلمة SELECT
الرد }}}
تم الشكر بواسطة: سعود
#9
(14-05-14, 09:58 AM)vbnet كتب :
(14-05-14, 09:09 AM)mesm23 كتب : اخى الكود نفذ لكن ماذا افعل فى الصفوف المتكررة حيث البيانات عندى تتكرر لان عندى بعض الصفوف المتكررة

ضع كلمة DISTINCT بعد كلمة SELECT


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


المواضيع المحتمل أن تكون متشابهة .
الموضوع : الكاتب الردود : المشاهدات : آخر رد
  استعلام يرجع اسماء الاعمدة و نوع البيانات في جدول معين بسام محمدغانم 0 964 23-10-21, 01:43 AM
آخر رد: بسام محمدغانم
  طريقة أضافة اكثر من سيرفر على نفس قاعدة البيانات alim54 0 1,140 20-06-21, 11:20 PM
آخر رد: alim54
  مساعدة من اخوتي برنامج مبيعات سوبرماركت التعامل مع اكثر من زبون في نفس الوقت Mokhtar-mako 1 1,309 16-01-21, 08:43 PM
آخر رد: moosa_alabri
  حفظ اكثر من اربعة حقل بقاعدة اكسس الوضع المنفصل Arfat007 0 1,356 19-10-20, 04:19 PM
آخر رد: Arfat007
  [سؤال] نقل البيانات من جدول إلى أخر SQL Server 2008 semsemalex 7 14,785 19-04-20, 12:00 AM
آخر رد: essamprog2020
  كود حذف صورة من جدول اكسس samira20 1 1,788 05-07-19, 07:50 PM
آخر رد: elgokr
Information [سؤال] انشاء قاعدة بيانات access واضافة جدول وحقول بكود vb.net fefooo29 4 7,947 10-06-19, 09:31 PM
آخر رد: sherf
  استدعاء بيانات من اكثر من جدول المتألق9 1 2,430 04-06-19, 10:29 PM
آخر رد: احمد نعمة السلامي
  عرض اسم عميلين في جدول العملاء بشرط ارقامهم بجدول اخر يونس علي 1 1,601 26-04-19, 03:16 AM
آخر رد: محمد كريّم
  كود تصفير عمود في جدول اكسس samira20 1 2,481 31-03-19, 09:02 PM
آخر رد: بدري

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


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