ابوخليل

خلينا نضع النقاط على الحروف بدلا ما نسير في دوامة العمل اذا تم مراجعة التصميم اكثر من مرة يصبح لا يطاق العمل عليه 1- اضبط جدول اليوزر بالمستخدمين واقسامهم فقط يكون عدد المستخدمين بعدد الاقسام 2- كل مستخدم وامامه صلاحياته على الطلبية .. يمكنك عمل حقل نصي في جدول اليوزر توضح امام اسمه المهام التي يقوم بها على الطلبية 3- ياليت ترتيب المستخدمين يكون بترتيب مسار الطلبية انا اعرف ان الطلبية قد ترفض وترجع لمن اعدها .. هذا له جزء يخصه من الكود

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

مستحيل ان لا يفتح اذا لصقته على C .. الصقه مباشرة على C هذا السطر بعد التغيير If PD.Name = "C:\prevent copy.accdb" Then تفصيل المسألة : قلت سهل ممتنع لانه يؤدي الغرض فلو تم نسخه من سطح المكتب ولصقه في جهاز آخر على سطح المكتب فلن يعمل لان اليوزر في الرابط الموجود في الملف يختلف عن اليوزر الموجود على الجهاز الآخر .. وهنا يصيبه الاحباط ولن ينتفع منه ، وايضا هو لا يعرف نوع الحماية حتى لو كان على احد الاقراص مباشرة ولكن داخل مجلد فلن يفتح حتى تضعه في المكان الصحيح = المسار الموجود في الملف وليس لان خصائص اسمه مختلفة

اخي @Eng.Qassim عم تتكلم ؟؟ هل تقصد مثال الأخ موسى ؟

اخي العزيز .. مسألة ان الملف يتغير عند النسخ فهذا غير صحيح فقط يتغير الاسم عند اللصق في المجلد الذي يتواجد فيه الملف الأصل بزيادة copy والمسؤول عن هذا التغيير هو وندوز بمعنى ان اكسس لا حول له ولا قوة مثله مثل اي ملف آخر الآن نزلت ملفك في مجلد (((التنزيلات))) .. ثم فتحت على الكود المعطل وشغلته ، وغيرت الرابط الى .... اغلقت الملف ثم فتحته مرة اخرى فامتنع لانه موجود في مجلد التنزيلات والرابط الذي بالداخل يختلف الآن انا نسخته وارفعه لك حاول فتحه ، اذا لم تتمكن من فتحه انسخه ايضا والصقه على جذر الــــــــ C وجرب فتحه هناك prevent copy.rar

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

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

سوف اعيد النظر في المثال واقوم بالتعديل ولكن العمل يجب ان يكون منطقيا ، ومحكما اقرأ فكرتي جيدا وازودني برأيك سوف ابدأ من النهاية : الادمن او الرئيس هو الكل في الكل ( يملك وحده تحويل الطلبية ، والتعديل عليها في اي وقت ) 1- يمكن للجميع الاطلاع على الطلبية ولكن لا يمكن التعديل الا لمن تم اعتماده من قبل الرئيس 1- الطلبية التي تم تحويلها يظهر فيها ختم : تم التحويل .. ويمكن الاطلاع عليها من الجميع ، وكذلك اذا تم رفضها 2- الرئيس هو من يعدل حالة الرفض بتوجيهها الى القسم المختص 3- الرئيس هو من ينشىء سجل جديد كطلبية جديدة ، ويحولها الى المشاريع لاستكمالها بمعنى ان الرئيس عمله فقط ادارة الطلبية .. لا يهم مركزه فيمكن منح الصلاحية هذه لاي موظف في اي قسم اذا استكملت الطلبية من المشاريع وتم الحفظ يقوم الرئيس بتحويلها الى القسم المختص .. وهكذا نأتي للاساسات : يجب ان تضبط جدول المستخدمين ، لأن التحويل الى القسم والصلاحية تكون باليوزر .. اي سيكون في القسم مسؤول واحد فقط يطلع على الطلبية للتجربة والضبط اريدك تعدل جدول المستخدمين بحيث تضع مستخدم واحد لكل قسم .. هذا العمل مبدئيا لاني رأيت في جدولك الاخير جميع وظائف المستخدمين = ادمن يمكن لاحقا اضافة مستخدمين آخرين ولكننا نريد الآن حصر العملية في دائرة الطلبية مستقبلا سنعمل خيار امام المستخدم يتيح له الظهور من عدمه في فورم الرئيس عند تحويل الطلبية ، بمعنى يمكن تبديل الموظف بآخر في ثواني

سهل ممتنع اذا اراد تشغيلها يجب عليه اعادة تسمية اليوزر في الوندور علما انه يمكنه اضافة مستخدم جديد في وندوز وتسميته بنفس اسم الجهاز المنسوخ منه

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

شكرا لكم احبتي على ثنائكم العطر تم نقل الروابط الى جدول اكسس مؤكد بحاجة لتحسين العمل وتسهيل البحث بعمل نموذج DataSearch.rar

ضع المعيارين تحت بعض واحد في سطر : المعايير والثاني في سطر : أو او اكتب المعيارين في سطر واحد وافصل بينهما بالدالة OR

في هذا الموقع قسم خاص بطلبات الأعضاء بمقابل هنا اعرض طلبك والذي تريد هناك ولا تنسى تضع وسيلة تواصل معك الموقع غير مسؤول عن ما يتم من اتفاق بينكما

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

الخلاصة : وحتى يغلق الموضوع وينتهي النزاع : في هذا الموضوع خاصة لسنا بحاجة الى تقييم الافضل فصاحب الحاجة هو ادرى بحاجته ان اراد العدل والدقة محاسبيا للمستحقات سيختار ما تفضل به الاستاذ ابواحمد . وان اراد اعدادا صحيحة لتوظيفها في حسابات وعمليات اخرى سيختار ما تفضل به الاستاذ قاسم . أسأل الله الكريم ان يغفر لنا ولكم .

السلام عليكم اهداني اخي العزيز @حسونة حسين ملف اكسل يحتوي على جميع مواضيع منتدى اكسس وبروابط مباشرة اضعه بين ايديكم لا تنسونا من دعوات صالحات *********************** ( إضافات للموضوع - Moosak ) قمت بعمل تصميم بسيط لنموذج البحث وأضفته إلى الموضوع الرئيسي بعد أذن أستاذنا أبو خليل 🙂 بمجرد الكتابة تظهر النتائج .. لاستعراض الموضوع يتم الضغط على العنوان مباشرة النقر المزدوج على مربع البحث يعيد إظهار جميع النتائج 🙂 يمكن البحث بكلمات متفرقة في الجملة .. Search_Officena_Access.rar ********************************************** Access.rar

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

استاذنا اذا لم يتح فلا بأس فليس من الاهمية بمكان .. الأهم هو معالجة المشكلة في ارسال الصور كما بين الأخوة

ايش هذا !!! كنت اظن اني جايب الذيب من ذيله .. راحت عليك يابوخليل يا سلام عليك .. نعم كذا .. انا الذي سأرشح افضل اجابة بناء على مطلوب ابوهاله كعدد صحيح بدون كسر فيما يخصني داخل المثال قمت باستبدال الكود باجابتي السابقة الى السطر الذي تفضلت به ,, ووضعت قبله احتراز عدم ظهور النتيجة بالسالب واضفت الدالة الى استعلام جديد .. ليختار صاحب الموضوع الطريقة التي تناسبه لم اقل هذا وانما نسبته لصاحب الموضوع . اهل مكة ادرى بشعابها .. وما قصرت يابو احمد .. كتب الله اجرك months30Up.rar

اختلف برنامجي في رمضان واحتاج الى ايام لتنظيم الوقت المتاح للمنتدى ، ولكن شدني النداء نعم انت نبهته ان هو اراد الناتج مع الكسور ووافق .. ورأيت التعديل .. كتب الله اجرك ابا احمد ، هو رأى نتيجة المهندس قاسم بلا كسور فكانت اقرب الى نفسه ولكن التطبيق من خلال الكود اكثر احترافية .. فلما عاتبته قام بالغاء افضل اجابة برجاء الحصول على نتيجة افضل . سأكون وسيط خير بينكم لعلي افوز بافضل اجابة ... دمجت الفكرتين وبفضل الله خرجت بهذا الكود آمل الاطلاع من الجميع والتقييم Function GetMonths30(Date1 As Date, Date2 As Date) As Long Dim d1, m1, d2, m2 As String Dim y1, y2 As Integer Dim sum_d, sum_m, sum_y, sum_days As Integer Dim tst1, tst2 As Long d1 = Format(Day(Date1), "00"): d2 = Format(Day(Date2), "00") m1 = Format(Month(Date1), "00"): m2 = Format(Month(Date2), "00") y1 = Year(Date1): y2 = Year(Date2) tst1 = y1 & m1 & d1: tst2 = y2 & m2 & d2 If tst2 < tst1 Then Exit Function sum_d = Abs(Int(d2) - Int(d1)) sum_m = Abs(Int(m2) - Int(m1)) * 30 sum_y = (y2 - y1) * 360 sum_days = sum_y + Abs(sum_m - sum_d) GetMonths30 = sum_days End Function months30.accdb

@SEMO.Pa3x بعد التجربة اتضح ان المثال يستخدم واتساب ويندوز .. وليس واتساب ويب هل يمكن فتح الواتس من قوقل مباشرة

غير الفاصلة ; الى الفاصلة , "RD" & [report_No] & Format([txt5],"mm" & Format([txt5],"yy"))

اذا في النموذج ضع في الحدث الذي تراه مناسب لأحد الحقول ولنفرض ان الحدث بعد التحديث اذا اعتبرنا ان اسم الحقل المنضم txtNo txtNo="RD" & [report_No] & Format([txt5];"mm" & Format([txt5];"yy"))

لا يفتى ومالك في المدينة

راجع تواريخك .. هذا لا يمكن .. انت كتبت هذا التاريخ عدة مرات .. ربما يقصد 1-3 وليس 30-3