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

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

بدأه فرج إبراهيم عاشور في 15 يونيو 2012 · 5 رد · 494 مشاهدة · في قواعد بيانات Microsoft Access
مشاركة: واتساب X فيسبوك تيليجرام
#1 صاحب الموضوع

أخواني أخواتي الإعزاء

بعد التحية ،،،

الحقيقة تواجهنا العديد من المشاكل في حال تطبيق المنظومة من عدد من المشغلين .. ومنها ... في حالة إضافة سجل جديد لماذا لا يتم البحث عن رقم السجل ومعرفة ماذا كان موجود مسبقا أو لا ... وذلك إثناء الكتابة بالحقل مباشرة بطريقة تحسس الأرقام.

اتمنى أن اكون قد أوصلت لكم السؤال واضحا ... وفي إنتظار ردودكم تقبلوا منى فائق التقدير والإحترام

والسلام عليكم

#2

اذا كان بالامكان ارفاق مثال

#3
احمد الفلسطيني كتب:

اذا كان بالامكان ارفاق مثال

تفضل أخي هذا الملف

والمطلوب هو عند كتابة الرقم الوظيفي داخل الحقل يتحسس الكود هذا الرقم ويبحث عنه في الجدول table1 ويبين لك في حالة وجودة لكي لا يتم الحفظ على نفس الرقم ويلتغى السجل

وتحياتي لك أخي أحمد الفلسطيني

Blank.rar

#4
فرج إبراهيم عاشور كتب:

تفضل أخي هذا الملف

والمطلوب هو عند كتابة الرقم الوظيفي داخل الحقل يتحسس الكود هذا الرقم ويبحث عنه في الجدول table1 ويبين لك في حالة وجودة لكي لا يتم الحفظ على نفس الرقم ويلتغى السجل

وتحياتي لك أخي أحمد الفلسطيني

اتوقع انه المطلوب

Blank.rar

#5

ضع هذا الكود تحت زر أمر بعنوان

إضافة طالب جديد

يضيف رقما بعد أكبر رقم مضاف من قبل

Private Sub Command20_Click()
On Error GoTo Err_Command20
DoCmd.GoToRecord , , acNewRec
If Me.NewRecord Then
Me.SID.Value = Nz(DMax("[sid]", "main") + 1, 1)
Me.SID.SetFocus
End If
Exit_Command20_Click:
        Exit Sub

Err_Command20:
        MsgBox Err.Description
        Resume Exit_Command20_Click
End Sub
#6

أخي أحمد الفلسطيني

اشكر ك على مجهودك .. الحقيقة موهو الحل المطلوب بس يوفي بالغرض ... وجعله الله في ميزان حسناتك

أخي ابو لميس

مجهود كبير تشكر عليه ونسأل الله أن يزيدك علما تنفع به خلقه ... اما فيما يخص الحل الذي طرحته لا أعتقد أن يوفي بالغرض لأن الحقيقة السجلات المراد إدخالها ستكون مرقمة مسبقا ، ولا يمكن أن نضمن ورودها متسلسة وفق المطلوب ، وبهذا لايمكن تطبيق المقترح الذي اعدته.

ولكم مني اسمى آيات العرفان والتقدير

أخوكم في الله

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

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

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

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

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