منتدى فيجوال بيسك لكل العرب | منتدى المبرمجين العرب
[VB.NET] كيف يمكنني الإتصال بملف قاعدة البيانات نوع Paradox - نسخة قابلة للطباعة

+- منتدى فيجوال بيسك لكل العرب | منتدى المبرمجين العرب (http://vb4arb.com/vb)
+-- قسم : قسم قواعد البيانات (http://vb4arb.com/vb/forumdisplay.php?fid=40)
+--- قسم : قسم أسئلة قواعد البيانات تحت بيئة الـ.NET (http://vb4arb.com/vb/forumdisplay.php?fid=41)
+--- الموضوع : [VB.NET] كيف يمكنني الإتصال بملف قاعدة البيانات نوع Paradox (/showthread.php?tid=21026)



كيف يمكنني الإتصال بملف قاعدة البيانات نوع Paradox - sniperjawadino - 12-07-17

السلام عليكم إخواني

كيف يمكنني الإتصال بملف قاعدة البيانات نوع Paradox
الملف بالمرفقات


وجدت بعض المواقع الأجنبية تتحدث عن ذلك
لكن لم ينجح معي أي كود


لكم كل الشكر


RE: كيف يمكنني الإتصال بملف قاعدة البيانات نوع Paradox - mstfa1991 - 12-07-17

الطريقة التي أعرفها هي عن طريق ODBC
اضف قاعدة البيانات الى ODBC واعطها اسم مثل mydb
ثم استخدم OdbcConnection من System.Data.Odbc ،،،،،،،،،،،،لاحظ  Odbc وليس OleDb
وهذا كود الاتصال
PHP كود :
Dim con As New System.Data.Odbc.OdbcConnection("Dsn=mydb"



RE: كيف يمكنني الإتصال بملف قاعدة البيانات نوع Paradox - sniperjawadino - 12-07-17

(12-07-17, 02:57 AM)mstfa1991 كتب : الطريقة التي أعرفها هي عن طريق ODBC
اضف قاعدة البيانات الى ODBC واعطها اسم مثل mydb
ثم استخدم OdbcConnection من System.Data.Odbc ،،،،،،،،،،،،لاحظ  Odbc وليس OleDb
وهذا كود الاتصال
PHP كود :
Dim con As New System.Data.Odbc.OdbcConnection("Dsn=mydb"


شكرا أخي على الرد

هل ممكن أن أجد عندك أي مثال صغير
لأنني جربت و لم أفلح

كيف أضف القاعدة
وكيف أستدعي اسم الملف
و أين سأكتب إسم ملف القاعدة في الكود



وجدت هذا الكود لكن أضن أنه به أخطاء

كود :
       Dim _connection As New OleDbConnection()
       Dim ConnectionString As New StringBuilder("")
       ConnectionString.Append("Provider=Microsoft.Jet.OLEDB.4.0;")
       ConnectionString.Append("Extended Properties=Paradox 8.x;")
       ConnectionString.Append("Data Source=d:\bd.DB;")
       _connection.ConnectionString = ConnectionString.ToString()


       Dim da As New OleDbDataAdapter("select * from bd.DB;", _connection)
       Dim dsRetrievedData As New DataSet()
       da.Fill(dsRetrievedData)


       DataGridView1.DataSource = dsRetrievedData