تقييم الموضوع :
  • 0 أصوات - بمعدل 0
  • 1
  • 2
  • 3
  • 4
  • 5
[سؤال] أهلا وسهلا. هل يمكنم اعطائي كود برمجي يعطيني رسالة خطأ إذا لم تتصل بقاعدة بيانات عبر
#1
أهلا بك. هل يمكن أن تعطيني رمزًا يعطيني رسالة خطأ إذا لم تتصل بقاعدة بيانات عبر شبكة محلية
ملاحظة: يقوم البرنامج بإنشاء حساب عبر Visual Basic متصل بقاعدة بيانات على شبكة محلية

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


Private Sub Button2_Click(sender As Object, e As EventArgs) Handles Button2.Click
        If TextBox1.Text = "" Or TextBox2.Text = "" Then
            MsgBox("تاكد من ان خانة اسم المستخدم او كلمة المرو غير فارغة")
            Return
        End If
        da = New SqlDataAdapter("SELECT * FROM Table_1 where username = '" & TextBox1.Text & "'", con)
        da.Fill(dt)
        If dt.Rows.Count <> 0 Then
            MessageBox.Show("ان هذا الاسم مستخدم من قبل رجاء استخدم اسم اخر ")
        Else
            Dim cmd As New SqlCommand("INSERT INTO Table_1 (username, passwords) values ('" & TextBox1.Text & "','" & TextBox2.Text & "')", con)
            con.Open()
            cmd.ExecuteNonQuery()
            con.Close()
            TextBox1.Text = ""
            TextBox2.Text = ""
            Me.Hide()
            acuser.Show()
            MsgBox("تم انشاء الحساب")
        End If
    End Sub
الرد
تم الشكر بواسطة:


المواضيع المحتمل أن تكون متشابهة .
الموضوع : الكاتب الردود : المشاهدات : آخر رد
Rainbow [VB.NET] الإتصال بقاعدة بيانات على النت بواسطة تطبيق فجول بيسك علي إبراهيم الحاج علي 4 176 15-10-19, 05:15 PM
آخر رد: علي إبراهيم الحاج علي
  [VB.NET] التعامل مع قاعدة بيانات أكسس vb.net 2012 paypalet 1 60 15-10-19, 03:40 PM
آخر رد: elgokr
Sad [VB.NET] نقل بيانات جدول بقاعدة بيانات الى جدول اخر بقاعدة بيانات ثانية اسامه الهرماوي 7 137 14-10-19, 11:12 PM
آخر رد: elgokr
  [سؤال] كود الحذف من قاعدة بيانات muad 2 87 14-10-19, 10:11 PM
آخر رد: muad
  [VB.NET] إلغاء رسالة تأكيد ال WebBrowser 3boody 4 77 13-10-19, 08:42 PM
آخر رد: ابو روضة
  ظهور رسالة في حالة عدم لمس لوحة المفاتيح او تحريك الماوس بعد مدة معينة atefkhalf2004 2 97 09-10-19, 06:21 PM
آخر رد: Rabeea Qbaha
Bug [VB.NET] الاتصال بقاعدة البيانات على الشبكة مشكل أتعبني حقا sniperjawadino 4 153 08-10-19, 06:15 PM
آخر رد: sniperjawadino
  [سؤال] اخوان الاعزاء ارجو مساعدتى في حل عرض بيانات في تقرير كريستال ريبورت nazarakrawi 7 151 02-10-19, 10:21 PM
آخر رد: asemshahen5
  معرفة عدد الجداول في قاعدة بيانات ابو همام العراقي 6 185 30-09-19, 12:34 AM
آخر رد: asemshahen5
  كيف يتعرف البرناج على موقع قاعدة بيانات sqlserver nooralcown 1 99 29-09-19, 04:05 PM
آخر رد: اسامه الهرماوي

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


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