إنشاء إتصال بقواعد بيانات Access باستخدام كائن الاتصال OdbcConnection

استعرض الموضوع السابق استعرض الموضوع التالي اذهب الى الأسفل

إنشاء إتصال بقواعد بيانات Access باستخدام كائن الاتصال OdbcConnection

مُساهمة من طرف RANA في الإثنين أكتوبر 06, 2014 1:25 pm

بسم الله الرحمن الرحيم

فى درس لاحق لقد ساهمت في هذا الموضوع إنشاء إتصال بقواعد بيانات Access باستخدام كائن الاتصال OleDbConnection أما فى هذا المقال سنقوم بإنشاء اتصال بقواعد بيانات أكسس باستخدام كائن الاتصال OdbcConnection باتباع الخطوات التالية :


_ إستيراد مساحة الاسم التالى :

الرمز:
Imports System.Data.Odbc

_ الاعلان عن كائن الاتصال OdbcConnection

الرمز:
Dim cnn As OdbcConnection

_الاعلان عن متغير نصى لتحزين نص الاتصال به

الرمز:
Dim connetionString As String

_ تخزين نص الاتصال التالى الخاص بفتح اتصال بقواعد بيانات الى المتغير النصى الذى تم اعلان عنه سابقا

الرمز:
connetionString = "Driver={Microsoft Access Driver (*.mdb)};DBQ=databasename.mdb;"

_ انشاء مثيل جديد من كائن الاتصال OdbcConnection مع تمرير نص الاتصال الية

الرمز:
cnn = New OdbcConnection(connetionString)

_ بعد ذلك نقوم باستخدام الاسلوب Open لفتح اتصال مع قاعدة البيانات

الرمز:
cnn.Open()

و الشفرة الكاملة للاتصال بقواعد بيانات أكسس باستخدام كائن الاتصال OdbcConnection

الرمز:
Imports System.Data.Odbc

Public Class Form1
    
Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As System.Eve
ntArgs) Handles Button1.Click
        
Dim connetionString As String
       Dim cnn As OdbcConnection
        connetionString = "Driver={Microsoft Access Driver (*.mdb)};DBQ=yourdataba
sename.mdb;"
        cnn = New OdbcConnection(connetionString)
        Try
            cnn.Open()
            MsgBox("Connection Open ! ")
            cnn.Close()
        Catch ex As Exception
            MsgBox("Can not open connection ! ")
        End Try
    End Sub
End Class

RANA
....
....

تاريخ التسجيل : 01/08/2013
المساهمات : 64
النقاط : 103
التقيم : 1
الدولة : فلسطين
الجنس : انثى

الرجوع الى أعلى الصفحة اذهب الى الأسفل

رد: إنشاء إتصال بقواعد بيانات Access باستخدام كائن الاتصال OdbcConnection

مُساهمة من طرف NEXT في الإثنين أكتوبر 06, 2014 7:17 pm

مشكورة على مجهودك رنا

NEXT
الادارة
الادارة

تاريخ التسجيل : 18/02/2011
المساهمات : 262
النقاط : 378
التقيم : 10
الجنس : ذكر

الرجوع الى أعلى الصفحة اذهب الى الأسفل

استعرض الموضوع السابق استعرض الموضوع التالي الرجوع الى أعلى الصفحة


 
صلاحيات هذا المنتدى:
لاتستطيع الرد على المواضيع في هذا المنتدى