منتدى فيجوال بيسك لكل العرب | منتدى المبرمجين العرب

نسخة كاملة : مشكلة فى كود حفظ التعديلات
أنت حالياً تتصفح نسخة خفيفة من المنتدى . مشاهدة نسخة كاملة مع جميع الأشكال الجمالية .
لدى مشكلة اخرى معلبش اخى
عندى كود عمل تعديلات على البيانات
ولكن تطلع لى خطأ فى تعديل البيانات
هاهو الكود
[ Private Sub btnsaveupdate1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles btnsaveupdate1.Click
Dim updateok As Boolean = winclass.SQLExciute(" update patient set name= " & txtname.Text & "' ,id= '" & txtid.Text & "',comments='" & txtcomment.Text & "' where id= " & txtrec1.Text) '")
If updateok = True Then
lblerror.Text = (" تمت عملية تعديل البيانات ")
lblerror.BackColor = Color.Green
lblerror.ForeColor = Color.White
btnsaveupdate1.Enabled = True
Else

MsgBox("خطأ فى عملية تعديل البيانات ", MsgBoxStyle.Critical)
End If
End Sub]
كما لدى سؤال اخر وهو عندما اقوم بادخال بيانات الى قاعدة البيانات تسمح بادخال بيانات شخص واحد فقط ولا تسمح بادخال بيانات شخص اخر غلا بعد الخروج من البرنامج والدخول مرة اخرى ولا ادرى ما السبب[/code][/php]
كود :
winclass.SQLExciute
هذا كلاس خاص تحتاج كتابة محتواه لمعرفة الخطا او قم ببناء دالة جديدة لتنفيذ ماتريد فالتعديل ابسط من ان تعمل له كلاس.
هذا الكلاس موجود اخى سعود وفيه دالة الحذف والحفظ والتعديل ايضا
(07-05-14, 12:30 PM)mesm23 كتب : [ -> ]هذا الكلاس موجود اخى سعود وفيه دالة الحذف والحفظ والتعديل ايضا

ادري اخي ..
لكن ماهي القيمة المعادة من هذا الكلاس؟
هل هي boolean ان كانت نعم ممكن مباشر تستفسر عن القيمة يعني هكذا
كود :
If winclass.SQLExciute("")=true then
تم

else

لم يتم

end if
اخي تكدر تسعمل جملة sql
update from table_name
وتنطي الشرط
where culoum_nmae=new_value