ابوخليل

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

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

جزاك الله خيرا استاذ علي .. سبقتني .. فكرة جميلة احتساب اخر 3 ارقام وهذه فكرة اخرى .. ويمكن توظيفها داخل الاستعلام .. اتمنى تنال استحسانكم : Public Function Rondx(Ron As Double) As Double Dim v1, v2 As Double v2 = Ron Mod 250 If v2 > 0 Then v1 = (Ron - v2) + 250 Else v1 = Ron End If Rondx = v1 End Function Private Sub Form_Current() Me.Summuny2 = Rondx(Nz([Summuny])) End Sub

اخوتي الفضلاء : يراعى جعل كل سؤال جديد في موضوع مستقل

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

تفضل اخونا شريف تم اصلاح الملف كان الملف مهيأ للعمل على 64 بت Newd.rar

جزاك الله خيرا اعجبني : فكرة خيار كلمة المرور.

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

بعد اذن الاستاذ حسام جزاه الله خيرا ونفع به الذي يفهم 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