اذهب الي المحتوي
أوفيسنا

ابوخليل

أوفيسنا
 عرض الملف الشخصي  عرض المشاركات

  • Posts

    13651

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

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

  • Days Won

    292

 نوع المحتوي 

كل منشورات العضو ابوخليل

  1. ابوخليل
    عليكم السلام اخوي ياليت تشرح الفكرة او الغرض من هذه الحركة حتى تحصل على حل مناسب ، لانه يوجد اكثر من حل
  2. ابوخليل
    تفضل حسب طلبك Dim i As Integer i = DCount("CheckNumber", "CheckDataCustomer", "CheckNumber='" & Me.CheckNumber & "'") If i > 0 Then MsgBox " السجل مكرر ", , " تنبيه" Me.CheckNumber = "" Exit Sub End If Database4.rar
  3. ابوخليل
    السلام عليكم الشبكة الداخلية ليست بحاجة الى انترنت
  4. ابوخليل
    لا حظ ان ما تفضلوا به يتم ضمن نموذج واحد وفكرتي هي تخصيص نموذج لكل نوع
  5. ابوخليل
    ابوعبدالله .. ابوجودي شكرا لكما لإثراء الموضوع .. جزيتم خيرا انا مع تخصيص نموذج للسري فقط .. يكون المعيار في مصدر بياناته اظهار السري فقط
  6. ابوخليل
    الموضوع مكرر فضلا تابع مع موضوعك السابق يغلق،،،
  7. ابوخليل
    السلام عليكم الافضل لك ان تعمل نموذجا خاصا لعرض السجلات السرية ، ويكون الدخول اليه برقم سري وملاحظة صغيرة : حاول ان تكون البيانات في الجدول عبارة عن ارقام سواء كان نوع الحقل رقمي او نصي مثلا : سري وغير سري يكون صفر وواحد يمكنك ترجمة هذه الارقام من خلال النماذج والتقارير عندما تتقدم في البرمجة سيتضح لك فائدة ذلك
  8. ابوخليل
    تفضل جمع مدد الخدمة بالنموذج2.rar
  9. ابوخليل
    تفضل حسب طلبك Dim rs1, rs2, rs3, rs4 As Integer rs1 = (Me.YF * 360) + (Me.MF * 30) + Me.DF + (Me.YN * 360) + (Me.MN * 30) + Me.DN rs2 = (Me.yk * 360) + (Me.mk * 30) + Me.dk rs3 = rs1 - rs2 Me.TY = rs3 \ 360 Me.TD = rs3 Mod 30 rs4 = rs3 Mod 360 Me.TM = (rs4 - Me.TD) / 30 جمع الخدمة بالنموذج.rar
  10. ابوخليل
    يمكنك البحث مباشرة من الجدول اذا استخدمت الكود المناسب مثل ما تفضل به اخونا ناقل
  11. ابوخليل
    عليكم السلام التاريخ والوقت في حقل واحد (Now() ) افضل
  12. ابوخليل
    عليكم السلام في خانة : تحديث الى ضع الصيغة التالية : IIf([t2.total]=0;[t1.ram];[t2.total]) استعلام تحديث2.rar
  13. ابوخليل
    غير ما لون بالاصفر بهذا myCheckUser = Nz(rst!Check_User)
  14. ابوخليل
    هذه من المشكلات التي تواجه المبرمج ،، لما يغير سطر في كود يكون له تبعات في اماكن اخرى لا تظهر الا عند التجربة تفضل تم التعديل جرب ووافني بالنتيجة DATA1041-5.rar
  15. ابوخليل
    تفضل كود يختلف قليلا عن السابق ، علما اني استخدمه في غالب اعمالي بل اني اكتفي بتأكيد كلمة المرور فقط DATA1041-4.rar
  16. ابوخليل
    حبيبي ابو حسان جرب اول مرفق في مشاركتك الأولى الخلل موجود من الأول وليس من تعديلي الأخير على كل حال سوف انظر في الخلل
  17. ابوخليل
    تفضل DATA1041-3.rar
  18. ابوخليل
    كنت اعتقد انك تقصد بالمستخدم هو العميل الآن خرجت لنا بفكرة جديدة والحل حسب رأيي ان يكون الترقيم للمستخدم حسب تاريخ اليوم يستمر في الترقيم حسب المستخدم طوال اليوم وفي الغد يبدأ الترقيم من جديد وهنا لا يلزم ادخال المعرف لانه سوف يظهر في النموذج بمجرد دخوله ، ومع هذا يجب رصده في الجدول مع كل عملية ليصبح الكود مثل هذا : Dim i As Integer i = DCount("usr_id", "voice", "usr_id=" & usr_id & " and voicedate=#" & Date & "#") voiceno = i + 1
  19. ابوخليل
    غير صحيح يا دكتور ما خط بالاحمر النتيجة تكون 3 انا جربت قبل ان ارفق المثال وايضا الآن اعدت التجربة ما خط بالاخضر كيف المعرف رقم 1 يكون مستخدم جديد وهو مسجل له فاتورتين
  20. ابوخليل
    حبيبنا الكود : Dim i As Integer i = DCount("usr_id", "voice", "usr_id=" & usr_id) voiceno = i + 1 الكود يقوم بجمع عدد السجلات في الجدول المشابهة للمعرف الموجود في الفورم ثم يضيف اليها واحد المعرف الجديد الذي يكتب في الفورم ليس له سجلات في الجدول اي انه = صفر فيضيف له واحد فتصبح النتيجة =1 انا قلت ان المهم ان الفكرة تصل .. بحيث يمكنك توظيف الكود لو ارفقت جزء صحيح من البرنامج الذي تعمل عليه يكون افضل
  21. ابوخليل
    تفضل لن يسمح لطارق بالدخول لان تاريخ صلاحيته اصغر من تاريخ اليوم DATA1041-2.rar
  22. ابوخليل
    شكرا لاستاذنا القدير حسام على المداخلة انظر المرفق انا بسطت لك العملية ، حيث حولت النموذج الى ادخال بيانات : نعم بمعنى انك سوف تدخل المعرف واسم المستخدم المهم ان الفكرة تصل ترقيم حسب المستخدم.rar
  23. ابوخليل
    قيد التعديل .. انتظرني
  24. ابوخليل
    وعليكم السلام اخي الحبيب طلبك واضح ومفهوم .. اطلعت على المرفق ، واليك ملاحظاتي وهي خطوات يمكنك تطبيقها اولا : يجب ان يتم اختيار (او كتابة) معرف او يوزر المستخدم اولا .. فان كان موجود سيظهر اسمه ، وان كان جديد يلزم كتابة اسمه نأتي للترقيم : عند النقر على الزر يتم " عد " معرفات المستخدم الموجودة باستخدام : Dcount .. ويضاف لها واحد (+1)
  25. ابوخليل
    اخي بارك الله فيك يجب ان تعطي الجداول حقها عند التصميم .. اعلم انه يجب ان يشتمل كل جدول على حقل فريد يكون هو مفتاح الجدول ، بمعنى يجب ان يشتمل كل جدول على مفتاح هذا المفتاح خاص بمحرك اكسس لزيادة ضبط وربط الجداول ، ليس للمشروع ولا للمبرمج دخل او علاقة فيه ، ومع ذلك يمكن للمبرمج الاستفادة منه كما هو الحاصل في مثالك انظر مثالك بعد التعديل AB (2).mdb
×
×
  • اضف...

Important Information

  I accept