Abdelaziz Osman

السلام عليكم ورحمة الله هل هذا المعيار ( <=> ) يصلح لعدم التكرار فى اكسيس ولكن عند تجربته داخل استعلام تم رفضه ( <=> ) ارجوا الافادة

لسيادتكم جزيل الشكر والتقدير لك بالغ التحية وزادك الله علما وخيرا

السلام عليكم ورجكة الله يرجى التكرم بالافادة كم هو موضح بالصورة مرفق قاعدة بيانات مبدئية المطلوب بالنموذج المرفق المطلوب هو الضغط على الزر الخاص (بنعم/لا) كما بالسهم المشار اليه رقم 1 وذلك عند اختار نعم اي( √ ) يتم تسجيل تاريخ اليوم والوقت الحالى داخل الحقل المشار اليه بالسهم رقم 2 & واذا تم التصحيح بازالة الاختبار واصبح (لا) يتم محو التاريخ من نفس الحقل للسهم رقم 2 ارجوا التكرم بالافادة بالغ التحية والتقدير AcD.mdb

@Shivan Rekany اريد ايضا رسالة تأكيد للحذف قبل الضغط بالحذف

شكرا معلمنا @Shivan Rekany لك بالغ التحية بالفعل الحل الخاص بك قد نجح مع انى كنت اريد استخدام الزر الخاص بالحذف الموجود بالفعل باعدادات النموذج ولكن الحل الخاص بك مبهر بالفعل لك بالغ التحية والان اريد المساعدة فى الغاء زر الحذف الموجود بالفعل بالنموذج حتى لا يتم استخدام زرارين معا

مربع ادخال كلمة المرور يظل مفتوح بعد الضغط على زر الحذف الخاص باعدادات النموذج !!!

صديق ارسل لى هذا الكود ولكن يوجد مشكلة ايضا ارجوا التكرم بالافادة والمساعدة

يرجى التكرم تحميل الملف المرفق حيث المطلوب حذف السجل الواحد برقم 9999 باستخدام زر الحذف الموجود باعدادات النموذج وعند كتابة كلمة المرور يتم حذف سجل واحد فقط ثم يتم الخروج من شاشة الحذف ولا يتم الخروج من النموذج وهكذا عند الضغط على زر الحذف بالوقوف على سطر السجل delete with password.mdb

@Moosak صورة تاكيد الحذف لاتزال موجودة حتى بعد الحذف فما هو الحل Dim InBox As String On Error Resume Next InBox = InputBox("أدخل كلمة المرور لتأكيد الحذف", "خاص بالادارة") If InBox = 9999 Then DoCmd.RunCommand acCmdDeleteRecord Else MsgBox "كلمة مرور خاطئة" End If

@Moosak السلام عليكم ورحمة الله هل ممكن ان ترسل نموذج توضيحى لك بالغ التحية

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

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

السلام عليكم هل يوجد طريقة لجماية عرض التصميم باكواد او كلمة سر ارجوا الافادة

اسف دوست غلط

تسلم صديقى بارك الله لك فى علمك لك جزيل الشكر والتحية تسلم صديقى jjafferr بارك الله لك فى علمك لك جزيل الشكر والتحية

مرفق النموذج المراد تحقيق الكود عليه Last Situation.zip

اعطانى رسالة ان لدي مشكلة تقريبا تتعلق بعلامة ( & ) كما هو موضح بالصورة

السلام عليكم يرجى التكرم بالمساعدة الكود التالى وظيفته عند الضغط على رقم 1 او 2 او 3 كل رقم يعطى ادخال ( المطلوب اذا تم استخدام رقم من الارقام من قبل واريد استخدام رقم اخر بعد ذلك ... اريده ان لا يلغى الادخال القديم ولكن يكمل بعده فى سطر جديد لا اريده مسح الادخال القديم ) الكود كالتالى هو : Private Sub Npos_AfterUpdate() On Error GoTo Err_Npos_AfterUpdate ' Dim strMsg As String, strTitle As String, MMM As String Dim ttt As Integer, intStyle As Integer ttt = Me.Npos ' TTT = InputBox("Enter number between 1 and 11") Select Case ttt Case 1 Me.[Last Situation] = "استعجال المورد بسرعة التوريد _تاريخ / /" Case 2 Me.[Last Situation] = "مراسلة المورد باستبدال المهمات المرفوضة _تاريخ / / " Case 3 Me.[Last Situation] = "مراسلة المورد بتوفير شهادات المطابقة الفنية _تاريخ / / " Case Else MsgBox ("برجاء إختيار رقم من القائمه") End Select DoCmd.RunCommand acCmdRefresh Exit_Npos_AfterUpdate: Exit Sub Err_Npos_AfterUpdate: MsgBox Err.Description Resume Exit_Npos_AfterUpdate End Sub

لدي استعلام وأريد أن أدخل فيه سؤال عن شهر معين داخل حقل تاريخ بالجدول المستعلم عنه فما هو كود المستخدم ؟؟؟ بغض النظر عن اليوم او السنة على سبيل المثال أريد الاستعلام عن كافة الحقول التى كانت فى شهر مارس اذا أدخلت رقم الشهر 3 ولا يهم اليوم او السنة فما هو الكود ؟؟؟ من فضلكم

السلام عليكم مطلوب قاعدة بيانات لمتابعة اوامر التوريد من تاريخ الاصدار حتى اصدار الشيك المستحق للمورد

عندما استخدمت قاعدة التحقق من الصحة تلك Between 1/2022 And 4000/2022 اقفل الادخال عند السجل 39/2022 ولم يقبل الاستكمال وعندما استخدمت الكود التالى بعد التحديث وجدت به شيء غير كامل لم اعرف ما هو الكود If rst.recordcount >4000 then Msgbox .... Else if rst.recordcount =0 then Num= "1/"& Year(date) Else Num= rst.recordcount+1 &"/"& Year (date) End if السؤال بطريقة اخرى مرفق ملف المطلوب فيه عند كتابة اي ادخال ولو حرف واحد فى حقل Person in charge يعطى نتيجة تلقائى بالحقل TENDER_NO بالقيمة 1/2022 وهكذا وكلما ضغط على زرار اضافة وادخل على نموذج FO4 وادخل سجل جديد فى حقل Person in charge ولو حرف واحد يعطى فى TENDER_NO القيمة التى بعدها 2/2022 بدون تخطى التسلسل وبدون تكرار FO4.zip

عندما استخدمت قاعدة التحقق من الصحة تلك Between 1/2022 And 4000/2022 اقفل الادخال عند السجل 39/2022 ولم يقبل الاستكمال وعندما استخدمت الكود التالى بعد التحديث وجدت به شيء غير كامل لم اعرف ما هو الكود If rst.recordcount >4000 then Msgbox .... Else if rst.recordcount =0 then Num= "1/"& Year(date) Else Num= rst.recordcount+1 &"/"& Year (date) End if

اخى العزيز Moosak اشكرك كثيرا على مجهودك الرائع ولكن اريد الحقل FOR يسير بتسلسل وبدون تخطى وبدون تكرار 1/2022 ثم 2/20222 ثم 3/20222 وهكذا .... ولايقبل التخطى ولا يقبل التكرار ولك جزيل جزيل الشكر

السلام عليكم ورحمة الله مطلوب كود او قاعدة تحقق من الصحة لطريقة الالتزام بالتسلسل والنمط التالى 1/2022 2/2022 3/2022 4/2022 عند إدخال تلك البيانات فى حقل داخل جدول او نموذج اكسيس مع عدم تخطى التسلسل او الانتهاء عند البيان 4000/2022 مع عدم تخطى التسلسل ارجوا الافادة مرفق ملف التقيد بالتسلسل والنمط.mdb

اساتذتنا الكرام الافاضل بعد التحية لماذا لا يوجد خاصية الاذونات والمستخدمين بقواعد بيانات اكسيس 2013 , 2016 , 2019 عن قواعد بيانات اكسيس 2003 , 2000 كما موضح بالصور المرفقة