[محمد العامر]

السلام عليكم ورحمة الله وبركاته
اواجه مشكلة في جملة الاتصال
واستخدم الجملة التالية

كود :

   Public ConStr As String = "Data Source=.\SQLEXPRESS;Initial Catalog = DataName;integrated security=true"
   Public con As New SqlConnection(ConStr)

وتعمل بشكل جيد ولكن إذا كان السيرفر لدى العميل ليس SQLEXPRESS بل النسخة الكاملة.
لا تعمل ولا يتم الاتصال بقاعدة البيانات
قمت بتعديل الجملة وحذف SQLEXPRESS وما زالت المشكلة لم تحل
قمت باستبدال النقطة (.) وكتابة اسم السيرفر مباشرة ونفس المشكلة لم تحل
هل يوجد جملة اتصال تكون حل بديل بحيث تقبل الاتصال بـ SQLEXPRESS وبأي سيرفر على sql.

[محمد العامر]

قمت مسبقاً بتطبيق الجملة التي كتبتها انت
ولكن لا تعمل
الرسالة تفيد بعدم الاتصال بقاعدة البيانات

[justforit]

(11-11-24, 04:11 PM)محمد العامر كتب : قمت مسبقاً بتطبيق الجملة التي كتبتها انت
ولكن لا تعمل
الرسالة تفيد بعدم الاتصال بقاعدة البيانات

هل راجعت الموقع التالي:؟
SQL Server connection strings

[محمود صالح]

استخدم هذا 

كود :

Public ConStr As String = "Data Source=(local);Initial Catalog=DataName;Integrated Security=True"
Public con As New SqlConnection(ConStr)

[محمد العامر]

في حدث التحميل الخاص بشاشة الدخول
وضعت هذا الكود

كود :

       Try
           ' افترض أن لديك كائن اتصال قاعدة بيانات مثل SqlConnection
           Dim connection As New SqlConnection("Data Source=.\SQLEXPRESS;Initial Catalog = Dataname;integrated security=true")
           connection.Open()
           connection.Close()
           Return True
       Catch ex As Exception
           'MessageBox.Show("فشل الاتصال بقاعدة البيانات: " & ex.Message)
           DevExpress.XtraEditors.XtraMessageBox.Show("فشل الاتصال بقاعدة البيانات", "خطأ", MessageBoxButtons.OK, MessageBoxIcon.Error)
           Return False
       End Try

فـ رسالة الخطاء تكون فشل الاتصال بقاعدة البيانات

الكود لا يوجد به خطاء المشكلة كلها بالاتصال بالسيرفر
قمت بعمل شاشة للاتصال بالسيرفر والتأكد بأنه يعمل وصحيح وأستبدلت اسم السيرفر بالاسم السيرفر اللي على الجهاز ونفس المشكلة

[salamandal]

(12-11-24, 11:23 AM)محمد العامر كتب : في حدث التحميل الخاص بشاشة الدخول
وضعت هذا الكود

كود :

       Try
           ' افترض أن لديك كائن اتصال قاعدة بيانات مثل SqlConnection
           Dim connection As New SqlConnection("Data Source=.\SQLEXPRESS;Initial Catalog = Dataname;integrated security=true")
           connection.Open()
           connection.Close()
           Return True
       Catch ex As Exception
           'MessageBox.Show("فشل الاتصال بقاعدة البيانات: " & ex.Message)
           DevExpress.XtraEditors.XtraMessageBox.Show("فشل الاتصال بقاعدة البيانات", "خطأ", MessageBoxButtons.OK, MessageBoxIcon.Error)
           Return False
       End Try

فـ رسالة الخطاء تكون فشل الاتصال بقاعدة البيانات
الكود لا يوجد به خطاء المشكلة كلها بالاتصال بالسيرفر
قمت بعمل شاشة للاتصال بالسيرفر والتأكد بأنه يعمل وصحيح وأستبدلت اسم السيرفر بالاسم السيرفر اللي على الجهاز ونفس المشكلة

  
احذف الحلقة Try ...End Try لكي تعرف اين المشكلة

[rdxdz]

PHP كود :

Dim connectionString As String = "Server=.\SQLEXPRESS;Database=YourDatabaseName;Trusted_Connection=True;"
        Using connection As New SqlConnection(connectionString)