+- منتدى فيجوال بيسك لكل العرب | منتدى المبرمجين العرب (http://vb4arb.com/vb)
+-- قسم : قسم لغة الفيجوال بيسك VB.NET (http://vb4arb.com/vb/forumdisplay.php?fid=182)
+--- قسم : قسم اسئلة VB.NET (http://vb4arb.com/vb/forumdisplay.php?fid=183)
+--- الموضوع : [VB.NET] inner join 2 databases طرقة عمل استعلام (/showthread.php?tid=23203)
inner join 2 databases طرقة عمل استعلام - ssayed111 - 04-01-18
السلام عليكم ورحمة الله وبركاته
لدي ملفين قاعدة بيانات من نوع اكسس واحتاج لعمل inner join
بين جدول من قاعدة البيانات الاولى وجدول من قاعدة البيانات الثانية
فما هي الطريقة
تحياتي
RE: inner join 2 databases طرقة عمل استعلام - طالب برمجة - 04-01-18
هذا كود لعمل استعلام من قاعدتين بيانات من نوع أكسس
PHP كود :
Dim cn As New OleDbConnection("Provider=Microsoft.ACE.OLEDB.12.0;Data Source=" & Application.StartupPath & "\Database1.accdb;Jet OLEDB:Database Password=xxx")
Dim sql As String = String.Empty
sql &= " SELECT [Table1].Name , "
sql &= " [Table2].Address "
sql &= " FROM [Table1] "
sql &= " INNER JOIN [;database=" & Application.StartupPath & "\Database2.accdb;PWD=xxx].Table2 "
sql &= " ON [Table2].Table1_ID=[Table1].ID "
Using da As New OleDbDataAdapter(sql, cn)
Dim dt As New DataTable
da.Fill(dt)
Me.DataGridView1.DataSource = dt
End Using
لن تتم مطابقة كلمات المرور لأي من قاعدة البيانات إلا إذا كانت مشفرة، وإلا فلن يؤثر وجود الرقم السري في الكود