• الإعلانات

    • فيصل الحربي

      تسجيل عضوية جديدة في المنتدى   01/31/2016

      السلام عليكم ورحمة الله وبركاته  عزيزي العضو الجديد :  حاليا رسالة الإيميل لتأكيد صحة إيميلكم تذهب للبريد العشوائي ( جاري حل المشكلة )  فإذا لم تجد رسالة التحقق من إيميلكم في صندوق الوارد لديكم إتجه للبريد العشوائي ( JUNK)  وقم بتفعيل إشتراككم من هناك   

mirage4pc

اعضاء
  • عدد المشاركات

    225
  • تاريخ الانضمام

  • تاريخ اخر زياره

كل شيء نشر بواسطة mirage4pc

  1. احتساب العمر بناء على تاريخ الميلاد
  2. Function Age(varBirthDate As Variant) As Integer Dim varAge As Variant If IsNull(varBirthDate) Then Age = 0: Exit Function varAge = DateDiff("yyyy", varBirthDate, Now) If Date < DateSerial(Year(Now), Month(varBirthDate), Day(varBirthDate)) Then varAge = varAge - 1 End If Age = CInt(varAge) End Function  
  3. فرق بين تاريخين

    السلام عليكم و رحمة الله و بركاته Date de naissance تأكد من ان القيمة التي بها هي عبارة عن تاريخ    و افضل أن تستعيض عنه ب   DateDiff("yyyy", [Date de naissance] , [Date Actuelle])  
  4. و هذه ليست بمطلقة :) فالطلقة سوف تلي لا حقا ..ز و لكن اعتقد ان هذه هو طلبك حاليا  
  5. السلام عليكم و رحمة الله و بركاته قبل ان اجيبك  اكثر ما تريد القيام به .. لكي نحدد هل ما تريده وحدة نمطية مطلقة أو وحدة نمطية فئات لكن دعي اعطيك مثال عن الوحدة النطية المطلقة .. مثلا : تريد ان تبي دالة مثلا تقوم بإجراء معين مثلا ان تأخدذ قيمة حقل ما و تقوم بطرحه من جقل أخر و تضيف عليه قيمة ما و من ثم تأخذ هذه النتيجة لتعيدها لوحدة نمطية نقوم بدورها بمعالجة الناتج بصيغة اخرى و من ثم تقوم بتخزينها في حقل ما... من بعض هذه الوحدات المطلقة   Nz - Dmax -  Dsum و هذه جاهزة و لكن يمكنك ان تبني وحدة مطلقة و تستخدمها في نماذجك و هذا مثال  بالمرفق و اسميت الوحدة Dabade
  6. مع العلم ان هنالك نوعين من الوحدات النمطية  1 - وحدة نمطية مطلقة 2 - وحدة نمطية للفئات
  7. السلام عليكم ورحمة الله و بركاته  اكتب فقط اسم الوحدة النمطية في الحدث المراد تنفيذ الامر به  مثلا ليدك وحدة نمطية اسمها SSS   Private Sub Command0_Click() Call SSS End Sub  
  8. السلام عليكم و رحمة الله و بركاته تفضل   zaChangeDateFormat-END.rar
  9. السلام عليكم و رحمة الله و بركاته ( كيف أجعل الاستعلام يقرأ من الفورم الأول، إذا كان مفتوحا، وإذا لم يكن مفتوحا ينتقل للفورم الثاني.. لك بالغ شكري على الفكرة الجديدة وسأستفيد منها كثيرا ) ما رأيك ان  ترفق مثال ليتم التعديل عليه ... هكذا افضل حسب رأي     
  10. AUTONUMBER

    على كل حال __ وفق المرفق تستطيع أن تبني إلي 100000000 و بالتوفيق   Database5.accdb
  11. AUTONUMBER

    السلام عليكم ورحمة الله وبركاته ارفق مثالك لو سمحت  
  12. السلام عليكم ورحمة الله و بركاته فضل أخي الفاضل   dfd.mdb
  13. السلام عليكم ورحمة الله وبركاته بالحقيقة قد اكون فهمت طلبك بصورة خاطئة و لكن إن كان المطلوب أن كل مستخدم يقوم بالدخول المخصص له  إليك هذه الحيلة  اولا على جدول المستخدمين اضفت حقل جديد تحت مسمى StartForm حددت به الفورم الذي يدخل إليه المستخدم   ثانيا قمت بتعديل الفورم T1 إلي UserName و بنيت به حقلين الأول لاسم المستخدم و الثاني لكلمة السر ثالثا قمت بعمل استعلام بقوم بالتدقيق على اسم المستخدم و كلمة السر المدخلتان في UserName و يظهر اسم الفورم المطلوب فتحه رابعا وضعت الكود التالي  الذي يستدعي اسم الفورم للمستخدم  و يقوم بفتحه هكذا بكل بساطة  أتمنى أن يكون هذا طلبك و بالتوفيق تفضل - و بالتوفيق     Test1_2016.accdb
  14. السلام عليكم ورحمة الله و بركاته فكرة بسيطة ( حاول ان تدركها ) و بالتوفيق   تفضل   New Microsoft Access Database - Copy.accdb
  15. السلام عليكم ورحمة الله و بركاته تفضل هذا المرفق   123456.mdb
  16. السلام عليكم و رحمة الله و بركاته عدد الاسطر = [عدد الاحرف الكلي] / [عدد الاحرف في السطلا الواحد] ----- فكر من هنا  و إن كنت تستخدم زر الادخال (Enter)  فإستخدم  Count لل (chr13) و عليه يظهر عدد الاسطر  عدد الاسطر مضروب بإرتفاع السطر +10% من إرتفاع السطر ------------ تحصل على مبتغاك و بالتوفيق  
  17. السلام عليكم و رحمة الله و بركاته اعتذر عن التأخيرفي الرد لإنشغالي في الفترة الماضية الخطأ يكمن هنا  و الصحيح  و هذا الملف بعد التعديل    Chick Date.mdb
  18. السلام عليكم و رحمة الله و بركاته  تفضل    Chick Date.mdb
  19. السلام عليكم و رحمة الله و بركاته نعم ممكن .. قم بعمل جدول جديد يحتوي على ترقيم تلقائي يحتوي رقم و حقل لتسجيل الوقت .. و عند تشغيل الجهاز يقوم بمقارنة التاريخ و فإذا كان التاريخ اكبر من التاريخ الاخير المسجل على قاعدة البيانات بتابع البرنانج بشكل عادي و يسجل وقت جديد في سجل الوقت .... أما إذا كان نفس التاريخ فإنه يقوم بعمل مقارنة مع الساعة ... فإذا ما كان الوقت أقل يظهر رسالة بأنه تم التلاعب بالوقت ,,., و لن يعمل البرنامج حتى يتم ضبط الوقت ... حاول أن تجتهد ريثما ارفع المثال ..  
  20. و لك بمثل ... اخي العزيز في حال احتجت لإضاح اكثر بمكنك طرحه في نفس الموضوع  
  21. حل مشكله

    ارفق الملف من فضلك
  22. السلام عليكم ورحمة الله و بركاته إليك هذه الخدعة  إنشاء جدول يتم تخزين تاريخ الجدهاز به عند تشغيل البرنامج بشكل آلي  ثم بعد ذلك عند نشغيل البرنامج للمرة التالية يقوم بالمقارنة بين اكبر تاريخ مسجل على الجدول و بين تاريخ الجهاز و عند كون تاريخ الجهاز اقل من اكبر تاريخ مسجل على البرنامج يقوم بإغلاق البرنامج ...و إلا فإن البرنامج يتابع العمل  إليك مثال حول ما ذكرت  و بالتوفيق   Chick Date.mdb
  23. حل مشكله

    إن شاء الله تكون الفكرة واضحة   
  24. حل مشكله

    السلام عليكم ورحمة الله و بركاته تفضل الفديو و بالتوفيق
  25. السلام عليكم و رحمة الله و بركاته  احسنت بارك الله فيك و لك