ابوخليل

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

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

يعني تريد مثل عمل كشوف المرتبات ؟ بحيث ممكن تبقى كما هي في الشهر القادم وقد يتغير بعضها

اجعل لكل صفحة نموذجا فرعيا او مصدرا يخصها

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

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

?

حبيبنا ابو ياسين الكود السابق : CopyFile CurrentProject.path & "\db1.mdb", "D:\Data.txt" ينسخ الملف اللذي بجنب قاعدة البيانات والذي اسمه db1.mdb الى قرص D بمسمى آخر وبامتداد آخر يمكنك تسميه بالذي تريد وحتى بدون امتداد وبهذه الصفة : CopyFile "C:\db1.mdb", "D:\Data.mdb" ينسخ من مكان الى مكان آخر وبمسمى مختلف

عذرا .. لم افهم شي

طريقة عمل المبرمج الصحيحة وتجنب المتاعب : اولا يجب تقسيم قاعدة البيانات الى : 1- واجهات 2-قاعدة خلفية تشتمل على الجداول من المتعارف عليه غالبا ان القاعدة الخلفية (الجداول) غير قابلة للتحديث ومن غير المتصور ان يجرى عليها اي تعديل لذلك يحسن بالمبرمج ان يزيد في الجداول بعض الحقول التي يتوقع الحاجة اليها مستقبلا خاصة اذا كان البرنامج طور الاستخدام لاول مرة والا فإن الاصل عدم المساس بقاعدة البيانات اما الواجهات فيمكن التحديث يوميا بالزيادة و النقص والتنسيق ونحوة كزيادة تقارير او نماذج ولا حرج ، وفي النهاية ترسل الى المستخدم ليلصقها في مجلد البرنامج ويوافق على اللصق والاستبدال .

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

هذه الدالة FileCopy تنسخ اي ملف من وجهة الى وجهة أخرى ولها معاملين : FileCopy path1,path2 مثال : CopyFile CurrentProject.path & "\db1.mdb", "D:\db1.mdb"

تفضل يمكنك بهذا الكود تصدير جدول محدد الى قاعدة بيانات اخرى وسيتم استبداله اذا كان بالمسمى نفسه DoCmd.TransferDatabase acExport, "Microsoft Access", "d:\b.mdb", acTable, "tbl2", "tbl2", False

شوفت انت اكبر مني بـــ 4 سنوات من العود الحين

وعليكم السلام بدون زر خيار وانما باستخدام المعيار المناسب في مصدر البيانات انظر المعايير في الاستعلام Import_2.rar

السلام عليكم وجدت كود ضمن مقتنياتي يستخرج اكبر قيمة في حقول السجل وقمت بتعديله كي يعد الحقول غير الخالية Function countflds(ParamArray fldArray() As Variant) Dim I, curfld As Integer For I = 0 To UBound(fldArray) If Not IsNull(fldArray(I)) And fldArray(I) <> 0 Then curfld = curfld + 1 End If Next I countflds = curfld End Function عدد حقول سجل بشرط.rar

انت الرائع ما شاء الله .. بارك الله في عمرك ووقتك ، والحل ليس وليد الساعة بل اقتبسته من عمل عندي قريب منه

مشاركة مع احبتي اخونا كريمو لعل هذا يلبي طلبك قيد العمل.rar

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

معذرة .. لايمكنني فتح المرفق فانا اعمل على اوفيس 2003

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

وعليكم السلام : انظر هنا

هذا رابط الموضوع السابق المختصر الفكرة هي تأسيس لعملية البيع والشراء لعملاء معتمدين باقل قدر من الكائنات ، والفكرة تم تنفيذها بــ 3 جداول أساسية فقط : راس الفاتورة _ التفاصيل _ المدفوعات . كثير منكم سيقول نعلم هذا ولم تأت بجديد ، وأعلم ذلك ولكن الحال في غالب الامثلة والمواضيع المنتشرة في هذا المنتدى وغيره تختلف وفيها الإلزام بما لا يلزم . وموضوعي هنا نسخة مطابقة من الرابط السابق ولكني احببت افراده بموضوع وعنوان مستقل لعدة اسباب : 1- وجود فكرة جديدة من بنات افكاري تساعد عند عمليات الادخال ، ومن الممكن وجود احد سبقني الى هذه الفكرة في هذا المنتدى او غيره فهنا اقدم اعتذاري له ابتداءً ولتعلموا انما هو توارد خواطر . 2- جميع من مر على الموضوع السابق وفهم الفكرة لن يتوقع تغير متميز لذا لن ينشط في المتابعة وفي تصفح المثال الجديد 3- تلافي جميع المشكلات في الملاحظات السابقة خاصة التي يستعصي او يصعب حلها الفكرة هي جعل جميع النماذج غير منضمة والحاق البيانات باستخدام الكود ، وهذه ليست جديدة ولكن الجديد هو استخدام جدول وسيط مؤقت لرصد تفاصيل الفاتورة buySel.rar

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