سعيد صواب

جزاك الله خير استاذ جعفر دائما مبدع ..

حياك الله اخي كرار قم بعمل التالي : من محرر أوامر الفيجوال بيسك .. اختر tools ومن ثم references ومن ثم ابحث بحرف الــ m حتى تجدها وبعد ذلك اضغط ok * محرر الأوامر هو المكان الذي نقوم فيه بكتابة الأكواد . بالتوفيق ان شاء الله

السلام عليكم هذا مرفق اخر تختار الصنف من القائمة تظهر لك البارتز المرتبطه به في نموذج فرعي .. ولو لك سؤال حاضرين . itemsSubform.rar

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

حياك الله استاذ جعفر .. تمام التمام بارك الله فيك ... Dim scanDiag As Object Dim image As Object Set scanDiag = CreateObject("WIA.CommonDialog") Set image = CreateObject("WIA.ImageFile") Set image = scanDiag.ShowAcquireImage() ' image.SaveFile Me.patth & "\" & Me.id & ".jpg" الكود الأصلي يحتاج هذه المكتبة microsoft office 12. object library جزاك الله خير استاذ جعفر

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

السلام عليكم ورحمة الله وبركاته .. اسعد الله اوقاتكم بكل خير.. في المرفق طريقة لسحب المستندات من الماسح الضوئي ومن ثم الإستعراض واختيار مكان واسم الحفظ . =============== الذي اريده ان يتم اخذ مسار الحفظ من النموذج من مربع النص patth .. ويتم بعد المسح ارسال المستندات الى ذلك المسار دون ظهور نافذة الإستعراض dialog . وفقنا الله واياكم .. scanning.rar

صباح الخير حياك الله اخي ابراهيم والأخوة الكرام .. اذهب الى خصائص النموذج .. بيانات ..... ادخال بيانات .... بدلا عن "لا" عدلها إلى نعم . وفقنا الله واياكم جميعا.

السلام عليكم ورحمة الله وبركاته .. حياك الله اخي كرار ... انت قمت بتغيير اغلب مسميات الحقول والذي يعتمد عليه الكود الذي قام به الأستاذ جعفر ... هنا مثال Set rst = CurrentDb.OpenRecordset("Select * From sh Order By tash") جملة select في الريكورد ست تختار من الجدول sh وانت قمت بتغييره الى tb_sh كذلك tash انت قمت بتغييرها إلى تاريخ الوصل .. وهكذا .. ما عليك فعله هو احد امرين .. 1-تغيير المسميات في الكود بما يتناسب مع مسميات الحقول لديك .. 2- إرجاع تسميات حقول الجداول الى ماكانت عليه .. بإمكانك ارجاعها الى ماكانت عليه مع الإستعانه بالتسمية التوضيحية للحقل ... لكي تظهر باللغة العربية .. اما اسم الحقل نفسه فأنصحك بأن يكون باللغة الإنجليزية .. اتمنى اني افدتك .. وفقنا الله واياك ..

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

السلام عليكم ورحمة الله وبركاته .. بارك الله فيك اخي محمد وجميع الأخوة الكرام .. اضافات بسيطة برأيي المتواضع :: 1- الأطباء المعالجين كما أشار الأخ عبدالله .. 2- ارتباط نوع الإصابة بمدة الجلسة وعدد الجلسات " هذي ممكن يفيدك فيها اخصائي علاج طبيعي " 3- قائمة للمواعيد الإضافية :: مثلا يوم الثلاثاء هناك موعد لمحمد عند العاشرة صباحا .. ابلغ محمد مسؤول العلاج بأنه لن يحضر ... هنا يتم احلال مريض من قائمة المواعيد الإضافية. 4- تقرير بالمدة التي قضاها المريض في العلاج منذ دخولة القسم حتى خروجه .. يشمل بياناته وايام علاجه ونوع الإصابة .. الخ. 5- تحديد موعد ولو تقريبي لوقت انتهاء جلسات العلاج أو التأهيل ... وهذا يساعد في ترتيب عمل القسم في المستقبل . 6- هل المريض منوم في المستشفى .. ام يراجع من المنزل. 7- تقرير بعدد المرضى الذين تم تأهيلهم خلال فترة مع نوع الإصابة ومدة التأهيل . اتمنى اني اضفت للموضوع بما يفيد وهذا برأيي المتواضع . وفقنا الله واياكم لكل خير وشفى مرضانا ومرضى المسلمين اجمعين.

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

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

جزاك الله خير وبارك فيك ...

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

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

حياك الله اخي الكريم ارفق مثالك للتطبيق عليه بالتوفيق

جزاك الله خير اخي ابو خليل ... اخي مدحت قم بحذف البيانات التجريبيه الموجودة. وفق الله الجميع

تفضل اخي الكريم ::: شاهد المرفق قم بالتجربه ووافني ابدأ تسجيل الوظائف ثم الموظفين ... وبعدها قم بتجربه المحتويات الأخرى بقي الأسئذانات السابقة :::: هل تريدها لك شهر ام لكل عام ام المجموع وخلاص. بإنتظار اجابتك ولو سؤال اخر فحاضرين هذا رابط التحميل http://www.4shared.com/rar/LW-tV3WKba/Permission2003.html بالتوفيق

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

حياك الله تريد الانتقال إلى سجل جديد اذا جرب هذا السطر DoCmd.GoToRecord , , acNewRec بالتوفيق

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

حياك الله ارفق لي مثال لما تريد لو تكرمت .. لانه يوجد عدة طرق للحفض بناء على نوع النموذج بالتوفيق

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

حياك الله اخي الكريم في حدث عند التحميل (onload)للنموذج ضع هذا السطر DoCmd.GoToRecord , , acNewRec بالتوفيق