حربي العنزي

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

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

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

استاذي الفاضل ابو خليل الله لايحرمنا من شخصك الكريم والطيب سائلا المولى عز وعلا ان يمن عليك وعلى عائلتك الكريمة بالصحة والعافية نعم هذا هو المطلوب بارك الله فيك استاذي الفاضل

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

بارك الله فيك اخي الفاضل ربي يوفقك يارب

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

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

استاذي الفاضل رمهان ربي يحميك من كل شر يارب والله لايحرمنا من شخصك الكريم يارب سائلا الله العلي القدير ان يمن عليك بالصحة والعافية يارب لي طلب صغير هذه المرة اريد ان تضع لي هذا الكود في فورم اكسس لان بصراحة عجزت ولم اعرف كيف اضعه في مشروع اكسس طبعا هذا الكود وجدته في المنتدى للاخذ الفاضل عبدالقادر الله يحميه من كل شر يارب وهذا هو الكود : Comm232Ocx.CommPort = SerialPort If Err Then If Comm232Ocx.CommEvent = comPortInvalid Then dummy = MsgBox("Invalid port, try another port!", vbOKOnly, "Invalid Port") Exit Sub ElseIf Comm232Ocx.CommEvent = comPortAlreadyOpen Then dummy = MsgBox("Port already in use by another device! ", vbOKOnly, "Port Already Open") Exit Sub End If End If Comm232Ocx.Settings = "9600,N,8,1" On Error Resume Next Comm232Ocx.PortOpen = True If Err Then dummy = MsgBox("Invalid port selection!", vbOKOnly, "Invalid Port") Exit Sub End If '''''''''''''''''''''''''''''''''''''''''''''''''' ''''''' Comm232Ocx.InBufferCount = 0 'clear out rs232 input buffer 'send out first command for data aquisition If AdcCal = True Then Tx = "!0RA" + Chr(11) 'read channel 12 for ref -ve Else: Tx = "!0RA" + Chr(0) 'else read channel 0 End If Comm232Ocx.Output = Tx مع شكري وتقديري لك وربي يوفقك في كل شيء يارب

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

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

السلام عليكم لا تنسوني احبتي في الله

شكرا جزيلا لك استاذي الفاضل وربي يحميك من كل شر يارب

بارك الله فيك اخي الفاضل وجزاك الله كل الخير والصحة والعافية

السلام عليكم استاذي الفاضل رمهان ورحمة الله وبركاته نعم الاداة الموجودة والنظام 32 بت بحيث عندما اذهب الى ادراج واختار عناصر اكتف اكس اجدها موجودة بأسم Microsoft Commnuications Control 6.0 ولكن عند اضافتها تخرج لي الرسالة المذكورة في الصورة المرفقة اعلاه مع وافر التحايا

السلام عليكم اساتذتي الافاضل ورحمة الله وبركاته كيف يتم اضافة اداة الاتصال التي هي microsoft Cmmnecations Control 6.0 في وندوز 7 بحيث عند اضافتها تخرج لي هذه الرسالة المرفقة علما ان هذه الاداة تعمل بشكل جيد جدا في وندوز اكس بي مع وافر التحايا

احبتي في الله هل يوجد طريقة لاضافة الاداة Microsoft Commnecation Control 6.0 في وندوز 7 بدون مشاكل الاداة في وندوز اكس بي تعمل بشكل صحيح وجيد لكن فقط في وندوز 7 تخرج الرسالة المذكورة اعلاه في الصورة المرفقة مع وافر التحايا

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

احبتي في الله هذه ملاحظة : علما البرنامج يعمل عبى نظام تشغيل اكس بي بكل جدارة فقط تحدث هذه المشكلة في وندوز 7 مع فائق الشكر والاحترام

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

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

السلام عليكم ورحمة الله وبركاته اخي الفاضل عملت لك استعلام عسى ان يفي بالغرض وربي يحفظك يارب kh-t1.rar

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

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

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