ابوخليل

بعد اذن الاستاذ حسام جزاه الله خيرا ونفع به الذي يفهم 1- ان الصرف يتم حسب البيوتات بيت اهله ايتام وبيت اهله فقراء فيصرف للبيت حسب عدد افراده هل هذا صحيح ؟ ام انه قد يصرف لشخص معين داخل بيت ولا يصرف لآخر ؟ 2- المواد المستلمة : هل هي تبرعات عينية يدفعها بعض الناس مثل فرش واجهزة كهربائية ونحو ذلك ثم تسلم للمستحقين ؟

الخطورة في طريقتك هذه محتملة . وعلى كل حال التنفيذ سهل جدا وبسطر واحد في حدث النقر على الزر نلصق هذا السطر FileCopy CurrentProject.path & "\back1", CurrentProject.path & "\DBdata.mdb" باعتبار back1 هي النسخة و DBdata.mdb هي قاعدة الجداول الاساسية يلاحظ وجوب ان تكون القاعدتين في مكان واحد بجانب بعض ويمكن تغيير المسارين الافتراضيين في السطر اعلاه

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

طبعا استعنت برنامج لهذا لخصوص انظر في الروابط ادناه http://www.officena.net/ib/topic/56530-مشكلة-في-فتح-قاعدة-بيانات-msysdb/ http://www.officena.net/ib/topic/56440-هل-من-حل-لهذه-المشكلة/

هذا كل ما قدرت عليه ... انظر ان كانت بياناتك كاملة Prog200.rar

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

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

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

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

السلام عليكم ورحمة الله وبركاته اخواني الكرام المطلوب : الحماية ضد التغيير أو التعديل بحيث لا يظهر داخل التقرير الا الصورة الاصلية او اقتراح اي طريقة للحماية عدا تضمين الصورة داخل قاعدة البيانات مرفق مثال للتطبيق pic1.rar

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

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

الاخ الــفاضل el_basha الموضوع يشتمل على مادة مخالفة لقانون المشاركة رجاء قرا ءة قواعد المشاركة كاملة وفقك الله لطرق الخير xxx يغلق xxx

يبدو انك لم تفهم شرحي السابق اذا انشأت محرك اقراص الشبكة في الجهاز الفرعي كما وضحت لك فلست بحاجة الى هذه المسارات لنفرض انك انشأت محرك الاقراص باسم z سيكون المسار هكذا : z:\pic\102.jpg

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

السلام عليكم اذا كانت القاعدة MDB افتح قاعدة2 على التصميم افتح لسان التبويب جداول انقر على ايقونة جديد / استيراد جدول ثم اجلب الجدول من قاعدة1 واذا كان الاصدار احدث : من شريط الادوات / بيانات خارجية / اكسس ثم اتبع المعالج لجلب الجدول

تفضل هذه طريقة اخرى بالضوابط التي طلبتها Dim V0, v1 As Integer Dim yr, mth, dy As Integer V0 = text0 * 360 v1 = V0 - (Nz(Text1 * 360) + Nz(Text2 * 30) + Nz(Text3)) yr = v1 \ 360 mth = (v1 Mod 360) \ 30 dy = (v1 Mod 360) Mod 30 textx = yr & "سنة, " & mth & "شهر, " & dy & "يوم" Text4 = yr Text5 = mth Text6 = dy طرح سنوات من الخدمة3.rar

حسب معطياتك لا يمكن تكون الايام اكثر من ثلاثين كما لا يمكن ان تكون الاشهر اكثر من 12 لانه لديك خبرة محددة بالسنين والشهور والايام وتريد تطرحها من العدد 20 فنحن قمنا بالتسلف بداية وحسبنا الـــ 20 سنة هكذا : 19 سنة ، 11 شهر ، 30 يوم ثم اجرينا عملية الطرح آمل ان تكون الفكرة واضحة تم تعديل المثال حسب رغبتك طرح سنوات من الخدمة2.rar

تفضل : تم عمل وحدة نمطية عامة تأخذ خيارات النسخة من الجدول ويمكن الآن اخذ النسخة من اي مكان داخل البرنامج ملحوظة : بقي ان تضع قيم افتراضية للحقول فيما لو المستخدم لم يحرك ساكنا x.rar

حين لم تبادر بالرد فقد جعلت لك السنين اختيارية ويمكن ان تجعل الرقم 20 داخل الكود بدلا من قيمة الحقل اولا عملنا وحدة نمطية عامة يمكن تطبيقها في اي مكان من المشروع في النموذج او الاستعلام Function modah(vyear As Integer, vmonth As Integer, vday As Integer) v1 = (text0 - 1) - vyear v2 = 11 - vmonth v3 = 30 - vday If v3 < 0 Then v2 = v2 - 1 End If v2 = v2 Mod 12 modah = v1 & "سنة, " & v2 & "شهر, " & v3 & "يوم" End Function وهنا تم نداؤها داخل المحرر في حدث النقر على الزر textx = modah(Text1, Text2, Text3) طرح سنوات من الخدمة.rar

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

السبب ان مربع التحرير غير منضم اي لا يستند الى مصدر داخل الجدول وقبل كل شيء جدول الدورات لا يحتوي اصلا على حقل الرمز المذكور

يؤسفني عدم تمكني من فتح المرفق لاني اعمل الآن على جهاز يحتوي على اصدار 2003 ولكن تكفي الصورة الظاهرة لتحكي عن جمال التصميم لدي ملاحظة : وهي يفضل ادراج كلمة في ( نسخة كل ) لتصبح (نسخة جديدة كل ) لان النسخة الاحتياطية حاصلة بالفعل عند كل ضغطة زر

هل السنوات الـ 20 ثابتة ام انها قد تتغير

اثراء المنتدى بعناوين جديدة افضل لاشك بارك الله فيك