اذهب الي المحتوي
أوفيسنا
بحث مخصص من جوجل فى أوفيسنا
Custom Search

تفريغ النموذج بعد أمر الطباعة


almijdi

الردود الموصى بها

السلام عليكم احبتي مشرفي واعضاء منتدى اوفيسنا الكرام 

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

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

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

نموذج قائمة بيع.rar

تم تعديل بواسطه almijdi
رابط هذا التعليق
شارك

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

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

لان خبرتي بالاكسس محدوده مع كل الود والتقدير 

رابط هذا التعليق
شارك

اخي صالح اشكرك الشكر الجزيل 

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

في غاية السعاده شاكرا سعة صدرك وتحملك كثرة اسئلتي 

تم تعديل بواسطه almijdi
رابط هذا التعليق
شارك

الاخ صالح حمادي صباح الخير

لو تكرمت وشرحت لي الكود الذي وضعته الي اين اضعه 

وماذا اضع داخل علامتي التنصيص ومن هو مربع النص الثاني والثالث الرجاء الاجابه 

سواء منتك او من الاخوه اصحاب الخبره في الاكسس شاكرا جهودكم 

رابط هذا التعليق
شارك

مثلا 

‏نفترض أن لديك أربع مربعات نص تريد أن تفرغ القيم منها بعد طباعة التقرير والطريقة كالتالي:

Me.txt1=""

Me.txt2=""

Me.txt3=""

Me.txt4=""

لا تنس أن تضع كود الطابعة قبل في محرر الفيجوال بيسك عند حدث زر الضغط .

وبالتوفيق

تم تعديل بواسطه saleh204
رابط هذا التعليق
شارك

2 ساعات مضت, almijdi said:

لو تكرمت وشرحت لي الكود الذي وضعته الي اين اضعه

معذرة فكثرة الأشغال و الإرتباطات تجعلني أتأخر في الرد في بعض الأحيان

2 ساعات مضت, saleh204 said:

Me.txt1="" 

Me.txt2=""

Me.txt3=""

Me.txt4="" 

لا تنس أن تضع كود الطابعة قبل في محرر الفيجوال بيسك عند حدث زر الضغط . 

نعم أخي صالح أحسنت هذه هي الطريقة.

و هذا هو الكود بأسماء مربعات النص لديك:

Me.Requery
DoCmd.OpenReport "استعلام", acViewPreview
Me.نوع_الماده = ""
Me.سعر_المفرد = ""
Me.الكميه = ""
Me.S = ""
Me.F = ""
Me.اسم_الناقل = ""
Me.اسم_الزبون = ""
Me.Requery

 

نموذج قائمة بيع.rar

رابط هذا التعليق
شارك

اخي الكريم صالح حمادي تحياتي لجنابك الكريم 

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

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

ولذلك اتمنى من جنابك الكريم ان يكون هذا العمل لكل حقول الجدول ولك منى الشكر والتقدير 

رابط هذا التعليق
شارك

Join the conversation

You can post now and register later. If you have an account, sign in now to post with your account.

زائر
اضف رد علي هذا الموضوع....

×   Pasted as rich text.   Paste as plain text instead

  Only 75 emoji are allowed.

×   Your link has been automatically embedded.   Display as a link instead

×   Your previous content has been restored.   Clear editor

×   You cannot paste images directly. Upload or insert images from URL.

  • تصفح هذا الموضوع مؤخراً   0 اعضاء متواجدين الان

    • لايوجد اعضاء مسجلون يتصفحون هذه الصفحه
×
×
  • اضف...

Important Information