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

نسخة كاملة : مشكلة زر البحث
أنت حالياً تتصفح نسخة خفيفة من المنتدى . مشاهدة نسخة كاملة مع جميع الأشكال الجمالية .
السلام عليكم ورحمة الله

لدي مشكلة في برنامجي المرفق وهي انه عندما أقوم بعملية البحث عن رقم موظف للتعديل على بياناته
يقوم البرنامج بتعديل بيانات الموظف ويلحق التعديل على بيانات موظف اخر . مع حدوث خطا في بعض الاحيان


اما لو تم التعديل على بيانات الموظف بدون ظغط زر البحث فانه يتم التعديل بصوره صحيحه.


الطلب الاخر هو منع اظافة رقم الموظف اذا كان الرقم موجود في قاعدة البيانات .


ولكم جزيل الشكر..
مشكلتك بسيطة جداً

!ID= trim(text1.text)

فقط خليها
!ID=val(text1.text)

لان الحقل ID
رقم


[attachment=7726]

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

بس ان المشكله لم يتم حلها ( مثلا عندما تكون البيانات عند السجل الأخير واقوم بالبحث عن رقم السجل الأول او العكس يتم التعديل على كلا السجلين الأول والأخير ) يرجى النظر الى زر البحث هل هو صحصح ام لا

شاكر لكم جميعا
بارك الله فيك
تفضل المثال.
تابع كل التغييرات التي طرأت على الكود والفورم
بالتوفيق

[attachment=7748]

حبذا لو تتابع مشاركاتك
وصلت المعلومه
شاكر لك عزيزي Lion_Ksa على المعلومات المفيده اسال الله ان يبارك لك في علمك
الاخوه الكرام لدي كود منع تكرار البيانات

If dRS.BOF <> True Then
dRS.Find "id ='" & Text1.Text & "'", 1, adSearchBackward
MsgBox "åÐÇ ÇáÅÓã ãÓÌá"

End If

الا انني لم استطع ان اضعه في المكان المناسب , برجا ممن لديه درايه لا يبخل علينا
اريد تنفيذ الكود عن عملية الاضافه
الكود اعلاه بحث بارك الله فيك
ماله دخل بتكرار البيانات
انت ايش بغيت بالضبط؟