-
Posts
780 -
تاريخ الانضمام
-
تاريخ اخر زياره
-
Days Won
21
كل منشورات العضو AlwaZeeR
-
وعليكم السلام ورحمة الله وبركاته لا شيء يختفي هكذا من تلقاء نفسه تأكد من التنسيق الشرطي للحقول او تأكد من أي حدث عند الفتح او التحميل او الحالي يختص بامر visible او ارفق مثالا يحتوي على النموذج المشار اليه ::
-
وعليكم السلام ورحمة الله وبركاته =Int([minlate]/60) & ":" & Format([minlate] Mod 60,"00")
-
وعليكم السلام ورحمة الله وبركاته ركز: افتح النموذج المستمر بشكل عادي اختر علامة التبويب: الصفحة الرئيسية من خيار لون التعبئة/ الخلفية البديل اختر اللون الذي تريد لاحظ الصورة
-
تفضل اخي أبو زاهر واعذرني لقلة تواجدي للانشغال في بداية العام الدراسي ضع هذا الكود في حقل الشهر الحالي: =DSum("[Alkmiah]","[Hrakatsanf]","[ID_Sanf]='" & [ID_Sanf] & "'" & " And [Nwaha] = 'مبيعات' And [Atarih] >= #" & Format(DateSerial(Year(Date()),Month(Date()),1),"yyyy-mm-dd") & "#")
-
وهذا مع شرط الصنف اخي أبو زاهر استبدل الشرط السابق بهذا الشرط مع تعديل المتغير (0) حسب حاجتك: =DSum("[Alkmiah]","[Hrakatsanf]","[ID_Sanf]='" & [ID_Sanf] & "'" & " And [Atarih] <= #" & ZaherMnth(0) & "#")
-
وعليكم السلام ورحمة الله وبركاته حسب ما فهمت : تريد ان تظهر الكمية المباعة حتى تاريخ اليوم، قبل شهرين، وهكذا ... وليس بين تاريخين ،،، هناك فرق تم استخدام الوحدة النمطية التالية: Public Function ZaherMnth(M As Integer) If Date + 1 = DateSerial(Year(Date), Month(Date) + 1, 1) Then ZaherMnth = DateSerial(Year(Date), Month(Date), 1) - 1 Else If Day(DateSerial(Year(Date), Month(Date) - M, Day(Date))) = Day(Date) Then ZaherMnth = DateSerial(Year(Date), Month(Date) - M, Day(Date)) Else ZaherMnth = DateSerial(Year(Date), Month(Date), 1) - 1 End If End If End Function لارجاع التاريخ حسب المتغير M ثم استخدمنا الاستدعاء التالي في الحقول المراد اظهار النتيجة فيها: =DSum("[Alkmiah]","[Hrakatsanf]","[Atarih] <= ZaherMnth(0)") مع ملاحظة ان صفر هو المتغير M والصفر حتى تاريخ اليوم وواحد قبل شهر واثنان قبل شهرين وهكذا ... جرب ووافني بالنتيجة تحياتي abu zaher.rar
-
اخي العزيز kanory لماذا الأسف؟؟ لا حاجة لذلك، فكلما كثرت الحلول زاد النجاح تحياتي
-
استخدم: SendKeys قبل أي اختصار بين الاقواس BACKSPACE {BACKSPACE}, {BS}, or {BKSP} BREAK {BREAK} CAPS LOCK {CAPSLOCK} DEL or DELETE {DELETE} or {DEL} DOWN ARROW {DOWN} END {END} ENTER {ENTER}or ~ ESC {ESC} HELP {HELP} HOME {HOME} INS or INSERT {INSERT} or {INS} LEFT ARROW {LEFT} NUM LOCK {NUMLOCK} PAGE DOWN {PGDN} PAGE UP {PGUP} PRINT SCREEN {PRTSC} RIGHT ARROW {RIGHT} SCROLL LOCK {SCROLLLOCK} TAB {TAB} UP ARROW {UP} F1 {F1} F2 {F2} F3 {F3} F4 {F4} F5 {F5} F6 {F6} F7 {F7} F8 {F8} F9 {F9} F10 {F10} F11 {F11} F12 {F12} F13 {F13} F14 {F14} F15 {F15} F16 {F16 هكذا: SendKeys "{BACKSPACE}"
-
وعليكم السلام ورحمة الله وبركاته لا اعرف ما الغرض من ذلك لكن لم اسمع انه يمكن التحكم بمحددات السجلات يمينا او يسارا عموما : تستطيع ذلك بالتحايل وذلك بوضع النموذج تعديل الطلبية في نموذج جديد وتتحكم بالنموذج الفرعي الذي هو تعديل الطلبية يمينا ويسارا تفضل المرفق :: Abuuu.rar
-
وعليكم السلام ورحمة الله وبركاته استخدم: ="1" & Format([f_date],"yy") & Format([f_date],"mm") & Format([f_date],"dd") & Format([number],"0000")
-
النتايج غير صحيحه اذا كان التاريخ بالجهاز هجري
AlwaZeeR replied to النجاشي's topic in قسم الأكسيس Access
دعوات من انسان طيب القلب مثلك ،،، بالدنيا وما فيها ولك بالمثل ولعامة المسلمين :: تحياتي -
النتايج غير صحيحه اذا كان التاريخ بالجهاز هجري
AlwaZeeR replied to النجاشي's topic in قسم الأكسيس Access
وعليكم السلام ورحمة الله وبركاته خلينا نجرب نغير تنسيق التاريخ جرب ووافني بالنتيجة Select Case MbAll Case 1 T = Format(DateAdd("m", -12, Date), "yyyy-mm-dd") Case 2 T = Format(DateAdd("m", -6, Date), "yyyy-mm-dd") Case 3 T = Format(DateAdd("m", -3, Date), "yyyy-mm-dd") Case 4 T = Format(DateAdd("m", -1, Date), "yyyy-mm-dd") End Select -
خلونا نهنئ اخونا kanory على حصوله لقب خبير
AlwaZeeR replied to jjafferr's topic in قسم الأكسيس Access
الف مبروك اخي العزيز Kanory بالتوفيق 👍 -
وعليكم السلام ورحمة الله وبركاته EjAbuZaher.rar
-
استبدل , بـ ;
-
تفضل: ضعه في حقل التقرير =Nz([Empb],"بدون")
-
حذف سجل من نموذج ونقله الى نموذج اخربشرط
AlwaZeeR replied to انس المنصوري's topic in قسم الأكسيس Access
وعليكم السلام ورحمة الله وبركاته تفضل عزيزي: Database1 (1).rar -
وعليكم السلام ورحمة الله وبركاته استخدم التنسيق الشرطي اختر تعبير : وضع IsNull([YourField]) مع كتابة السم الحقل الخاص بك بدل YourField ولا تنسى تنسيق الألوان بحسب ما تريد لون الخلايا الفارغة
-
حياك الله اخي العزيز عبد اللطيف كنت اكتب لك فظهر ردك الاخير
-
تفضل لعل هذا الامر يكون ما تريده حياك الله اخي الكريم test00 987.rar
-
لا اعرف ما المغزى وما الهدف من ذلك ان كان ما ذكر سابقا لا يفي بالغرض لو توضح اكثر ماذا تريد قد نجد لك حلا افضل
-
وعليكم السلام ورحمة الله وبركاته هذا ما قصده الحبيب صالح استبدل الرقم خمسة بمربع نص غير منضم وسميه مثلا x test0 987.rar
-
احسنت القول اخي جعفر رب دعوة من احد الاخوة بظهر غيب تكون سبباً في نجاتنا ونعم الاخوة :: تحياتي لكم جميعا