علــــي

والله مب مستهين فيه مبين انه كود خطير هههههههههه طبعا مهما وصلنا من مستوى تبقى انت الكبير والاستاذ وهذا احنا نتعلم منك يا اخوي جعفر جاري التجربة ٫٫٫٫٫ وشكراً وتآكد ان هذا المنتدى يمتلك مواهب ما شاء الله عليها <<<<اتمنى لكم التوفيق يارب

السلام عليكم اخوي جعفر أولاُ يعطيك العافية الكود شغال بنسبة 80% لانه يوجد به خطأ وهو أن لما يكون تاريخ الانتهاء يصادف يوم "الجمعة" يحدث الخطأ ويحسب تاريخ يوم السبت أي لا يتجاوز ذلك مثال ذلك لو كان تاريخ البدء 22/11/2017 والمدة 5 أيام يكون تاريخ الانتهاء 29/11/2017 المعادلة صحيحة تجاوز 24 الجمعة و 25 السبت لكن لو كان تاريخ البدء 19/11/2017 والمدة 5 أيام يكون تاريخ الانتهاء 25/11/2017 المعادلة غير صحيحة تجاوز 24 الجمعة وتم حساب تاريخ 25 يوم السبت مثال آخر لو كان تاريخ البدء 21/11/2017 والمدة 3 أيام يكون تاريخ الانتهاء 25/11/2017 المعادلة غير صحيحة تجاوز 24 الجمعة وتم حساب تاريخ 25 يوم السبت كذلك أعتقد والله أعلم وانت أخبر مني أن الخطأ ربما يكون في الكود أنه يضيف يوم واحد ففي بعض الحلات يتم حساب يوم السبت 'إذا كان اليوم من أيام الاجازة If InStr(1, Excl_D, Weekday(i)) > 0 Then 'اضف يوم الى اليوم الاخير ToDate = ToDate + 1 End If شاكر لك وقتك وجهدك وتقبل تحياتي

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

السلام عليكم لدي طلب صغير لأخواني اصحاب الخبرة محتاج كود يعطيني التاريخ المطلوب دون حساب يومي الويكند مثلا تاريخ البدء 23-11-2017 يوم الخميس مدة التسليم (3 أيام) المطلوب : تاريخ التسليم تلقائيا يكون (28-11-2017) أي أنه تجاوز تاريخ 24+25 لأنهم يومي الجمعة والسبت وبدء الحساب من تاريخ 26/11/2017 يوم الأحد كأول يوم في الاسبوع وشكرا جزيل Database1.zip

نفس الخلل عندي

السلام عليكم ورحمة الله أنا بصدد تركيب مشروعك برنامج (معلومات عن الحيوانات ) على برنامجي ولكن لدي طلب صغير الأكواد الحالية تنشأن ملف Images للمرفقات ويكون على مسار ملف البرنامج أنا بحاجة إلى تغيير المسار بأن أحدد له الملف الذي سوف يقوم بوضع المرفقات فيه فياريت تحدد لي الأكواد التي يجب علي تعديلها وشكراً جزيلاً لك

السلام عليكم ورحمة الله أخواني أنا نقلت قاعدة البيانات access إلى SQL Server هل يستلزم إضافة أو تعديل أكواد علماً بأني لاحظت بعض الخصائص أصبحت لا تعمل والعلاقات تعطلت وشكرا جزيلا لكم

1. نزلت المرفقين (مع برنامج الحيوانات - ومن غير برنامج الحيونات) 2. بداية لم أغير أي شي مجرد اتبع خطوات ربط السكنر واربطه 3. لما استخدم زر scan الي هو المفروض يفتح لي برنامج السكنر لا يعمل وانما يتطلب مني اني اضع مسار الصورة واسم الصورة ويجب ان تكون موجودة فعلا في الجهاز ولما اضغط بعدها scan تفتح وكأنها زر (Browse) مب زر مسح مباشر من السكنر الصور المرفقة ممكن توضح قصدي شكراً اخوي جعفر هل تريد أن اضيف ملف القاعدة تضيف تعدل عليها وتضاف النظام ؟!

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

مرحبا اخوي جعفر، شكرا على مساندتك ودعمك انا طبقت شروحاتك وضبطت السنكر للتجربة فيه مشكلة وهي عدم عمل السنكر من خلال نظام access مع ان في برنامج NAPS2 شغال كل شي تمام والبروفايل محفوظ لكن من الأكسس ما يفتح السكنر

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

السلام عليكم ورحمة الله عندي كود لزر حفظ البيانات في الجدول لكن عندي خلل في المرفقات لا أعرف تعديل الكود ياريت لو ممكن احد يتفضل بالمساعدة وشكرا Private Sub add_Click() If IsNull(Me.Title) Or IsNull(Me.iso) Then MsgBox "xxxxxxxxxxxxx " 'MsgBox Exit Sub Else Dim Rs As DAO.Recordset Set Rs = CurrentDb.OpenRecordset("unread") Rs.AddNew Rs!id = id Rs!Title = Title Rs!User = User Rs!Date = Date Rs!Time = Time() Rs!subj = subj (الخلل هنا) Rs!Attachment.Fields("FileData").LoadFromFile "" = Attachment Rs.Update Set Rs = Nothing Me.Title = "" Me.MsBox = "" MsgBox "Done " DoCmd.Close End If End Sub فما هو التعديل كي يتعرف على المرفقات ويضعها في الجدول بعد ضغط الزر

للرفع

السلام عليكم ورحمة الله وبركاته اخواني انا عندي قاعدة بيانات ودمجت فيها نظام المستخدمين لإعطاء الصلاحيات الله يجزيه خير الذي عمله محتاج تعديلين عليه عشان يلبي احتياجي اذا فيه إمكاني من الأخوان يساعدوني 1- أريد إلغاء الـ decode من كافة الملف بيحث يتم إدخال المستخدم واضافته واستدعاءه بشكل طبيعي لانه يتعارض مع باقي الاشياء عندي فأريد المستخدمين من غير تشفير 2- أريد إضافة مجموعات للمستخدمين لعمل( أقسام) بحيث لو الموظف ينتمي لهذه المجموعة لديه صلاحية تفتحيفتح له هذا (الفورم) .. لو كان من هذه المجموعة يفتح له هذا الفورم الخاص بمجموعته وهكذا الموضوع مهم بالنسبة لي ياريت من يقدر يساعدني حتى لو بمقابل مادي بس يكون بسعر معقول انا حاضر وشكرا.. الملف https://drive.google.com/open?id=0B7tsxshSkC9cQ1gydmtTMVVTNVk

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

الف شكر لك اخوي ... ان شاء الله راح اشوفه الان

السلام عليكم ورحمة الله اعزائي اعضاء هذا المنتدى الممتاز سؤال ؟ كيف اخلي الرقم التلقائي (autonumber) في الجدول باسم (id) يتكون بعد اجراء عملية الحفظ (بعد ضغط زر الحفظ) وذلك لانه يتكون تلقائي قبل الحفظ بمجرد كتابة اي حرف في الفورم مما يسبب ضياع العديد من الرقام في حال التراجع عن الحفظ شكرا جزيلا لكم

الظاهر عندي مشكلة بنموذج المستخدم وجداوله بشكل كامل ؤاح احاول اغيره واشوف لي نموذج صحيح لو كان عندك نموذج احترافي تسجيل دخول مع صلاحيات ياريت ترفقه لي وبكون لك مشكور

بحاول اضبطها والف شكر لك على مجهودك الله يجزيك خير

الف شكر يا اخوي بس فيه مشكلة وحدة ان النتيجة يوزر واحد بس هو (ali adel) حتى لو دخلت من جهاز ثاني بيوزر ثاني دائما النتيجة يوزر واحد انا اتوقع ان الخلل من االكود الي اعتمدنا عليه الي هو =DLookUp("EngineerID","Tbl-Users") هل الدالة صحيحة او لا لاني سويتها من عندي بصراحه هههههه وانا ما اعرف في الاكواد واول مره اعمل برنامج بشكل كامل

شوف اخي كيف صار

السموحة لم استطيع اضافة المصدر لانه يحتوي على الكثير من البيانات حوالي 200MB ثاني حاجة عندك جدول اليوزر والفورم ومكان الحاجة المطلوبة وسامحني لو تعبتك معي يا اخي الكريم

aboarby123, on 23 Mar 2015 - 4:08 PM, said: شكراً مقدماً على المساعدة اخي الفاضل تفضل الملف مرفق Database21.zip

بنتظار مساعدتكم جزاكم الله خير

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