تقييم الموضوع :
  • 0 أصوات - بمعدل 0
  • 1
  • 2
  • 3
  • 4
  • 5
[عنوان معدل]ما هي نص الاتصال المناسب للاتصال بقاعدة البيانات
#1
السلام عليكم ورحمة الله وبركاته
أسعد بانضمامي لكم في هذا المنتدى الرائع واتمنى لأعضائه مزيد من التقدم والتطور
أنا مبتدأ في الدوت نت وأتمني مساعدتي في تصحيح هذا الكود
عندي vb.net 2012 و sql 2005
وعملت مشروع جديد وربطه بالأكسس 2007 ووضعت جملة الربط في مديول والحمد لله تمام الجملة لما بشغلها بالطريقة دي بتشتغل
كود :
Imports System.Data.OleDb
Imports System.Data.SqlClient

Module Module1
    Public Conn_Mdb As New OleDbConnection
    Public Conn_Sql As New SqlConnection
    '*************************************
    Public Command_Mdb As New OleDbCommand
    Public Command_Sql As New SqlCommand
    '*************************************
    Public DataAdapter_Mdb As OleDbDataReader
    Public DataAdapter_Sql As SqlDataAdapter
    '*************************************
    Public Sql_Statment_Mdb As String = Nothing
    Public Sql_Statment_Sql As String = Nothing

Sub ConnToDB()Sub ConnToDB()
        Try
            With Conn_Mdb
                If .State = ConnectionState.Open Then .Close()
                ' .ConnectionString = "Provider=Microsoft.ACE.OLEDB.12.0;Data Source=ADDRESS_BOOK.accdb"
                .ConnectionString = "Provider=Microsoft.ACE.OLEDB.12.0;" & "Data Source=" & System.Environment.CurrentDirectory.ToString() & "\ADDRESS_BOOK.accdb;" & "Jet OLEDB:Database Password=" 123456789 ";"
                .Open()
            End With
        Catch ex As Exception
            MessageBox.Show("توجد مشكلة في الاتصال بقاعدة بيانات الدخول", "Error", MessageBoxButtons.OK, MessageBoxIcon.Error)
            Application.Exit()
        End Try
    End Sub

في النموذج تحت مفتاح وضعت الكود التالي لإحضار حقل من جدول قاعدة بيانات 2007 وشغال تمام
كود :
Private Sub Button2_Click(sender As Object, e As EventArgs) Handles Button2.Click
Call ConnToDB()
        Call ConnToSqlServer2005()
        Sql_Statment_Mdb = "SELECT * from setup_server where [ID_CON] = '1' "
        Command_Mdb = New OleDbCommand
        With Command_Mdb
            .CommandText = Sql_Statment_Mdb
            .Connection = Conn_Mdb
            .ExecuteNonQuery()
            DataAdapter_Mdb = Command_Mdb.ExecuteReader
                       DataAdapter_Mdb.Read()
            TextBox6.Text = (DataAdapter_Mdb("id_server"))
                 End With
إلى هذه النقطة الكود ماشي تمام
نيجي للمشكلة
في جملة الاستعلام السابقة بحضر جملة استعلام لقاعدة بيانات sql 2005 مخزنة في جدول setup_server داخل الحقل id_server بالشكل التالي
كود :
"Data Source=Main;Initial Catalog=Master;Persist Security Info=True;User ID=sa;password=;"
وعملت الكود التالي لعمل اتصال بقاعدة البيانات sql 2005 ولكن لا يتصل



كود :
Sub ConnToSqlServer2005()
        Try
            With Conn_Sql
                If .State = ConnectionState.Open Then .Close()
                '********************************************************************************
                'الاستعلام عن جملة الاتصال في ملف الأكسس
                Sql_Statment_Mdb = "SELECT * from setup_server where [ID_CON] = '1' "
                Command_Mdb = New OleDbCommand

                Command_Mdb.CommandText = Sql_Statment_Mdb
                Command_Mdb.Connection = Conn_Mdb
                Command_Mdb.ExecuteNonQuery()
                DataAdapter_Mdb = Command_Mdb.ExecuteReader
                DataAdapter_Mdb.Read()
                ' myqry = (mydr("id_server"))
                '*****************************************************
                Dim xxx As String
                xxx = (DataAdapter_Mdb("id_server"))

                .ConnectionString = xxx

                             .Open()

            End With
        Catch ex As Exception
            MessageBox.Show("توجد مشكلة في الاتصال بقاعدة بيانات سيكوال", "Error", MessageBoxButtons.OK, MessageBoxIcon.Error)
            Application.Exit()
        End Try
    End Sub


مي المرفقات مثال للمشروع أرجوا التعديل عليه في جزئيتين
1 - الموديول لكي يتصل بقاعدة بيانات sql 2005
2 - في الفورم تحت butten3 احضار بيانات من sql 2005

أرجوا تصحيح الكود التالي حتى يتم الاتصال ولكم جزيل الشكر


الملفات المرفقة
.rar   Connect to Mdb 2007 - Copy.rar (الحجم : 609.19 ك ب / التحميلات : 50)
الرد }}}}
تم الشكر بواسطة:
#2
السلام عليكم
أخواني الفاضل
تم حل المشكلة رقم 1 والمشكلة كانت بين علامات التنصيص داخل الحقل في قلعدة البيانات
واصبحت بالشكل التالي
[HTML]Data Source=Main;Initial Catalog=Master;Persist Security Info=True;User ID=sa;password=;[/HTML]

في انتظار تفاعل الأعضاء وحل المشكلة رقم 2 ولكم جزيل الشكر
الرد }}}}
تم الشكر بواسطة:
#3
السلام عليكم ورحمة الله وبركاته

استبدل Main باسم السرفر وإذا كان على نفس الجهاز ضع Localhost
استبدل Master باسم قاعدة البيانات والتي اعتقد انك مسميها بنفس إسم قاعدة بيانات أكسس 2007 اللي هي ADDRESS_BOOK
كود :
"Data Source=[color=#FF0000]Main[/color];Initial Catalog=[color=#FF0000]Master[/color];Persist Security Info=True;User ID=sa;password=;"

السلام عليكم ورحمة الله وبركاته
الرد }}}}
تم الشكر بواسطة:
#4
[COLOR="#800000"]السلام عليكم

عنوان معدل ,الرجاء كتابة عنوان واضح في المشاركة القادمة بدون وضع كلمات (المساعدة ,رجاءا ,....).

[/COLOR]
الرد }}}}
تم الشكر بواسطة:
#5
أسف وإن شاء الله أحاول اختيار اسم مناسب
الرد }}}}
تم الشكر بواسطة:
#6
@@أبورائد@@ كتب :السلام عليكم ورحمة الله وبركاته

استبدل Main باسم السرفر وإذا كان على نفس الجهاز ضع Localhost
استبدل Master باسم قاعدة البيانات والتي اعتقد انك مسميها بنفس إسم قاعدة بيانات أكسس 2007 اللي هي ADDRESS_BOOK
كود :
"Data Source=[color=#FF0000]Main[/color];Initial Catalog=[color=#FF0000]Master[/color];Persist Security Info=True;User ID=sa;password=;"

السلام عليكم ورحمة الله وبركاته

شكرا على الرد ولكن تم بالفعل حل المشكلة رقم واحد وتم الاتصال
أرجوا تعديل المثال المرفق في المشاركة وجعله يجلب بيانات من sql server 2005 ولك جزيل الشكر
الرد }}}}
تم الشكر بواسطة:
#7
' كتب :شكرا على الرد ولكن تم بالفعل حل المشكلة رقم واحد وتم الاتصال
أرجوا تعديل المثال المرفق في المشاركة وجعله يجلب بيانات من sql server 2005 ولك جزيل الشكر

السلام عليكم ورحمة الله وبركاته

اخي ابو رفيق ،

عشان اعدل على المثال لازم اعرف التالي
* اسم sql server 2005 إذا كان على سرفر خارجي.
* اسم قاعدة البيانات على sql server 2005.

السلام عليكم ورحمة الله وبركاته
الرد }}}}
تم الشكر بواسطة:
#8
حياك الله أخ رائد
اسم sql derver 2005 هو ServerWork
اسم قاعدة البيانات هو Traning
ومشكور
الرد }}}}
تم الشكر بواسطة:
#9
السلام عليكم ورحمة الله وبركاته

إذا تكون جملة الإتصال الخاصة بـ sql derver 2005 هي
كود :
"Data Source=[color=#FF0000]ServerWork[/color]; Initial Catalog=[color=#FF0000]Traning[/color]; Persist Security Info=True; User ID=sa; password=;"

السلام عليكم ورحمة الله وبركاته
الرد }}}}
تم الشكر بواسطة:
#10
السلام عليكم اخى ابورائد
عندى سؤال فى نص الاتصال و هو
ازاى اقدر اعرف نوع قاعدة بيانات عن طريق نص الاتصال اذا كانت قاعدة بيانات اكسس ولا سيكوال ؟
يَامَعْشَرَ الْجِنِّ وَالإِنسِ إِنْ اسْتَطَعْتُمْ أَنْ تَنفُذُوا مِنْ أَقْطَارِ السَّمَاوَاتِ وَالأَرْضِ فَانفُذُوا لا تَنفُذُونَ إِلاّ بِسُلْطَانٍ(33) سورة الرحمن
الرد }}}}
تم الشكر بواسطة:


المواضيع المحتمل أن تكون متشابهة .
الموضوع : الكاتب الردود : المشاهدات : آخر رد
  مسار قاعدة البيانات اكسس Mostafa Yousry 6 1,621 24-09-17, 08:23 PM
آخر رد: alsouf
  [سؤال] مشكلة الاختلاف بين ترتيب الصفوف في قاعدة البيانات والداتا جريد فيو waelalmsry75 2 140 18-08-17, 05:40 PM
آخر رد: waelalmsry75
  هل يمكن حفظ البيانات من dataGridView مباشرة؟ abozeyd 3 184 15-08-17, 02:11 PM
آخر رد: abozeyd
Exclamation [سؤال] سؤال عن امكانية ربط الفيجوال بقاعدة علي الانترنت - وعن طريقه فتحه - وعدة اسأله اخرى MohamedAllam 5 252 23-07-17, 12:53 PM
آخر رد: MohamedAllam
  طلب كود رسالة تبين أن هذه البيانات موجودة من قبل ولا يسمح بتكررها waelalmsry75 2 170 19-07-17, 03:24 PM
آخر رد: waelalmsry75
  مشكلة في الاتصال مع ملفات ال SQL الخارجية .mdf khaled12345 13 459 16-07-17, 06:21 AM
آخر رد: ahmed6610
Rainbow [VB.NET] كيف يمكنني الإتصال بملف قاعدة البيانات نوع Paradox sniperjawadino 2 172 12-07-17, 01:20 PM
آخر رد: sniperjawadino
  البحث في قاعدة البيانات مع تجاهل التشكيل waelalmsry75 16 706 03-07-17, 05:04 AM
آخر رد: K39
  ظهور ملف بجوار الاكسس عند الاتصال atefkhalf2004 2 136 25-06-17, 04:50 PM
آخر رد: atefkhalf2004
  [سؤال] كيف احفظ صورة الطالب الى قاعدة البيانات عبداللطيف2017 6 327 25-06-17, 01:47 PM
آخر رد: silverlight

التنقل السريع :


يقوم بقرائة الموضوع: بالاضافة الى ( 1 ) ضيف كريم