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

+- منتدى فيجوال بيسك لكل العرب | منتدى المبرمجين العرب (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] لم يعمل معي كود الاتصال بقاعدة البيانات و لا تحميل قاعدة البيانات (/showthread.php?tid=34511)

لم يعمل معي كود الاتصال بقاعدة البيانات و لا تحميل قاعدة البيانات - rochdi191 - 29-04-20

السلام عليكم
رمضان كريم
انا جديد في عالم البرمحة بفيجوال بيسك
لم يعمل معي كود الاتصال بقاعدة البيانات و لا تحميل قاعدة البيانات
عند اصافة data source يكون الاتصال عادي
اما عند وصع الكود التالي لا تتصل
Imports System.Data.OleDb
Public Class Form1
    Dim con As New OleDbConnection("Provider=Microsoft.Jet.OLEDB.4.0;Data Source=D:\vb\add\add.mdb")
    Dim da As New OleDbDataAdapter
    Dim dt As New DataTable

    Sub table_load()
        da = New OleDbDataAdapter("select * from table", add)
        da.Fill(dt)
        DataGridView1.DataSource = dt
    End Sub

    Private Sub Form1_Load(sender As System.Object, e As System.EventArgs) Handles MyBase.Load
        table_load()
    End Sub
End Class

بارك الله فيكم

RE: لم يعمل معي كود الاتصال بقاعدة البيانات و لا تحميل قاعدة البيانات - rochdi191 - 29-04-20

ارجوا منكم المساعدة وبارك الله فيكم

RE: لم يعمل معي كود الاتصال بقاعدة البيانات و لا تحميل قاعدة البيانات - عبد العزيز البسكري - 29-04-20

كود :
  da = New OleDbDataAdapter("select * from table", Con)


RE: لم يعمل معي كود الاتصال بقاعدة البيانات و لا تحميل قاعدة البيانات - rochdi191 - 30-04-20

لم يجلب البيانات من قاعدة البيانات اكسس

RE: لم يعمل معي كود الاتصال بقاعدة البيانات و لا تحميل قاعدة البيانات - عبد العزيز البسكري - 30-04-20

قمت بتجربته قبل كتابته
يجب أن يكون لديك مجلّد باسم VB
تضع داخلة مجلد آخر باسم Add
و  كل هذا على القرص D
داخل المجلد Add تضع قاعدة البيانات


RE: لم يعمل معي كود الاتصال بقاعدة البيانات و لا تحميل قاعدة البيانات - ابراهيم ايبو - 30-04-20

السلام عليكم ورحمة الله وبركاته
اولا اتوجه بالشكر لاخي عبد العزيز على مساعدتك اخي الكريم لحل مشكلتك
ثانيا جملة الاتصال تأكد من مسار قاعدة البيانات
ثالثا لديك خطأ في جملة الاستعلام 
كود :
da = New OleDbDataAdapter("select * from table", add)
والصواب ان تكون 
كود :
da = New OleDbDataAdapter("select * from table", con)
بقي شيء واحد وهو اسم الجدول الذي ستجلب منه البيانات انت كتبته table
تأكد من اسم الجدول لتكون جملة الاستعلام صحيحة
كود :
da = New OleDbDataAdapter("select * from اسم الجدول", con)


RE: لم يعمل معي كود الاتصال بقاعدة البيانات و لا تحميل قاعدة البيانات - rochdi191 - 30-04-20

لم يتصل







جربت لكن لم يشتغل

RE: لم يعمل معي كود الاتصال بقاعدة البيانات و لا تحميل قاعدة البيانات - عبد العزيز البسكري - 30-04-20

ACCDB


RE: لم يعمل معي كود الاتصال بقاعدة البيانات و لا تحميل قاعدة البيانات - boudyonline - 30-04-20

أولا : عدل جملة الاتصال
Dim con As New OleDbConnection("Provider=Microsoft.ACE.OLEDB.12.0;Data Source=D:\VB\r5\r5.accdb")

فلا داعي لوجود علامة & في جملة الاتصال وكذلك المسافة الخالية

ثانيا : غير اسم الجدول الى Table1 أو Table2 ...... ولا تكتفي فقط بكلمة Table

RE: لم يعمل معي كود الاتصال بقاعدة البيانات و لا تحميل قاعدة البيانات - rochdi191 - 30-04-20

(30-04-20, 04:04 AM)boudyonline كتب : أولا :  عدل جملة الاتصال
Dim con As New OleDbConnection("Provider=Microsoft.ACE.OLEDB.12.0;Data Source=D:\VB\r5\r5.accdb")

فلا داعي لوجود علامة & في جملة الاتصال وكذلك المسافة الخالية

ثانيا : غير اسم الجدول الى Table1  أو Table2 ...... ولا تكتفي فقط بكلمة Table

بارك الله فيك اخي
تم تعديل وتمت العملية بنجاح
صح رمضانكم وصح لفطوركم
وربي يجزيكم ان شاء الله