NEXT كتب:
أخى الكريم من الافضل عرض شفرة الاتصال بقاعدة البيانات أو طريقة الاتصال بقاعدة البيانات حتى نتمكن من معرفة المشكلة ....ثم ما هو اصدار قاعدة البيانات 2003 ام 2007 ...الخ

الديب 2014 كتب:
شكرا اخي الكريم على سرعة الاستجابة
نوع قاعدة البيانات أكسس  2003
ومرفق لكم module  الخاص بعملية الاتصال
وبارك الله فيك للمساعدة

الكود:

Imports System.Data

Imports System.Data.OleDb

Public Class Form1

    Dim cnnOLEDB As New OleDbConnection

    Dim cmdOLEDB As New OleDbCommand
 
    Dim strConnectionString = "Provider=Microsoft.Jet.OLEDB.4.0;Data Source=" &
        System.Environment.CurrentDirectory & "\TestDB.mdb"

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

        cnnOLEDB.ConnectionString = strConnectionString

        cnnOLEDB.Open()

    End Sub