الطـاير قام بنشر يونيو 13, 2011 قام بنشر يونيو 13, 2011 السلام عليكم ورحمة الله وبركاته سؤال بسيط يا جماعة الخير في المثال المرفق : اريد انت اكتب تاريخ اليوم فقط في الحقل بالنموذج الفرعي ويقوم هو اتوماتيك بتكملة التاريخ بكتابة الشهر والسنة من حقلين الكمبيو الموجدين في النموذج الرئيسي ولكم تحياتي Date.rar
منتصر الانسي قام بنشر يونيو 13, 2011 قام بنشر يونيو 13, 2011 اخي العزيز من خلال الإطلاع على مثالك يبدو أنك تريد اختصار عملية إدخال تاريخ التوقيع فبدلاً من أن يتم إدخال التاريخ كاملاً يكتفى بتحديد اليوم فقط ...؟ إذا كان هذا صحيح فأنصحك بما هو أفضل لك وأسهل - يمكنك أن تجعل القيمة الإفتراضية للتاريخ هي تاريخ اليوم الحالي - او ان تكون القيمة الإفتراضية هي تاريخ آخر سجل (يعني يتم أخذ التاريخ من السجل السابق) - ان يتم كتابة التاريخ في مربع نص في النموذج الرئيسي (لمرة واحدة) ويكون هذا التاريخ هو القيمة الإفتراضية فهل هناك مايمنع من تنفيذ هذه الطرق أم أن هناك ضرورة للتنفيذ بالطريقة التي طلبتها...؟ تحياتي,,
الطـاير قام بنشر يونيو 13, 2011 الكاتب قام بنشر يونيو 13, 2011 جزاك الله خير يا استاذ منتصر على ردك الطريقة التي ذكرتها غير مطلوبة في مثالي : البرنامج هو برنامج مكتب دوام يعني يتم ادخال كروت دوام الموظفين بشكل اسبوعي مثلا وكل موظف تواريخه مختلفة عن الاخر من حيث الغياب والحضور والطبيات وغيره وكل ما اريده التسهيل على المستخدم بدلا ان يدخل التاريخ والشهر ....... يدخل فقط اليوم على سبيل المثال - موظف غايب يوم 5/6/2011 .... انزل مباشرة الى سجل جديد في حق التاريخ واكتب 5 فقط بالتالي هو يأخد الشهر والسنة كما هما في حقلين com1 و com2 في النموذج الرئيسي في مثالي المرفق ارجوا ان اكون وضحت ، ولك تحياتي
منتصر الانسي قام بنشر يونيو 14, 2011 قام بنشر يونيو 14, 2011 اخي العزيز هذا تعديل بسيط اعتقد انه يلبي طلبك ويعتمد على التالي 1- جعلنا القيمة الإفتراضية لحقل التاريخ هي =Day(Date()) & "/" & [Forms]![Ispian F]![com2] & "/" & [Forms]![Ispian F]![com1] اي ان اليوم يؤخذ من اليوم الحالي والشهر والسنة يؤخذان من القائمتين 2- في حدث (عند الإدخال On Enter) الخاصة بمربع نص التاريخ كتبنا الكود التالي Private Sub Dat_Enter() Dat.SelStart = 0 Dat.SelLength = 0 End Sub حيث ان هذا الكود يعتمد على خاصيتي SelStart و SelLength واللتين تقومان بالتحكم بتحديد اوبتظليل النص داخل مربع النص حيث تقوم خاصية SelStart بتحديد بداية التظليل و خاصية SelLength تقوم بتحديد طول التظليل وعليه فإن الوضع الإفتراضي عند الإنتقال الى مربع النص سيكون كما بالصورة التالية وبموجب الكود سيصبح الشكل كما بالصورة التالية ويمكنك أيضا بتعديل قيمة الخاصية SelLength لتساوي 2 ليصبح الشكل كما يلي بالتالي فإنه يكتفى بكتابة اليوم والخروج من الحقل مباشرة أرجو أن تكون هذه الطريقة مفيدة لك تحياتي,,, Date.rar
الطـاير قام بنشر يونيو 15, 2011 الكاتب قام بنشر يونيو 15, 2011 جزاك الله خير يا استاذ منتصر على حلك وعلى تعاونك معي وطريقتك هذه طريقة جميلة لكنها تفرض عليا تاريخ افتراضي والمطلوب كتابة تواريخ قديمه ومختلفة ، وانا اريد حقل فاضي فقط واكتب فيه رقم او رقمين فقط المشكلة ان المستخدم هيغلط كثير في عملية ادخال البيانات والموضوع يتطلب الدقة في ادخال البيانات فياريتلو يوجد طريقة لإدخال اليوم فقط
منتصر الانسي قام بنشر يونيو 17, 2011 قام بنشر يونيو 17, 2011 اخي العزيز الطاير يبدو أني لم أوضح لك الطريقة كما يجب التاريخ الإفتراضي يتحدد بحسب السنة والشهر التي تحددها أنت من القوائم في النموذج الرئيسي (وهذا هو ماطلبته أنت) أما اليوم فقط فيؤخذ من تاريخ اليوم وعند الانتقال الى مربع نص التاريخ سيتم تظليل الجزء الخاص باليوم عندها يقوم المستخدم بكتابة الرقم أو الرقمين ثم إنتر ... وهذا كل شيئ أرجو أن تجرب المثال وقم بتحديد سنة أخرى وشهر آخر وكأنك مستخدم آخر ومن ثم انتقل الى مربع نص التاريخ واكتب تاريخ اليوم فقط ثم إنتر فإذا ظهرت لك أي ملاحظات أو مشاكل يمكنك طرحها وبإذن الله نتعاون في حلها تحياتي,,,
الطـاير قام بنشر يونيو 19, 2011 الكاتب قام بنشر يونيو 19, 2011 (معدل) جزاك الله خير يا استاذ منتصر انا فهمك وجربت المثال وجميل جدا لكن ممكن المستخدم يتلخبط ويغلط ولله الحمد توصلت لطريقة سهلة وهي اضافة حقل رقمي لكتابة اليوم فقط وحولته الى كومبو بكس والزمته بقائمة الايام من 1 - 31 وعملت عليه كود بعد التحديث ... حقل التاريخ = قيمة هذا الحقل + حقل الشهر + حقل السنة وبكدا سهلنا الامور كلها وجزاك الله خير على مساعدتك ولك تحياتي تم تعديل يونيو 19, 2011 بواسطه الطـاير
الردود الموصى بها
Join the conversation
You can post now and register later. If you have an account, sign in now to post with your account.