الفريق العربي للبرمجةأرشيف المنتديات · 2000 – 2023
نسخة أرشيفية للقراءة فقط — التسجيل والمشاركة مغلقان، والمحتوى محفوظ كما كان.

ماهو الخطأ في كود التعديل هذا + كود المطالبه بتاكيد الحذف,ارجو مساعدتي

بدأه ضاري في 17 يونيو 2009 · 5 رد · 497 مشاهدة · في ASP.NET
مشاركة: واتساب X فيسبوك تيليجرام
#1 صاحب الموضوع

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

لا اطيل عليكم

عندي مشكلة بكو التعديل وقمت بالبحث عن اكواد التعديل بالمنتدى ووجدتها لكن لم استطع

ان اجد حل منها

الكود حقي هو :

Dim db As New OleDbConnection("Provider=Microsoft.JET.OLEDB.4.0;Data Source=" + Server.MapPath(".\\db\\db1.mdb"))
		db.Open()

		Dim cmd As New OleDbCommand
		cmd.Connection = db
		cmd.CommandText = "UPDATE EMP SET e_name = '" & TextBox2.Text & "'E_JOB = '" & TextBox3.Text & "'E_SAL= '" & TextBox4.Text & "' where id like'" & ID.Text & "'"
		cmd.Parameters.AddWithValue("e_name", TextBox2.Text)
		cmd.Parameters.AddWithValue("E_JOB", TextBox3.Text)
		cmd.Parameters.AddWithValue("E_SAL", TextBox4.Text)
		cmd.ExecuteNonQuery()

		db.Close()

مادري وين الخطأ بالضبط

والشي الثاني قمت بضبط كود الحذف وكل شي تمام

لكن ارد الكود اللي يقوم بالتاكيد اما بنعم او لا لعملية الحذف

بانتظاركم اخواني

فانا بامس الحاجه للحل

كما اني جديد في عالم asp

فلا تبخلوا علينا بالنصائح والتعليمات

جزاكم الله كل خير

#2

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

أخي الكريم أولا في حالة وجود أي مشكلة يجب أن تضع رسالة الخطأ حتى نستطيع مساعدتك

ثانيا بالنسبة للكود

استخدامك للـ Parameters غير صحيح

سأضع لك تصحيح بسيط وأترك لك الباقي

cmd.CommandText = "UPDATE EMP SET e_name = @myName where id like @ID
		cmd.Parameters.AddWithValue("@myName", txtEmpName.Text)
		cmd.Parameters.AddWithValue("@myName", txtSearch.Text)

كما تلاحظ يتم عمل متغيرات في جملة السيكوال ثم اعطاء القيمة لها عن طريق الـ Parameters

كما أنصحك باتباع قواعد التسمية التي تنصح بها مايكروسوفت حتى لا تضيع أنت في وسط الأكواد ويسهل عليك قرائته

اذا كان هناك اي شئ غامض فأخبرني

بالتوفيق

إذا أردت أن تـجـعـلـنـي سـعـيـداً ... فـعـلـمـنـي شـيـئـاً جـديـداً

#3

جزاك الله خير اخي عالرد والتوضيح

ولكن انا قمت بالتعديل على حقل واحد فقط ولكن المشكله لم استطع ان اقوم بالتعديل على ثلاث حقول

وهو ما اريده بالضبط

#4

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

عفوا كان يوجد خطأ في الكود وهذا هوالتصحيح بالإضافة الى التعديل على الثلاثة حقول ولكن عليك تغيير أسماء الـ TextBoxes

cmd.CommandText = "UPDATE EMP SET e_name = @myName,  E_JOB= @Job, E_SAL=@Sales where id like @ID"
		cmd.Parameters.AddWithValue("@myName", txtEmpName.Text)
		cmd.Parameters.AddWithValue("@Job", txtEmpJob.Text)
		cmd.Parameters.AddWithValue("@Sales ", txtEmpSales.Text)
		cmd.Parameters.AddWithValue("@ID", txtSearch.Text)

إذا أردت أن تـجـعـلـنـي سـعـيـداً ... فـعـلـمـنـي شـيـئـاً جـديـداً

#5

جزاك الله خير اخي ماندو

وجعله الله في موازين حسناتك

واذا مافيه كلافه عليك اريد تشرح لي بالمختصر الخطأ الذي وقعت فيه انا وايضا الطلب الثاني تاكيد الحذف

وشاكر لك تعاونك

تم تعديل هذه المشاركة بواسطة ضاري في 22 يونيو 2009 في 11:30

#6

؟

مواضيع مشابهة

عدد الزوار حالياً

المتواجدون خلال آخر دقيقتين · يتحدّث كل ٣٠ ثانية

—الإجمالي—أعضاء مسجّلون—زوار بدون تسجيل

جارٍ التحقق من المتواجدين…