تقييم الموضوع :
  • 0 أصوات - بمعدل 0
  • 1
  • 2
  • 3
  • 4
  • 5
خطأ بعد تشغيل البرنامج في حفظ للبيانات الدخلة
#1
[COLOR="#800080"]السلام عليكم

عملت قاعدة بيانات وكتبت اكواد لاضافة وحفظ وو

لااكن عند تشغيل البرنامج وتعبئة البيانات و اعمل لها حفظ ينفتح صفحة الاكواد ويجي خطا في السطر التالي > cmd.ExecuteNonQuery()

وهذه صوره مثال >
[ATTACH=CONFIG]2695[/ATTACH]

ارجو التوضيح سبب الخطأ .

شكرا
[/COLOR]


الملفات المرفقة صورة/صور
   
الرد }}}
تم الشكر بواسطة:
#2
الصورة غير واضحة!
الرد }}}
تم الشكر بواسطة:
#3
[ATTACH=CONFIG]2696[/ATTACH]

هذه صورة اخرى ان شاء الله تكون واضحةة


الملفات المرفقة صورة/صور
   
الرد }}}
تم الشكر بواسطة:
#4
حسناً, قم بتجربة الكود التالي:


PHP كود :
Private Sub Button2_Click(ByVal sender As System.ObjectByVal e As System.EventArgsHandles Button2.Click
Try
Dim cmd As New OleDbCommand("insert into tbb1 (nameb1,mobileb1,emailb1,biographyb1) values (@nameb1,@mobileb1,@emailb1,@biographyb1)
cmd.Parameters.AddWithValue("
@nameb1", TextBox1.Text)
cmd.Parameters.AddWithValue("
@mobileb1", TextBox2.Text)
cmd.Parameters.AddWithValue("
@emailb1", TextBox3.Text)
cmd.Parameters.AddWithValue("
@biographyb1", TextBox4.Text)
cn.Open()
cmd.ExecuteNonQuery()
cmd.Dispose()
MsgBox("
تم حفظ السجل بنجاح", 64, "Hreef Parmgh")
dextxt()
showdata()
Catch ex As Exception
      MsgBox("
Error in insertion" & vbCrLf & ex.Message)
End Try
End Sub 

و لكن عندي سؤال,
أين تعريف (cn.Open())؟
الرد }}}
تم الشكر بواسطة:
#5
امم مافهمت معليش

في الرابط جميع الاكواد المستخدمة
الرد }}}
تم الشكر بواسطة:
#6
حسناً, قم بوضع الكود التالي في مكان الكود الذي يظهر فيه الخطأ:

PHP كود :
Private Sub Button2_Click(ByVal sender As System.ObjectByVal e As System.EventArgsHandles Button2.Click 

Try 
        
Dim cmd As New OleDbCommand("insert into tbb1 (nameb1,mobileb1,emailb1,biographyb1) values (@nameb1,@mobileb1,@emailb1,@biographyb1), cn

        cmd.Parameters.AddWithValue("
@nameb1", TextBox1.Text)
        cmd.Parameters.AddWithValue("
@mobileb1", TextBox2.Text)
        cmd.Parameters.AddWithValue("
@emailb1", TextBox3.Text)
        cmd.Parameters.AddWithValue("
@biographyb1", TextBox4.Text)

        cn.Open()
        cmd.ExecuteNonQuery()
        cmd.Dispose()
        cn.Close()

        MsgBox("
تم حفظ السجل بنجاح64", "Hreef Parmgh")

        dextxt()
        showdata()
Catch ex As Exception 
      MsgBox("
Error in insertion" & vbCrLf & ex.Message) 
End Try 

End Sub 
الرد }}}
تم الشكر بواسطة:
#7
اشكرك اخ [b]hoob computer[/b]


ولاكن الكود به اخطاء
Sad


[ATTACH=CONFIG]2697[/ATTACH]


الملفات المرفقة صورة/صور
   
الرد }}}
تم الشكر بواسطة:
#8
ارجو المسااعدة من المبرمجين باقرب وقت


الرد }}}
تم الشكر بواسطة:
#9
اسف يا أخي,
لكني نسيت وضع " و وضع ( في جملة الادخال.

شكلك جديد في البرمجة Smile

تفضل الكود الجديد:

PHP كود :
Private Sub Button2_Click(ByVal sender As System.ObjectByVal e As System.EventArgsHandles Button2.Click 

Try 
        
Dim cmd As New OleDbCommand("insert into tbb1 (nameb1,mobileb1,emailb1,biographyb1) values (@nameb1,@mobileb1,@emailb1,@biographyb1)"cn)

        
cmd.Parameters.AddWithValue("@nameb1"TextBox1.Text)
        
cmd.Parameters.AddWithValue("@mobileb1"TextBox2.Text)
        
cmd.Parameters.AddWithValue("@emailb1"TextBox3.Text)
        
cmd.Parameters.AddWithValue("@biographyb1"TextBox4.Text)

        
cn.Open()
        
cmd.ExecuteNonQuery()
        
cmd.Dispose()
        
cn.Close()

        
MsgBox("تم حفظ السجل بنجاح, 64""Hreef Parmgh")

        
dextxt()
        
showdata()
Catch 
ex As Exception 
      MsgBox
("Error in insertion" vbCrLf ex.Message
End Try 

End Sub 
الرد }}}
تم الشكر بواسطة:
#10
شككراً لك hoob computer

ربي يجزاك كل خير
الرد }}}
تم الشكر بواسطة:


المواضيع المحتمل أن تكون متشابهة .
الموضوع : الكاتب الردود : المشاهدات : آخر رد
  [SQL] استفسار عن طريقة تحزم قواعد بيانات MSSQL مع البرنامج VB.NET2019 salemq 2 531 18-05-23, 03:02 AM
آخر رد: سعود
  تشغيل الsql server على جهاز متصل بالسيرفر عن طريق vpn bassant 1 1,079 20-09-21, 11:10 AM
آخر رد: bassant
  قاعدتين بيانات من نوع اكسس في نفس البرنامج الوايلي 0 1,621 26-10-19, 09:26 AM
آخر رد: الوايلي
  [SQL] مشكله تشغيل السيكول على جهاز العميل m.farag87 1 1,694 29-06-19, 01:14 AM
آخر رد: سامي محمد
  [سؤال] ماهوا كود تعديل اسم المستخدم وكلمة المرور في البرنامج Ameer syria 13 10,857 02-01-18, 05:39 PM
آخر رد: سعود
  [VB.NET] ربط البرنامج بعدة اجهزة abid 11 15,599 19-08-17, 12:39 PM
آخر رد: osama.okn
Question [سؤال] كيف يتم تشغيل قاعدة بيانات SQL SERVER دون تنصيب MS SQL SERVER alimoi79 1 2,990 16-07-17, 02:56 AM
آخر رد: ابو ليلى
  [VB.NET] تظهر رسالة توقف البرنامج dr_amr82 3 2,234 14-06-17, 03:12 AM
آخر رد: boudyonline
  مشكلة في تحزيم البرنامج samawi 2 2,177 23-04-17, 03:06 AM
آخر رد: samawi
  [C#.NET] تشغيل زر next - previous rows m.harb 0 1,916 17-09-15, 05:15 PM
آخر رد: m.harb

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


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