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

الردود الموصى بها

قام بنشر

السلام عليكم ورحمة الله وبركاتة

امل المساعدة في التعديل على جملة الاستعلام التالية

بإزالة الجزأ الخاص بعدد الثواني (second)

حاولت كثيراً التعديل عليها ولكن تظهر لي مشكلة في عدد الأقواس -

Estime: IIf(IsNull([FT1]) Or IsNull([FT2]);"00:00";TimeSerial(Hour(Nz([FT1]))-Hour(Nz([FT2]));Minute(Nz([FT1]))-Minute(Nz([FT2]));Second(Nz([FT1]))-Second(Nz([FT2]))))

 

قام بنشر

وعليكم السلام:smile:

 

حياالله من يانا:smile:

 

لانك تستخدم الدالة TimeSerial ، فما تقدر تحذف الثواني ، وانما تقدر تستبدلهم بـ 00 :

Estime: IIf(IsNull([FT1]) Or IsNull([FT2]);"00:00";TimeSerial(Hour(Nz([FT1]))-Hour(Nz([FT2]));Minute(Nz([FT1]))-Minute(Nz([FT2]));"00"))

.

جعفر

قام بنشر
3 دقائق مضت, jjafferr said:

حياالله من يانا:smile:

حياك الله وبياك وجعل الجنة مثواك

 

4 دقائق مضت, jjafferr said:

انك تستخدم الدالة TimeSerial ، فما تقدر تحذف الثواني ، وانما تقدر تستبدلهم بـ 00 :

هل من بديل لهذه الدالة لاني لاأريد ان تظهر خانة الصفرين الخاصة بالثواني في الاستعلام

قام بنشر

احذف الدالة كاملا ، هكذا:

Estime: IIf(IsNull([FT1]) Or IsNull([FT2]);"00:00";Hour(Nz([FT1]))-Hour(Nz([FT2])) & ":" & Minute(Nz([FT1]))-Minute(Nz([FT2])))

 

جعفر

قام بنشر
11 دقائق مضت, jjafferr said:

احذف الدالة كاملا ، هكذا:


Estime: IIf(IsNull([FT1]) Or IsNull([FT2]);"00:00";Hour(Nz([FT1]))-Hour(Nz([FT2])) & ":" & Minute(Nz([FT1]))-Minute(Nz([FT2])))

 

جعفر

لم تنجح استاذي

بعد حذف الدالة تظهر رسالة خطأ بأن الاستعلام معقد جداً حاول تبسيطه

قام بنشر

جرب هاي في حقل مستقل ، وشوف نتيجته

Hour(Nz([FT1]))-Hour(Nz([FT2])) & ":" & Minute(Nz([FT1]))-Minute(Nz([FT2]))

 

ونتيجة هاي

Estime: IIf(IsNull([FT1]) Or IsNull([FT2]);"00:00";chr(34) & Hour(Nz([FT1]))-Hour(Nz([FT2])) & ":" & Minute(Nz([FT1]))-Minute(Nz([FT2]))) & chr(34)

 

جعفر

قام بنشر
14 دقائق مضت, jjafferr said:

Hour(Nz([FT1]))-Hour(Nz([FT2])) & ":" & Minute(Nz([FT1]))-Minute(Nz([FT2]))

هذه تعمل لكن المشكلة تعطي النتيجة بالسالب

 

15 دقائق مضت, jjafferr said:

Estime: IIf(IsNull([FT1]) Or IsNull([FT2]);"00:00";chr(34) & Hour(Nz([FT1]))-Hour(Nz([FT2])) & ":" & Minute(Nz([FT1]))-Minute(Nz([FT2]))) & chr(34)

أما هذه تظهر نفس الرسالة الاستعلام معقد جدا

قام بنشر

انظر جملة الاستعلام في مصدر التقرير

عند فتح التقرير ادخل الرقم 68

كل الهذف من هذه الزوبعة اريد اظهار مجموع الساعات

Qryrepot.rar

قام بنشر

خلينا نستخدم دالة Format ونحل الموضوع بدون الثواني (لاحظ نهاية الاقتراح الثاني):smile:

Estime2: IIf(IsNull([ft1]) Or IsNull([ft2]),"00:00",Format(TimeSerial(Hour(Nz([FT1]))-Hour(Nz([Ft2])),Minute(Nz([Ft1]))-Minute(Nz([FT2])),Second(Nz([FT1]))-Second(Nz([FT2]))),"Medium Time"))

او
Estime3: IIf(IsNull([ft1]) Or IsNull([ft2]),"00:00",Format(TimeSerial(Hour(Nz([FT1]))-Hour(Nz([Ft2])),Minute(Nz([Ft1]))-Minute(Nz([FT2])),Second(Nz([FT1]))-Second(Nz([FT2]))),"hh:mm AMPM"))

.

آه ، لازم تستبدل ; بدل , (لأني اشتغل على وندوز انجليزي).

 

جعفر

قام بنشر
6 ساعات مضت, jjafferr said:

خلينا نستخدم دالة Format ونحل الموضوع بدون الثواني (لاحظ نهاية الاقتراح الثاني):smile:


Estime2: IIf(IsNull([ft1]) Or IsNull([ft2]),"00:00",Format(TimeSerial(Hour(Nz([FT1]))-Hour(Nz([Ft2])),Minute(Nz([Ft1]))-Minute(Nz([FT2])),Second(Nz([FT1]))-Second(Nz([FT2]))),"Medium Time"))

او
Estime3: IIf(IsNull([ft1]) Or IsNull([ft2]),"00:00",Format(TimeSerial(Hour(Nz([FT1]))-Hour(Nz([Ft2])),Minute(Nz([Ft1]))-Minute(Nz([FT2])),Second(Nz([FT1]))-Second(Nz([FT2]))),"hh:mm AMPM"))

.

آه ، لازم تستبدل ; بدل , (لأني اشتغل على وندوز انجليزي).

 

جعفر

ممتاز استاذي

المشكلة الان عند تحويل الدقائق إلى ساعات في تذييل التقرير

عندما اترك حقل الانصراف في احد السجلات بالجدول  فارغ تظهر نتيجة مجموع الدقائق عند تحويلها الى ساعات  خطأ

مجموع الدقائق 110

و يظهر المجوع بهذا الشكل  1.83في حقل التحويل  والمفروض تكون النتيجة 1.50ساعة وخمسون دقيقة

وكأن دالة nz بالاستعلام لم ترجع القيمة الصفرية للحقل الفارغ بالجدول

انظر المرفق

عند فتح التقرير ادخل الرقم 68  وانظر النتيجة

Qryrepot1.rar

قام بنشر

الخطأ في تحويل الدقائق الى ساعات ،

فما ينفع تقسم الدقائق على 60 فقط ، وانما نكون محتاجين نشوف الدقائق المتبقية ، وكذلك اذا اكثر من 60 ، نضيفها للساعة :blink:

 

عملت الوحدة النمطية التالية لهذا التحويل :


Function Convert_HM(H, M)

    a = M / 60
    b = a - Int(a)
    If b >= 0.6 Then
        Convert_HM = H + Int(a) + 1 + (b - 0.6)
    Else
        Convert_HM = H + a
    End If
    
End Function

.

وناديتها من حقل المجموع في التقرير هكذا:

540.1.Clipboard01.jpg

.

 

جعفر

540.1.Qryrepot1.mdb.zip

قام بنشر

 

1 ساعه مضت, jjafferr said:

الخطأ في تحويل الدقائق الى ساعات ،

فما ينفع تقسم الدقائق على 60 فقط ، وانما نكون محتاجين نشوف الدقائق المتبقية ، وكذلك اذا اكثر من 60 ، نضيفها للساعة :blink:

 

عملت الوحدة النمطية التالية لهذا التحويل :



Function Convert_HM(H, M)

    a = M / 60
    b = a - Int(a)
    If b >= 0.6 Then
        Convert_HM = H + Int(a) + 1 + (b - 0.6)
    Else
        Convert_HM = H + a
    End If
    
End Function

.

وناديتها من حقل المجموع في التقرير هكذا:

540.1.Clipboard01.jpg

.

 

جعفر

540.1.Qryrepot1.mdb.zip

مازال يوجد خطأ في المجموع استاذي

 

pc1.png

قام بنشر
14 دقائق مضت, jjafferr said:

كيف؟

118 / 60 = 1.966 !!

اخي جعفر

118 دقيقة تعادل 1 ساعة و 58 دقيقة

ولدينا مجموع الساعات  24 ساعة

عند جمعهم المفروض يظهر الناتج  25.58 خمسة وعشرين ساعة وثمانية وخمسون دقيقة

لكن يطلع المجموع كما في الصور 26.37 ستة وعشرين ساعة وسبعة وثلاثون دقيقة

هناك زيادة 39 دقيقة

 

قام بنشر

انا اعتذر منك ، وحسابي لتحويل الوقت من دقائق كان خطأ :blink:

 

جرب هذه الوحدة النمطية:


Function Convert_HM(H, M)

    m1 = M / 60
    b = m1 - Int(m1)
    H = H + Int(M / 60)

    Convert_HM = H + (b * 60) / 100
    
End Function

 

جعفر

قام بنشر
13 دقائق مضت, jjafferr said:

انا اعتذر منك

لا أستاذي الكريم لا تعتذر  الخطأ وارد يكفي أني اشغلتك معاي من الصباح

الآن اصبحت النتائج ممتاز ة:wavetowel::clapping::dance1:

الله يجزاك خير ويرحم والديك

قام بنشر
7 دقائق مضت, jjafferr said:

الحمدلله 

استاذي

الآن لو اردت افصل ناتج المجموع الكلي

الساعات في حقل والدقائق في حقل اخر

ماهي الطريقة

قام بنشر

والآن نستطيع ان نجعل حقل المجموع Text34 :

540.1.Clipboard01.jpg

=[AccessTotalshour] + Int([AccessTotalsminute] / 60) + ((([AccessTotalsminute] / 60) - Int([AccessTotalsminute] / 60)) * 60) / 100

.

بالنسبة لمجموع الساعات والدقائق:

الساعات
=[AccessTotalshour] + Int([AccessTotalsminute] / 60)

الدقائق
=((([AccessTotalsminute] / 60) - Int([AccessTotalsminute] / 60)) * 60) / 100

 

قام بنشر
16 دقائق مضت, jjafferr said:

والآن نستطيع ان نجعل حقل المجموع Text34 :

540.1.Clipboard01.jpg


=[AccessTotalshour] + Int([AccessTotalsminute] / 60) + ((([AccessTotalsminute] / 60) - Int([AccessTotalsminute] / 60)) * 60) / 100

.

بالنسبة لمجموع الساعات والدقائق:


الساعات
=[AccessTotalshour] + Int([AccessTotalsminute] / 60)

الدقائق
=((([AccessTotalsminute] / 60) - Int([AccessTotalsminute] / 60)) * 60) / 100

 

هل يمكن ازالة الصفر مع الفاصلة من حقل الدقائق

pc2.png

قام بنشر
7 دقائق مضت, jjafferr said:

نعم ، احذف المائه:


الدقائق
=((([AccessTotalsminute] / 60) - Int([AccessTotalsminute] / 60)) * 60) 

 

جعفر

يعجز اللسان عن تقديم الشكر لك اخوي ابو موسى

لكن لك دعوة حاضرة ودعوة في ظهر الغيب

تحياتي وتقديري وشكري

Join the conversation

You can post now and register later. If you have an account, sign in now to post with your account.

زائر
اضف رد علي هذا الموضوع....

×   Pasted as rich text.   Paste as plain text instead

  Only 75 emoji are allowed.

×   Your link has been automatically embedded.   Display as a link instead

×   Your previous content has been restored.   Clear editor

×   You cannot paste images directly. Upload or insert images from URL.

  • تصفح هذا الموضوع مؤخراً   0 اعضاء متواجدين الان

    • لايوجد اعضاء مسجلون يتصفحون هذه الصفحه
×
×
  • اضف...

Important Information