رمهان

هدية رائعة من استاذ واخ رائع !! واكرر اعجابي باتجاه التري فيو من اليمين لليسار ( عربي )

اوك ! جرب فقط ان تفتح مشروع بالفيجول بيسك وتضيف الاداة على الفورم ! ثم اعمل تشغيل للمشروع ! هل هناك رسالة خطأ!

ماشاء الله ابو الاء ! كتب الله اجرك ! هنا اقول ان الاستاذة زهرة لها من اسمها نصيب !! بل زهرة لن تموت او تذبل .. تضل تستسقي من هذه الاعمال الخالدة والتي لم تاتي من فراغ بل من تضحيات واجلها وقتها الثمين !! وهنا والله اخي ابو الاء كنت اتمنى انني دخلت المنتديات في عهد هؤلاء العمالقة خاصة عند التصفح هنا وفي المنتديات الشقيقة واتوقع ان زمنه من 2002 وحتى 2012 ولكن للاسف انني قريب عهد بالمنتديات حتى وان سجلت قديما حيث لم اتفرغ من الوظائف الا قريبا مع العلم انني اعمل على الاكسس منذ سنة 2000 تقريبا !! تحياتي

هذه احد المشاركات هنا http://www.officena.net/ib/index.php?showtopic=41272&page=1 وهنا http://www.officena.net/ib/index.php?showtopic=58275 كما يمكنك البحث قد يكون هناك مشاركات اخرى بالتوفيق

اخي حربي لا اخفيك انني مشغول جدا هذه الايام ! ولكن ساحاول قدر المستطاع ! هناك اصدار جديد من الاداة محدث ! ولكن الان اريد اعرف كيف حصلت على الاداة عندك !! هل لديك الفيجول بيسك 6 نازل على الجهاز ! ام انك نزلت الاداة وسجلتها بنفسك ! بالتوفيق

لحظة اخي اتوقع يقوم الكود بتعديل الحقل اذا كان فارغا بقيمة الحقل للسجل السابق واذا كنت تريد اختصار الكود لك !! فيمكن وعند الجلوس عالكمبيوتر بالتوفيق

اهلا بك اولا يقوم الكود بفتح جدول او استعلام ثم يلف على جميع السجلات فاحصا الحقل الرابع اذا كان فارغا من نوع null يقوم بتعديله الى قيمة sx1 ولكن لاحظ ان هذا المتغير ليس به قيمة . فياهل ترى المراد من الكود هو تعديل القيم من null الى طول صفري ام ان هناك نقص في الكود . والسطر المقصود هو الذي يفحص ان الحقل الرابع خاليا بقيمة null بالتوفيق واعتذر حيث اكتب من الموبايل

اسأل الله الكريم رب العرش العضيم ان يشفيك وان يجعل ما اتاك ثوابا وغفرانا !!

مشكور ابو الآء وجزيت خيراً !! عمل جميل جدأ!! وماشاء الله عليك باحتفاظها لديك ! وعلى كذا اي شي نتذكره من اعمال المنتدى الشقيق سنطلبه منك !! بالتوفيق .. ولك اجمل تحية

اهلا بك اخي حربي احنا حنمشي حبة حبة حتى الحل ان شاء الله ؟ اولا : هل الاداة موجودة ؟ وماهو نوع النظام لديك 64 بت او 32 بت ؟ بالتوفيق

اخي حربي اشوف انك تفتح موضوع جديد بهذه المشكلة افضل !! تحياتي

جزاكم الله خير الجزاء اخي حربي !!

اهلا بك ابو ندى الحقيقة انا دخلت لكي اطرح سؤالا بخصوص هذا الموضوع وطبعا قد يكون بعيد عن الجوهر والاجابة : لماذا نقول اول واول مكرر ؟ لماذا لايكونون كلاهما اول مكرر او كلهم اذا اكثر من اثنين ؟ لانه ارى ان اول افضل من اول مكرر فلماذا لا يكونون اول مكرر وثاني مكرر للكل حتى نكون عدلنا بينهم 100% ؟ فعلي اساس سيكون الاول؟؟ مثلا على اساس ترتيبه الابجدي !! وهنا ظلم للاخرين !! ايش ذنبي ان ابوي سماني يزيد !! علما باني اسالك ويوجد هذا النظم بدولتي ؟ فهل ياترى هناك سبب مقنع ؟؟ والسؤال لمن يملك الاجابة من الاخوة الاعضاء! واحيطك علما اخي ابو ندى ان هذا السؤال تمت الاجابة عليه من عدة منتديات شقيقة واعضاء مميزين واتوقع هنا كذلك ؟؟ طبعا ولا اخفيك انني غير مقتنع بطرق تلك الاجابات !! تحياتي

والله يا استاذ جعفر حكاية ان التري فيو تقبل الاتجاه من اليمين لليسار اي الاتجاه عربي فحكاية جديدة من حكاياتك الجميلة القيمة ! فارفع يدي لهذا الموضوع ان يثبت وخاصة موضوع اتجاه التري فيو من اليمين لليسار ! كما ان لي وجهة نظر في الموضوع وهي : مسألة تعبئة التري فيو والتعامل معها فكل مبرمج وطريقته الخاصة بل خوارزميته وفكرته لتعبئتها والتعامل معها وتختلف من شخص لاخر ! وبذلك فاني احتاج ان افهم المطلوب ثم بنية القاعدة لكي انفذ الخوارزمية! وهذا ماجعلني بعيد عن الموضوع نوعا ما وهنا معتذرا لاخي محمد سلامة ! خالص تحياتي

ول ول ول ، هالكثر الموضوع معقد رحم الله والديك أخوي رمهان ، رفعت الرايه عنا كلنا جعفر هناك افكار اخرى اخي جعفر !! ولكنني اخترت هذه الفكرة لان كلها فقط استعلام تجميعي ثم الربط بينهم !! وهي مفهومة للغالب ! فيبدو انني نفذت الاصعب ! هناك فكرة ثلاث استعلامات متداخلة sub queries !! وهناك اكثر من فكرة خوارزمية بالكود ! وجودكم ومشاركتم فيها الخير والبركة ! تحياتي

الخير فيك اخوي جعفر والله انا جاوبت على قد السؤال !! فاحيانا الاخ السائل يطرح سؤالا بمثابة مفتاح حل لعمل اخر لديه ! وكما ذكرت الحل جاهز ولم ارى فكرتكم الا عند محاولة رفع الحل ! والميدان لك اخي جعفر ! بالتوفيق

بعد اذن الاستاذ جعفر ! والله جهزت الحل قبل اشوف ردكم !! ولكم اجمل تحية ضع 600000 عند خاصية الفاصل الزمني للنموذج وهذا الكود عند الحدث عند عداد الوقت للنموذج مع ملاحظة انه تم اضافة عند الوصول لاخر سجل يعود مرة اخرى لاول سجل Private Sub Form_Timer() If CurrentRecord = Me.RecordsetClone.RecordCount Then DoCmd.GoToRecord , , acFirst: Exit Sub DoCmd.GoToRecord , , acNext End Sub بالتوفيق

حياكم الله !! واذكرك فقط باختيار افضل اجابة !! تحياتي

ضع هذا التعبير في اي مكان قابل للحساب ( عمود استعلام - مصدر عنصر التحكم مربع نص في النموذج او التقرير وطبعا مسبوقا بعلامة = ) ([tot]-DLookUp("[tot]";"t1";"yearr=" & [yearr]-1))/DLookUp("[tot]";"t1";"yearr=" & [yearr]-1) بالتوفيق

جزاكم الله خير الجزاء على دعوتك وكرم اخلاقك.. هل تمت التجربة بنجاح .؟! طبعا لابد ان يكون جهاز الوزن موصولا بالكمبيوتر وفي حالة تشغيل! بالتوفيق

هذه الاكواد خلف كل زر وحسب اسمه وعند الحدث عند النقر Private Sub أمر43_Click() Qty_Total = text1 Date_To = Now() End Sub Private Sub أمر44_Click() Qty_Spece = text1 Date_Sp = Now() End Sub بالتوفيق

تفضل New.rar

عزيزي علي فتحي وبعد اذن الاستاذ جعفر على المداخلة محاولة لحفظ جزء من وقته ! وكذلك اخي راعي الغنم استأذنه ولعل له به فائدة ! اعمل استعلام ومصدره الجملة التالية واحفظه باسم qr1 : SELECT Record_OLD.[رقم تعريفي], Record_OLD.الاسم, Max(Record_OLD.فرعي) AS Maxمنفرعي, Max((IIf([رصيد 1]<0,0,[رصيد 1])+IIf([رصيد 2]<0,0,[رصيد 2]))/2) AS expr1 FROM Record_OLD GROUP BY Record_OLD.[رقم تعريفي], Record_OLD.الاسم; واستعلام ثاني ومصدره الجملة التالية واحفظه باسم qr2 : SELECT Record_OLD.[رقم تعريفي], Record_OLD.الاسم, Record_OLD.فرعي, Record_OLD.[رصيد 1], Record_OLD.[رصيد 2], (IIf([رصيد 1]<0,0,[رصيد 1])+IIf([رصيد 2]<0,0,[رصيد 2]))/2 AS المتوسط FROM Record_OLD; واستعلام ثالث واحفظه باسم qr3 حيث هو المطلوب : SELECT [qr2].[رقم تعريفي], [qr2].الاسم, [qr2].فرعي, [qr2].[رصيد 1], [qr2].[رصيد 2], qr2.[المتوسط] FROM qr2 INNER JOIN qr1 ON (qr2.[المتوسط]=qr1.expr1) AND ([qr2].فرعي=[qr1].Maxمنفرعي) AND ([qr2].الاسم=[qr1].الاسم) AND ([qr2].[رقم تعريفي]=[qr1].[رقم تعريفي]); هذا متمنيا ان يكون المطلوب !! تحياتي

اخي راعي الغنم جرب ان تعمل انتر اكثر من مرة بعد ادخال السجل الأول !! ستجده فتح لك سجلا فارغا جديدا وهذا أساس المشكلة لدى السائل !! تحياتي

حياك الله اخي الكريم اولا ثانيا : ذكرت في العنوان مساعدة في برنامج معمول بالاكسس !! فاين هو البرنامج !! فحبذا ارفاق الملف للقيام بالتعديل عليه ! وان كان الطلب برنامجا كاملا فاتوقع ان يكون الموضوع تحت فئة طلبات الأعضاء !! بالتوفيق