السلام عليكم
اخي الكريم ابو سلطان
اكمل اخي الكريم , متابعين معاك ان شاء الله
السلام عليكم
اخي الكريم ابو سلطان
اكمل اخي الكريم , متابعين معاك ان شاء الله
اقتباسطيب لو كان مافيش حد معاية مش هاتكمل يا باشا ؟؟؟؟؟؟؟؟؟؟؟؟؟
لا مش قصدي هكمل برضه لكن للعلم بالشئ فقط
الأخ العزيز ابو سلطان
ماشاء الله عليك وعل مجهودك الرائع في هذا المنتدي.... انت شعلة نشاط وياريت كلنا نبقى زيك .. احنا كلنا متابعين كل مشاركاتك ومنتداك الرائع وقريبا سيكون تواصلي معك في برنامج المخازن بس لما أخلص السنة المالية والحسابات اللى انشغلت فيها وربنا يسهل .. وجزاك الله كل خير على مشاركاتك
اقتباسالأخ العزيز ابو سلطانماشاء الله عليك وعل مجهودك الرائع في هذا المنتدي.... انت شعلة نشاط وياريت كلنا نبقى زيك .. احنا كلنا متابعين كل مشاركاتك ومنتداك الرائع وقريبا سيكون تواصلي معك في برنامج المخازن بس لما أخلص السنة المالية والحسابات اللى انشغلت فيها وربنا يسهل .. وجزاك الله كل خير على مشاركاتك
اهلا بك عزيزي الامام
نتمنى لك التوفيق في انجاز اعمالك ونتمنى عودتك للكتابة هنا
شكرا لك يا صديقي
السلام عليكم
استاذي الفاضل ابو سلطان انا في انتظار المرحلة التالية من المشروع لاني متحمس جدا لاكماله للاخر . اتمني ان حضرتك تكلمه للاخر
شكرا لاهتمامك عزيزي beshay
انا منتظر بقية الزملاء حتى ينجزوا البرنامج على راحتهم واذا كان هناك اي سؤال عن اي شئ غير مفهوم ، اليوم مساء راح تكون المرحلة الرابعة جاهزة إن شاء الله
............
اعزائي الكرام يرجى التنويه بان عمل هذا البرنامج هو الطريق المؤدي الى الاحتراف في الفيجيوال فوكس برو لذلك ارجو الاهتمام .
وشكرا
ممكن توضح الفروق اللي بين الاسماء دي
primary
regular
binary
condidate
وعلي اساس احنا بنختار اي وحدة فيهم
وشكرا
سؤال جميل
هذه لتحديد عملية index في الجدول table
اولا : primary هو زي cadidate لكن الفرق هو ان الاول يحدد مرة واحد في الجدول بينما الثاني لا
والهدف منهم ان قيمة الحقل لا تتكرر
ثانيا : regural هذا مشاع او عادي
ثالثا : binary يعمل index حسب الـ valid (مش لاقيلها ترجمة بالعربي) ممكن نقول المقبولة او العبارات الغير منطقية
عموما انظر الى الصورة التالية راح تفهم القصد
للمزيد
http://msdn2.microsoft.com/en-us/library/f...shy(VS.80).aspx
استاذي الفاضل
تم الانتهاء من المرحلة الرابعة ولكن بعد اذنك طبعا ضفت شيء بسيط هو
1 - عدت ترتيب الازرار بحيث بعد الانتهاء من كتابة السجل ينتقل الي زر الحفظ ومن بعده اضافة جديدة
2 - جعلت زر الاضافة غير فعال بمجرد الضغط عليه وبعد عملية الحفظ او الالغاء يعود الي وضعه الطبيعي
لو حضرتك طالب الالتزام بالخطوات يبقي انا متأسف
وفي وانتظار المرحلة التالية ...
مش لازم تطبق الخطوات بالضبط ، خذ راحتك بالشكل اللي يريحك.
اهم شئ فهم الفكرة البرمجية
السلام عليكم
استاذي الفاضل انا شغوف للمرحلة التالية . هل من جديد اليوم ؟
معالش يا استاذي الفاضل ممكن حضرتك تشرح معني الكود ده
thisform.txtItem_no.SetFocus
وما فائدة كلمة
SetFocus
تم تعديل هذه المشاركة بواسطة beshay في 11 مارس 2008 في 10:21
عزيزي هذا الامر اقصد به عندما اعمل كلك على Add New ضع المؤشر في التكست txtitem_no عشان تكتب بس ولا انت مش ناوي نكتب بيانات ؟؟ :D
جرب الحالتين وستلاحظ الفرق
يعني انا بريحك بدال ما تعمل كليكين تعمل كلك واحد بس
ماشاء الله
دي جديدة لانج بالنسبة لي
يا ريت لو حضرتك تعمل ملف تشرح فيه بعض الاوامر اللي زي كده
يعطيك الف عافية وجعله الله في ميزان حسناتك
ما هو من خلال الشروع التدريبي ده هتمر عليك حاجات جديدة طول بالك يا عزيزي هتعرف كل حاجة .
انا عندي طلب بالمناسبة انا دايخ على برنامج لفك ملفات rar اي حد عندة وسيلة يا ريت يزودني بها ده لمصلحتكم طبعا.
اي برنامج حضرتك محتاجه بلغني وانا إن شاء الله هاجيبه لك
يا باشا كلمة شكر ليك شوية
بجد ربنا يكرمك علي مجهوداتك العظيمة اللي بتقدمها في هذا المنتدي والمنتديات الاخري
:clapping:
:clapping: :clapping:
:clapping: :clapping: :clapping:
:clapping: :clapping: :clapping: :clapping:
:clapping: :clapping: :clapping: :clapping: :clapping:
:clapping: :clapping: :clapping: :clapping: :clapping: :clapping:
تم تعديل هذه المشاركة بواسطة beshay في 11 مارس 2008 في 12:07
:hmm:
اعزائي الكرام بما ان المرحلة الخامسة طويلة نوعا ما ، انا قررت ارفاق البرنامج .
لذلك ارجو من الاخوة المتابعين قراءة الاكواد وبعد ذلك تسجل النقاط الغير مفهمومة (يرجى العلم بان اغلبها مشروح من قبل)
يرجى العلم انه باقي مرحلة واحدة فقط (السادسة) وبعد ذلك يكون المشروع مكتمل
قبل ارفاق البرنامج يرجى العلم بانني غيرت تغير بسيط في قاعدة البيانات والنهائي يصبح كالاتي
شكل البرنامج بالنهاية سيكون كالاتي
وشكرا لكم
السلام عليكم
استاذي الفاضل / ابو سلطان
انا انتهيت من المرحلة الخامسة وكانت فيها معلومات كتيرة جديدة واستفدت منها كتير بس لي بعض الاستفسارات عن اكواد او كليمات ظهرت جديدة في المرحلة دي عاوز اعرف وظائفها ايه
MAINQTY = THISFORM.text3.VALUE
MOVEQTY = THISFORM.text5.VALUE
VITEME_NO = VAL(THISFORM.text1.VALUE)
IF THISFORM.optiongroup1.Value=1
INSERT INTO MOVETBL (ITEM_NO,PLACE_NAME,IN_OUT,QTY,MOVE_DATETIME,DONEBY) VALUES ;
(VAL(THISFORM.text1.Value),;
THISFORM.text4.Value,;
"I",;
THISFORM.text5.Value,;
DATETIME(),;
THISFORM.text6.Value)
UPDATE MATERIALTBL SET MATERIALTBL.QTY = MAINQTY + MOVEQTY;
WHERE MATERIALTBL .ITEM_NO = VITEMe_NO
THISFORM.text3.Value= MAINQTY + MOVEQTY
ENDIF
IF THISFORM.OPtiongroup1.Value=2
IF MOVEQTY <= MAINQTY
INSERT INTO MOVETBL (ITEM_NO,PLACE_NAME,IN_OUT,QTY,MOVE_DATETIME,DONEBY) VALUES ;
(VAL(THISFORM.text1.Value),;
THISFORM.text4.Value,;
"O",;
THISFORM.text5.Value,;
DATETIME(),;
THISFORM.text6.Value)
UPDATE MATERIALTBL SET MATERIALTBL.QTY = MAINQTY - MOVEQTY;
WHERE MATERIALTBL .ITEM_NO = VITEMe_NO
THISFORM.text3.Value= MAINQTY - MOVEQTY
ELSE MESSAGEBOX ("IT'S OVER")
ENDIF
ENDIF
THISFORM.command2.Enabled= .F.
THISFORM.text4.Enabled= .F.
THISFORM.text5.Enabled= .F.
THISFORM.text6.Enabled= .F.
THISFORM.optiongroup1.Enabled= .F.
THISFORM.text1.Value=""
THISFORM.text2.Value=""
THISFORM.text3.Value=0
thisform.Refresh
وشكرا لتعبك معاية يا استاذي الفاضل
المتواجدون خلال آخر دقيقتين · يتحدّث كل ٣٠ ثانية
جارٍ التحقق من المتواجدين…