rudwan

عفوا أخي الكريم أزل الاشارات كما يلي =DateDiff("y",now(),[تاريخ التعيين])

id هو اسم الحقل الذي تريد عدم تكرار قيمته table1 اسم الجدول الموجود فيه ذلك الحقل غير في ذلك الكود فقط اسماء الحقول و الجدول , و معنى ذلك الكود أنك تقول له أحصي لي عدد القيم المساويه لهذه القيمة المدخله في السجلات السابقه فاذا كان العدد أكثر من 0 يعني تم ادخال قيمه قبل أما أسماء الحقول بالعربي فلاتؤثر , و لكن ضع الأسماء بين مربعين كما يلي If DCount("[id]", "[table1]", " [id]=" & Me.[ID]) > 0 Then و ان كان من الأفضل تسميتها بالانكليزي

السلام عليكم يمكنك عمل ذلك من خلال وضع مربع نص في أسفل النموذج و تكون قيمته كما يلي بالنسبه للحقول الصح : =dcount("MyField","MyTable","[MyFiled]=true") أما مجموع الحقول الخطأ : =dcount("MyField","MyTable","[MyFiled]=false")

السلام عليكم أولا يجب أن يكون حقل مدة الخدمه = رقم ثانيا ضع فيه المعادله التاليه " =datediff("d","date()","[ تاريخ التعيين ]") و هذا يعطيك مدة الخدمه بالأيام و لو اردت بالشهر أو بالسنه , استبدل d ب m أو y

شوف يظبط و لا ما يظبط db1.rar

لو ضغطت على زر سجل جديد من النموذج الذي بجانب زر البحث , يعطيك أخر قيمه للحقل file في السجل السابق

ضع هذا الكود اينما تريد يحقق لك ما تريد فقط غير اسم الحقل المطلوب في الكود و ضعه في حدث قبل التحديث لنفس الحقل

شوف هذا الملف بعد التعديل عند ادخال سجل جديد و الضغط على زر سجل جديد db9.rar

لنفرض عندك في الجدول حقلين : IDNumber-Name طبعا IDNumber مفتاح رئيسي و لايجوز تكراره . نفرض أنك تريد رساله تشعرك أن قيمة الحقل -Name دخلت سابقا Private Sub Name_beforeUpdate() If DCount("Name", "MyTable", "[Name]=" & Me.name) > 0 Then MsgBox " هذا الاسم تم تكراره سابقا" cancel=true End If end sub

هل جربت الكود الذي كتبته لك أعلاه اذا كان عندك الحقل مرتبط ب نعم أو لا , عدل فيه مايلي Private Sub ov1_AfterUpdate() if ov1=true then Me.Parent.form1.SetFocus Me.Parent.form1.Locked = False else Me.Parent.form1.Locked = true end if End Sub

جرب هذا الكود private sub form_current() If Me.NewRecord Then if file>0 then me.file.defaultValue=dlast("file","table") end if end if end sub

السلام عليكم أنا آسف لم أنتبه الى ردك , فقد تأخرت عليك احتمال الخطأ لأن عندك خطأ في كتابة المعادله على كل حال , يمكنك أن تضع هذا الكود عند حدث النموذج عند الحالي private sub form_current() If Me.NewRecord Then me.MyField.defaultValue=dlast("FieldName","FieldName") end if end sub و اذا لم تنجح معك أرسل الملف على القسم المؤقت لتحميل الملفات لنرى أين الخطأ

السلام عليكم ضعي في حقل العمر , في اسفله خانة معايير between 15 and 25

السلام عليكم أخي الكريم لو كان عندك بيانات موظفين مثل ما قال الأخ اشرف و تريد أن تعمل لها تبويب افتح صفحة التصميم اختر علامة التبويب , ستظهر لك مبدئيا صفحتين غير مرتبطتين بالجدول الآن قم من عناصر الجدول بادراج العناصر التي تريدها في الصفحه الأولى , ثم اضغط على الصفحه الثانيه و ضع فيها ماتريد أيضا من عناصر و ان شئت اضافة صفحات أخرى يمكن ذلك بالضغط على اليمين و اختيار صفحه اضافيه و هكذا , اي أن علامة التبويب هذا ما هي الا طريقة عرض تبويبيه للبيانات فقط . و ليست بذاتها عنصرا من عناصر البيانات

السلام عليكم يمكنك وضع المعادله التاليه في حقل القيمه الافتراضيه لمربع النص المطلوب =dlast("FieldName","FieldName") حيث FieldName اسم الحقل FieldName اسم الجدول

السلام عليكم الأخ فتى الوادي شكرا على تعقيبك , و قد تم تعديل عنوان الموضوع الأخ terminator من صفحة تصميم الاستعلام , تجد عند اسم كل حقل مربع تشييك ( * ) أزل العلامه منه و اجعلها فارغه يصبح الحقل المطلوب مخفيا

السلام عليكم يكون لك بشكل أساسي جدولين الأول جدول الموظفين و فيه : رقم الموظف - اسم الموظف الجدول الثاني جدول الترقيات و يكون فيه : رقم مسلسل - رقم الموظف - تاريخ الترقيه - الترقيه ( أو الدرجه ) و يعمل رابط بين الجدول على حقل رقم الموظف و من ثم يتم انشاء استعلام على الجدول الثاني ( الترقيات ) بحيث يعرض فيه آخر ترقيه لكل موظف أي استعلام تجميعي

السلام عليكم أخي الكريم في البرمجه كل شي ممكن , و لكن الأفضل اختيار الحل الأسهل ممكن أن تعدل الحقول لتكون كمايلي : رقم --- مفتاح اساسي --- رقم الاسم -- نص تاريخ الميلاد -- تاريخ الحاله الاجتماعيه - ( متزوجه - عازبه ) طريقة العمل : بمجرد الولاده تدخل البيانات الأساسيه في الجدول , و بعد الزواج يتم تعديل الحاله الاجتماعيه , و في حال وجود مولود معين يتم تسجيل بياناته في جدول آخر يحتوي البيانات التاليه رقم مسلسل رقم الأم -- رقم مأخوذ من الجدول الأساسي رقم المولود ---- رقم رقم الاب ---- رقم تاريخ الولادة ----- تاريخ الحقل الفارغ ---- رقم و ان شئت التوسع أكثر يمكنك الاطلاع على المثال التالي : جداول الأسره

السلام عليكم أخي الكريم مرحبا بك في أول مشاركه في المنتدى و لكن ارتكتبت أول مخالفه ايضا في عنوان الموضوع كما تعلم هذا المنتدى يتصفحه عدد كبير من الأعضاء , و الكل يبحث عن موضوع معين من خلال عنوان الموضوع المطروح , و هذا العنوان لن يساعد أي شخص في البحث عن حل مشكله يريدها , هذا أولا و ثانيا ان تحديد اسم شخص معين في الرد من شأنه تقليل فرضة الرد من بقية الأعضاء و المشرفين و ارجو من الأخ المشرف العام تعديل العنوان ليتلائم مع المضون أما بالنسبه لسؤالك , مالذي تستفيده من استيراد ملف بيانات كل دقيقه ؟ و لماذ لا تجعل له عملية ربط أو link مباشر مع جداول قاعدة البيانات ؟ و ما نوع ملف البيانات الآخر ؟ هل هو اكسيل أم ماذا ؟ تحياتي

السلام عليكم يا أخي حدد ما تريده بالضبط , أنت طلبت كود للسماح بالتعديل و الآن تقول أنك تريد السماح بالاضافه فقط . في النموذج تستطيع أن تفعل ماتريد , منع حذف , منع اضافه , منع تعديل للسجلات القديمه أي شي تريده ممكن لكن أنت حدد بالضبط ماتريد أما بالنسبه لكيفية جعل مصدر السجلات مقفلا , فهذا يتم كما يلي : افتح صفحة تصميم النموذج الفرعي , اذهب الى بيانات , ثم اختر اقفال = نعم prpperites - data - locked= yes و بذلك لاتستطيع تعديل اي حقل من اي سجل في ذلك النموذج

السلام عليكم المتوسط الحسابي معادله معرفه ضمن بيئة أكسس , و تستخدم كما يلي : =DAvg("[Freight]", "Orders", "[ShipRegion] = 'CA'") حيث : friegth اسم الحق المراد الحصول على المتوسط الحسابي له ordres اسم الجدول الذي يقع فيه الحقل shipregion تحقيق شرط معين

هذه الجمله تتيح الامكاتيه لاضافة سجلات جديده و ليس لتعديل سجلات قديمه أولا اجعل مصدر سجلات النموذج الثاني مقفلا , ثانيا : في حدث بعد التحديث للعنصر ov1 من صفحة تصميم النموذج الفرعي الأول و ليس من النموذج الرئيسي , ضع الكود التالي : Private Sub ov1_AfterUpdate() Me.Parent.form1.SetFocus Me.Parent.form1.Locked = False End Sub ثالثا : في حدث بعد التحديث للنموذج الثاني ضع الكود التالي : me.locked=true

السلام عليكم أولا اجعل مصدر سجلات النموذج الثاني مقفلا , ثانيا : في حدث بعد التحديث للنموذج الأول ضع الكود التالي : forms!formname.recordset.locked=false و هذا الكود لم أجربه , أرجو تجربته هل يعطي نتائج صحيحه ثالثا : في حدث بعد التتحديث للنموذج الثاني ضع الكود التالي : me.recordset.locked=true

السلام عليكم جرب هذه الفكره و حاول تطويرها بنفسك و اضافة ما تريد من بيانات عليها db8.rar

اذا لماذا لا تجعل بيانات الاتصال ضمن الجدول الأساسي ايضا و توفر ذلك الجدول ؟ أنا في البدايه ظننت أن جدول البيانات الأساسي خاص بالنساء فقط , لأنك وضعت حقل المحرم و على ذلك لاداعي ابدا للجدول الثاني , أضف حقول بيانات الاتصال الى الجدول الأساسي