[المبرمج البسيط]

PHP كود :

Imports System.Data
Imports System.Data.OleDb
Public Class Form1
    Dim constr As String = "provider=microsoft.jet.oledb.4.0;" & "data sours = " & Application.StartupPath & "/mydata.mdb"
    Dim conn As New OleDbConnection(constr)
    Dim dataset1 As New DataSet
    Dim sqlstr As String = "select * from table1"

    Private Sub Form1_Load(sender As Object, e As EventArgs) Handles MyBase.Load

        conn.Open()
        Dim dataadapter1 As New OleDbDataAdapter(sqlstr, conn)
        dataadapter1.Fill(dataset1, "table1")
        conn.Close()
    End Sub
End Class 


[سعود]

تاكد من "/" يمكن الصح "\"

[سعود]

ايضا هذي "sours " يمكن source

[المبرمج البسيط]

نفس المشكلة

PHP كود :

Imports System.Data
Imports System.Data.OleDb
Public Class Form1
    Dim constr As String = "provider=microsoft.jet.oledb.4.0;" & "data source = " & Application.StartupPath & "\mydata.mdb"
    Dim conn As New OleDbConnection(constr)
    Dim dataset1 As New DataSet
    Dim sqlstr As String = "select * from table1"

    Private Sub Form1_Load(sender As Object, e As EventArgs) Handles MyBase.Load

        conn.Open()
        Dim dataadapter1 As New OleDbDataAdapter(sqlstr, conn)
        dataadapter1.Fill(dataset1, "table1")
        conn.Close()
    End Sub
End Class 


المشكله في حدثForm1_Load

في conn

[المبرمج البسيط]

()conn.open

[المبرمج البسيط]

غيرت امتداد قاعده البيانات الى accdb
ونفس المشكلة

[سعود]

ماهي رسالة الخطا؟؟

[Abdullah0991]

هل نظامك 64bit عندها لن يعمل لديك المزود الخاص بالأكسس ؟؟

[المبرمج البسيط]

هذا الخطأ

[ATTACH=CONFIG]3778[/ATTACH]

تم وضع الصورة المكبرة التالية من قبل المشرفين على القسم . بالتوفيق

[Abdullah0991]

كما توقعت المزود الخاص بالأكسس ليس مسجلا لديك لأن نظامك 64بت فهذا المزود لا يعمل على انظمة 64