Jump to content
أوفيسنا

عمل قاعدة بيانات 2003 بالفيجوال بيسك 2010


Recommended Posts

لدى قاعدة بيانات أكسيس 2003

وحملت قريبآ VB 2010

وأريد عمل أى برنامح صغير يظهر قاعدة البيانات(أو أحد جداولها) عند الضغط على زر معين

مع وضع قاعدة البيانات والبرنامج فى فولدر واحد (فى فولدر "NEW FOLDER" على الدسكتوب مثلآ)

ولكم ألف شكر
Link to comment
Share on other sites

لنفترض ان القاعدة بجوار البرنامج الخاص بك 

تفضل هتين طريقتين للوصول لقاعدة البيانات

Using con As New OleDbConnection("Provider=Microsoft.Jet.OLEDB.4.0;Data Source=|DataDirectory|\Data.mdb;")
            Using cmd As New OleDbCommand("SELECT * FROM EmployeeDATA;")
                Using sda As New OleDbDataAdapter
                    cmd.Connection = con
                    sda.SelectCommand = cmd
                    Using dt As New DataTable()
                        sda.Fill(dt)

                        GridView1.DataSource = dt
                        GridView1.DataBind()

                    End Using
                End Using
            End Using
        End Using

 

الطريقة الثانية عن طريق تتبع الفولدرات بدء من مكان التشغيل الى فولدر قاعدة البيانات على ان يكون مجلد مميز

Using con As New OleDbConnection("Provider=Microsoft.Jet.OLEDB.4.0;Data Source=" & Environment.GetFolderPath(Environment.SpecialFolder.ApplicationData) & "\Data.mdb;")
            Using cmd As New OleDbCommand("SELECT * FROM EmployeeDATA;")
                Using sda As New OleDbDataAdapter
                    cmd.Connection = con
                    sda.SelectCommand = cmd
                    Using dt As New DataTable()
                        sda.Fill(dt)

                        GridView1.DataSource = dt
                        GridView1.DataBind()

                    End Using
                End Using
            End Using
        End Using

 

Link to comment
Share on other sites

Join the conversation

You can post now and register later. If you have an account, sign in now to post with your account.

Guest
Reply to this topic...

×   Pasted as rich text.   Paste as plain text instead

  Only 75 emoji are allowed.

×   Your link has been automatically embedded.   Display as a link instead

×   Your previous content has been restored.   Clear editor

×   You cannot paste images directly. Upload or insert images from URL.

  • Recently Browsing   0 members

    No registered users viewing this page.

×
×
  • Create New...

Important Information