استيراد بيانات SQL Server إلى قاعدة بيانات Access

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

استيراد بيانات SQL Server إلى قاعدة بيانات Access

مُساهمة من طرف م/موسي في الأحد مايو 26, 2013 10:02 am

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

يمكنك استيراد بيانات من قاعدة بيانات SQL Server إلى قاعدة بيانات Access باستخدام تنفيذ استعلام بسيط سواء كان ذلك في ADO أو DAO. ....لكنى أفضل أستخدام ADO و بالتالى فإن الشرح سيكون بتلك التقنية فى الوصول للبيانات و بأستخدام الكود التالى :


الرمز:
Private Sub ADOGO()
Dim lcnn As ADODB.Connection
Dim SQL As String

 
    Set lcnn = New ADODB.Connection
    lcnn.Open "Driver={Microsoft Access Driver (*.mdb)};" & _
        _
        "Dbq=DB1.mdb;" & _
        "DefaultDir=d:\Temp;" & _
        "Uid=Admin;Pwd=;"

    SQL = "SELECT * INTO " & _
        "[table_data] " & _
        "FROM " & _
        "[ODBC;Driver=SQL Server; " & _
            "SERVER=MySQL_Server;DATABASE=MySQL_DB;" & _
        "UID=MySQL_User;PWD=MySQL_Password;]." & _
        "[table_data];"

    lcnn.Execute SQL
    Set lcnn = Nothing
End Sub

م/موسي
الاشراف
الاشراف

تاريخ التسجيل : 18/02/2011
المساهمات : 130
النقاط : 252
التقيم : 8
الدولة : تونس
الجنس : ذكر

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

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


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