اذهب الي المحتوي

qathi

04 عضو فضي
  • Content Count

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

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

السمعه بالموقع

161 Excellent

2 متابعين

البيانات الشخصية

  • Gender (Ar)
    ذكر
  • Job Title
    متعلم
  • الإهتمامات
    هندسة الحاسوب

اخر الزوار

847 زياره للملف الشخصي
  1. هل أرضخ للأمر الواقع بعدم أمكانية تعديل المديول وبفشله في تحقيق المطلوب .. ؟؟؟ أرجوا من استذتي الخبراء أعطائي تأكيد بذلك
  2. ما شاء الله استاذي @sandanet لا تنفك أن تقوم بتطوير الحماية بشكل افضل .. تعتبر أنت كنز ثمين لمنتدانا الشامخ .. فجزاك الله عنا كل خير .. ساقوم بالتجربة بأذن الله .. بعد التحميل أكثر من مرة ظهرت رسالة تلف الملف هل ممكن أعادة رفع الملف
  3. أخواني وأساتذتي الأفاضل أرجو المساعدة في التالي: دقة الشاشة عندي 1366x768 بالمرفق يوجد فية المديول الماخوذ من ملف استاذنا @ابا جودى سبب أن يتم أختفاء الجزء السفلي للنموذج خلف شريط المهام .. كما أن جميع النماذج تضهر مائلة بالاتجاة السفلي وتبقى مساحة في الجزء العلوي من الشاشة - أتمنى التعديل بأن تكون جميع النماذج مرتفعة فوق شريط المهام .. وأن يحتسب الاطار الخاص بشريط المهام في التوسيط النماذج في الشاشة قست ارتفاع شريط المهام عندي وكان 1 سنتي متر أو أرجوا حسب خبرتكم بنصحي بطريقة مثلى وأفضل .. بدون التلاعب بسطح المكتب المستخدم بتعديل دقة الشاشة مرفق الملف للتعديل Database1.rar
  4. أستاذي @أبو عبدالله الحلوانى أشكرك .. حفظك الله ورعاك تم حل المشكلة من قبل أستاذي @ابو ياسين المشولي وذلك بأبقاء المديول كما هو وبوضع كود الاستدعاء Call Create_Record_For_Every_Item2 تحت زر بدل حدث بعد التحديث .. فتم الأمر بنجاح بارك الله فيكم جميعاً .. وجزاكم الله عني خير .. ورزقكم الله الصلاح والفلاح في الدنياء والأخرة
  5. أشكرك أستاذي عبدالله على مجهودك .. بارك الله فيك .. وجزاك الله عني خيرا قمت بتجربة الملف .. ولكن: - يقوم بتكرار صنف واحد فقط
  6. أستاذي عبدالله .. سعيد بردودك معي لكن أعيد وأكرر المشكلة ليس باعادة التحجيم فالمشكلة عندي هي التوسيط النموذج في مختلف الشاشات وليس تكبير او تصغير النموذج على الشاشات فشتان بين التوسيط والتحجيم قمت بتجربتها على أكثر من نموذج ولم تفلح فظهرت النماذج عندي بالجهة اليسرى في أعلى الشاشة
  7. أستاذي عبدالله طبعا سبق وأن أشرت في رد سابق عن هذه الدالة Move ليست المطلوبة .. لانه تسبب في عدم توسيط النماذج في مختلف قياسات الشاشات فما الحل الفعلي لتوسيط النماذج بشكل عملي مع اختلاف قياسات الشاشات مع مراعات احتساب مساحة شريط المهام ؟؟
  8. أخواني واساتذتي الأفاضل .. أرجو المساعدة في التالي: لدي كود استدعاء مديول في نموذج BarcodePrintGroupSub_F بعد التحديث حقل LabelCount والمديول عملة نسخ الحقول من جدول BarcodeGroupItems_T الى جدول BarcodeItems_T مع تكرارها في الجدول الاخير على حسب الرقم الموضوع في LabelCount الموجود بالنموذج Sub Create_Record_For_Every_Item2() On Error Resume Next Const RTableName As String = "BarcodeGroupItems_T" Const ALLItemsTableName As String = "BarcodeItems_T" Dim MyDB As DAO.Database Dim R As DAO.Recordset Dim SqlSt As String Dim ItemCounter, RRecordCounter, count As Integer Set MyDB = CurrentDb Set R = MyDB.OpenRecordset(RTableName) DoCmd.SetWarnings False SqlSt = " DELETE " & ALLItemsTableName & ".* FROM " & ALLItemsTableName & " ; " DoCmd.RunSQL (SqlSt) For RRecordCounter = 1 To R.RecordCount R.MoveFirst R.Move RRecordCounter - 1 For ItemCounter = 1 To R.Fields("LabelCount") SqlSt = "INSERT INTO " & ALLItemsTableName & " (BarCodeNumber,PriceS,ItemName,CodeCounter) VALUES ( " & R.Fields("BarcodeReader") & "," & R.Fields("PriceS") & ",""" & R.Fields("ItemName") & """," & ItemCounter & " );" DoCmd.RunSQL (SqlSt) Next ItemCounter Next RRecordCounter DoCmd.SetWarnings True R.Close MyDB.Close End Sub عند وضع رقم في السجل الاول فان الكود يعمل تماما .. لكن المشكلة في السجلات التالية .. بعد أدخال رقم في الحقل LabelCount لا يقوم بتكرار السجلات في الجدول BarcodeItems_T بل يقوم بتكرارها على حسب القيمة السابقة قبل التعديل كما أنه لا يقوم بمتابعة الترقيم من بعد اخر رقم لحقل CodeCounter الموجود بجدول BarcodeItems_T مرفق الملف للتعديل Br.rar
×
×
  • اضف...