ابوخليل

تكملة لهذا الموضوع http://www.officena.net/ib/index.php?showtopic=52980 وإن شئت قل تحسين وابتكار لطريقة افضل للتعامل مع حماية وندز عند نسخ الملفات وخاصة المكتبات التشغيلية المصاحبة لبرنامجك وتسجيلها داخل النظام كثير من اخواني ممن قاموا بمحاولة تركيب برامجهم على الاصدارات الحديثة من وندز وقف امامهم مسألة الملفات التشغيلية المصاحبة للبرنامج وخاصة تسجيلها داخل النظام حيث يستعصي التسجيل حتى بعد تخفيض امان وندز الى ادنى حد مما يضطرون معه الى استخدام طرق بديلة ومنه التسجيل اليدوي عن طريق الدخول الى الــ DOC وكتابة الاوامر هناك وهذا يعني وجوب تواجد المبرمج او من يقوم مقامه .. وهذه لاشك غير عملي ومقلق في الوقت نفسه سأقوم بشرح طريقة تمكن من نسخ الملفات وتسجيلها برمجيا مهما بلغت حماية وندز للحديث بقية ...

تفضل تم التعديل بما رأيته يتناسب وحاجتك sscc60.rar

تم دمج الموضوعين وتعديل العنوان

السؤال غير واضح وضح اكثر بشيء من التفصيل

تم التعديل حسب الحقلين الذين وضعتهما اكمل على هذا المنوال sch12.rar

اخواني الكرام استخدموا خاصية البحث داخل المنتدى فهو مليء بالجواهر وهذه واحدة : http://www.officena.net/ib/topic/36615-تحديد-نوع-المدخلات-في-مربع-النص/?do=findComment&comment=194029

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

السلام عليكم ما نوع الحقول التي تريد اضافتها وضح مع التفصيل

لديك خطأ في حدث زر : احسب غير السطر الاول بهذا Me.BillCrTotal = Me.FActioncr!sumcr

لم اطلع على المرفق بسبب الاصدار جرب هذا الحل : الصق هذا السطر في رأس الكود تستخدم هذه العبارة للقفز على الاخطاء المنطقية .. ان جازت التسمية On Error Resume Next

تم تعديل العنوان للدلالة على المضمون اخي سمير .. تفضل تم التعديل كما تحب sscc12.rar

بضغطة زر واحدة : يتم تعديل المراحل فقط بغض النظر عن الشعب وذلك باستخدام استعلام التحديث تبدأ بالمراحل العليا ثم الدنيا زيادة في الايضاح : لنفرض ان المرحلة هي المتوسطة فقط وهي ثلاث صفوف 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

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