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

ابوخليل

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

  • Posts

    12858

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

  • Days Won

    239

 نوع المحتوي 

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

  1. ابوخليل
    وعليكم السلام الامر يسير فقط اكتب سطر التعطيل في حدث فتح نموذج البداية DoCmd.SetWarnings False سيتم تعميم الاجراء على كافة قاعدة البيانات حتى يتم اغلاقها
  2. ابوخليل
    السلام عليكم مادام الكود يعمل ؛ انظر الى امان الماكرو في اكسس وقم بتخفيضه الى الحد الأدنى فقد يكون ارتفاع الأمان هو السبب
  3. ابوخليل
    اخوي طارق نحن ننظر للسؤال ونحاول تطبيق المطلوب بالضبط الدالة Round تعطي نتيجة 12 وليس 11 هذا هو اللبس الذي وقع بينك وبين اخوتك وهو ان السؤال الذي طرحته غير مطابق لما تريد
  4. ابوخليل
    مفهوم هذا الكلام انك تريد حذف الكسر العشري مهما كان بدون ان يتأثر العدد الصحيح ودالة Int تفعل ذلك
  5. ابوخليل
    تم مع الشكر والتقدير
  6. ابوخليل
    في المرات القادمة اعمل مثال بسيط ، يوضح الفكرة تفضل تم التعديل على مصنف اكسل ، والدالة لا يختلف عملها هنا او هناك Xl00.rar
  7. ابوخليل
    نعم كلامك صحيح ، الصور خارج قاعدة البيانات فليس لها تأثير
  8. ابوخليل
    السلام عليكم جرب استخدام int هكذا Int([text1])
  9. ابوخليل
    في بالي لوكان المرفق mdb لاشارككم استاذنا تمون واكثر .. وأشكرك على تواضعك ولطفك وبالعكس مثل هذه تحمل بين طياتها التقدير والمحبة ، اكرر شكري وتقديري .. ترشيح محل اعتبار
  10. ابوخليل
    مشاركة مع الاستاذ محمد جزاه الله خيرا هنا يلغي رسالة أكسس Private Sub المهنة_NotInList(NewData As String, Response As Integer) Undo Response = 0 MsgBox "(لاتوجد هذه المهنه ضمن الاختيارات)" End Sub
  11. ابوخليل
    جرب اضف مع الكود المذكور الجملة التالية : Or Is Null
  12. ابوخليل
    وعليكم السلام اجابة لسؤالك الاول تفضل من هنا .. هذا ما تبحث عنه السؤال الثاني فضلا ادرجه في موضوع جديد مستقل
  13. ابوخليل
    شكرا لكم جميعا ولا يحتاج تاخذون رأي احد لانكم انتم اهل المنتدى واعرف بالفائدة والمصلحة العامة
  14. ابوخليل
    If MsgBox("هل تريد حذف هذا السجل ؟", _ vbCritical + vbYesNo, _ "تحذير") = vbYes Then DoCmd.RunCommand acCmdDeleteRecord Else Exit Sub @Shivan Rekany
  15. ابوخليل
    احتمال يكون الخلل من تفعيل بعض خصائص قاعدة البيانات الصورة في المرفقات هي لخيارات قاعدة بيانات mdb ابحث عن الخاصية المحاطة بالمربع الاحمر في الخيارات الخاصة بالاصدار الذي تعمل عليه ثم ازل العلامات من مربع الخيار ان وجدت ثم اغلق قاعدة البيانات وافتحها من جديد
  16. ابوخليل
    السلام عليكم مشاركة معكم احبتي الكود الذي تفضلت بعرضه ثم قام بالتعديل عليه الاستاذ جمال يعمل بكفاءة حسب الطلب في المثال : انقر على الزر فيقوم بتغيير الخاصية على جميع النماذج حتى النموذج المفتوح db1.rar
  17. ابوخليل
    السلام عليكم يتصور حدوث هذا في كود تحديث update يمر على الحقل ويقارن ويطبق التعديل ويمكن تضع هذا الكود في عنصر تحكم حقل غير منضم داخل النموذج =IIf([a]=[b];0;[a]) وكذلك يمكن تطبيقه عند ادخال القيمة في النموذج وفي حدث بعد التحديث لحقل a If a = b Then a = 0 اي لما ادخل قيمة في a تساوي قيمة b تتحول لصفر بمجرد خروجي من الحقل
  18. ابوخليل
    شكرا استاذنا العلامة محمد صالح شرح ولا اروع درر ونفائس وعمل احترافي نادر جعله الله في موازين اعمالك
  19. ابوخليل
    الاكواد واضحة ليست بحاجة لشرح اذا فيه حاجة خافية عليك خبرني
  20. ابوخليل
    جزاك الله خير
  21. ابوخليل
    وعليكم السلام ورحمة الله وبركاته تم النقل الى القسم المناسب
  22. ابوخليل
    نعم يمكن توظيف كود الاستاذ sandanet لانه لا فرق بين جلب رقم قطعة واحدة او اكثر ، لاننا نجلب نتيجة معادلة ولكن الاشكالية تبقى مع العميل ,, ما ذا لو اراد تغيير الجهاز .. كما هو معلوم التقنية في تطور دائم اما ان نعمل جانب حسن الظن او سنخسر كثير من شعبيتنا بانتظار نتائج التجربة والملاحظات ان وجدت من بقية الاخوة الاعضاء
  23. ابوخليل
    السلام عليكم تفضل تم التعديل كما طلبت بالصورة عد نوع التعليم.rar
  24. ابوخليل
    السلام عليكم استاذنا العزيز .. تمت التجربة الطريقة متقنة قدمت التاريخ ثلاثة ايام فطالبني برقم التسجيل استخدم في أعمالي طريقة مشابهة ولكن بدون فترة تجريبية
  25. ابوخليل
    اخوي يربط كأي جدول افتح على الجداول واختر جديد/ ربط ثم اختر الملف واكمل المعالج الى الآخر قد لا يظهر ملف اكسل هنا يجب عليك اختيار النوع من مربع الحوار ثم حدد ملفات اكسل هذا مثالك بعد التعديل / لترى انه يعمل بشكل ممتاز ضع المجلد على قرص D ExclLink.rar
×
×
  • اضف...

Important Information

  I accept