عز الدين احمد

اكتب الكود التالي Text1 = "0" Dim tot Data2.Recordset.MoveFirst Do Until Data2.Recordset.EOF = True tot = Val(Data2.Recordset![total_cost]) Text1 = Val(tot) + Val(Text1) Data2.Recordset.MoveNext Loop

اخي الحبيب اريد التوضيح اكثر من ذلك واين اضع هذا الكود

شكرا جزيلاا وبارك الله فيك والمثال واضح وكن انا عندى عدد 6 سجلات مخزنين في الداتا بيز وعند كتابة الكود وعند الدخول علي الشاشة كام الرقم في التكست 14 المفروض يديني الرقم 7 وبعد ذلك اكمل علي هذا الرقم ارجوا ان يتسع صدرك لهذة الاسئلة وشكرا

شكرا علي الكود ولكنه مش شغال وارجوا شرح للكود وشكرا

اناعاوز في حالة الفورم لود يكون التكست محتوى علي اخر رقم تم تسجيله وكتبت الكود بالطريقة الاتية text1.text=val(text1.text) وعند اللود للفورم يكون قيمة التكست صفر ثم اضيف عليه ثم اخرج وادخل مرة اخرى يرجع تاني قيمة التكست صفر وعند اضافة اكثر من مرة بيعمل ايرور وش…

السلام عليكم انا عندي تكست بوكس وكماند بوتن وعاوز لما اضغط علي الكماند بوتن يعطي رقم مسلسل في التكست بوكس يعني التكست بوكس يكون عداد عن طريق الضغط علي الكوماند علي سبيل المثال لو التكست ظاهر فيه رقم 100 مثلا عن الضغط علي الكوماند بوتن عاوزه يكون 101 وهكذ1

اريد معرفة تجميع عمود الاجمالي في اداة التقرير الذكية

جزاك الله كل خير اخي عاصم شاهين وجعلها الله في ميزان حسناتك

رابط اداة التقارير الذكية مش شغال منين احصل علي نسخة من هذة الاداة ومن كان عنده نسخة ياريت يرسها لي اويضعها في المنتدى وايلي هو ahmed_m_samir@islamway.net

بارك الله فيك ورزقك الفردوس الاعلي من الجنة وارجو ان تدوم هذة الصداقة ان شاء الله عز وجل

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

طيب اخي الكريم الكود الثاني ما زال يحتفظ بقيمة المجموع ماذا افعل

قمت بتنصيب اوراكل داتا بيز 9i وبعد التنصيب واعادة تشغيل الجهاز اصبح الجهاز بطي جدا لدرجة ان ايقونات سطح المكتب بدات في الظهور بعد حوالي ربع ساعة من تشغيل الجهاز وبعد ذلك ظهرت رسالة ايرور الخاصة بالويندوز علما بان مكونات الجهاز كالاتي 1- جهاز AMD 2- برسوسور 200…

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

الاخ hnhnجزاك الله كل خير علي هذا المجهود وانا حقيقي عاجز عن الشكر ولكن هناك استفسار وارجو ان يتسع صدرك لهذة الاسئلة ما المقصود بكلمة asالمجموع في الكود الاول حيث انه مش شغال الكود الثاني شكال كويس جدا ولكن هناك مشكلة انه بيحتفظ بقيمة المجموع بمعني انني عملت ب…

المثال مرفق والمشكلة في الفورم الرابع حيث اريد تجميع عمود الاجمالي في الاداة واظهار المجموع في التكست بوكس halmy.rar

اخي hnhnجملة sql مش شغالة وعاوز اعرف شرحها Set rs1 = New ADODB.Recordset rs1.Open SQLstmt, cn, adOpenStatic, adLockOptimistic, adCmdText عاوز اعرف احط السطرين دول فين في البرنامج Set DataGrid1.DataSource = rs1 وكذلك الجملة دي اين اضعها

يا اخي الحبيب بارك الله فيك وجزاك الله كل خير ولكن هذا الكود يقوم بجمع عدد الفلدات في الداتا جريد ولكن ان اريد تجميع القيمة التي داخل الفلد بمعني بسيط اجمالي الفلد الاول 200 جنيه اجمالي الفلد الثاني 300 جنيه اجمالي الفلد الثالث 500 جنيه اجمالي الفلد الرابع 100…

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