officenamember قام بنشر أغسطس 24, 2003 مشاركة قام بنشر أغسطس 24, 2003 بارك الله بكم الاسئلة :- س1 كيف استطيع طباعة السجل الحالي وهذا السجل موجود في نموذج فرعي؟ المشكلة التي اواجهها يطبع كل السجلات وليس الحالي:( بينما اذا تعاملة مع النموذج كغير فرعي يطبع السجل الحالي س2 كيف اجعل حقل العملة يتعامل مع الكسور دون جبرها او تحويلها الى عدد صحيح ؟ المشكلة عند ادخال 2.8ريال يحولها الى 3ريال :( لا اريد تحويلها شكرا لكم مقدما على مساعدتكم لي والسلام عليكم 1 رابط هذا التعليق شارك More sharing options...
امير عاطف قام بنشر أغسطس 24, 2003 مشاركة قام بنشر أغسطس 24, 2003 (معدل) من قواعد طرح الأسئلة عدم طرح اكثر من سؤال بمشاركة واحدة سوف يتم فصل كل سؤال بمشاركتين مستقلتين بالنسبة لطباعة السجل الذي بالنموذج الفرعي يمكنك عمل ذلك عن طريق وضع هذا الكود بزر الأمر المتواجد بالنموذج الرئيسي Forms!FormName!subformname.SetFocus DoCmd.DoMenuItem acFormBar, acEditMenu, 8, , acMenuVer70 DoCmd.PrintOut acSelection حيث FormName هو اسم النموذج الرئيسي و subformname هو اسم النموذج الفرعي اجابة السؤال الثاني هنــــــــا تم تعديل أغسطس 24, 2003 بواسطه امير عاطف رابط هذا التعليق شارك More sharing options...
officenamember قام بنشر أغسطس 24, 2003 الكاتب مشاركة قام بنشر أغسطس 24, 2003 اخي العزيز امير عاطف بارك الله فيك :d لقد وضعت الكود في المحل الذي حددته لي ولكن تطبع كل السجلات وليس السجل الحالي فقط السجلات في نموذج فرعي وهذا النموذج يمكن فتحه كنموذج رئيسي وعند الفتح والطباعة لامشاكل على الاطلاق لماذا عندما يكون فرعي لايطبع الحالي ويقوم بطباعة جميع السجلات؟؟!!!! ------------------------------------------------- بالنسبة للمنازل العشرية هي بالفعل لدي 2 ولكن لا اعلم لماذا يحول الرقم الى صحيح؟؟؟؟ !!!! الرجاء المساعدة ولكم الشكر الجزيل رابط هذا التعليق شارك More sharing options...
officenamember قام بنشر أغسطس 25, 2003 الكاتب مشاركة قام بنشر أغسطس 25, 2003 اخي العزيز عاطف نأسف على التكرار ولكن لم اجد حل لمشكلتي والكود الذي ارسلته لي مشكور يقوم بالتعامل مع السجل الاول فقط وانا اريد اي سجل مثلا العاشر شكرا لكم رابط هذا التعليق شارك More sharing options...
امير عاطف قام بنشر أغسطس 25, 2003 مشاركة قام بنشر أغسطس 25, 2003 أأسف اخي لأن ليس لدي حالياً طابعة لكي اقوم بالتجربة عليها :) ولكن ان شاء الله هذا الكورد سوف يعمل معك ويقوم بطباعة السجل الذي تريد Dim rec As Long rec = Me.subformname.Form.CurrentRecord Forms!FormName!subformname.SetFocus DoCmd.DoMenuItem acFormBar, acEditMenu, 8, , acMenuVer70 DoCmd.PrintOut acPrintAll, rec, rec رابط هذا التعليق شارك More sharing options...
officenamember قام بنشر أغسطس 25, 2003 الكاتب مشاركة قام بنشر أغسطس 25, 2003 والله يا اخي تعبت وخلص ثوب الورق من الفورم هذا جربت الكود على زر في النموذج الفرعي وايضا على زر في الرئيسي ومافيه نتيجة :cry: رابط هذا التعليق شارك More sharing options...
alhajri قام بنشر أغسطس 25, 2003 مشاركة قام بنشر أغسطس 25, 2003 (معدل) السلام عليكم ضع المثال في موقع مجاني وضع وصله له هنا لكي يتم تحميله لحل المشكله انشاء الله تم تعديل أغسطس 25, 2003 بواسطه alhajri رابط هذا التعليق شارك More sharing options...
امير عاطف قام بنشر أغسطس 25, 2003 مشاركة قام بنشر أغسطس 25, 2003 قمت باحضار طابعة وتجربة هذا الكود ونجحت والحمد لله :lol: DoCmd.OpenForm "subformname" DoCmd.GoToRecord , , acGoTo, Me.subformname.Form.CurrentRecord DoCmd.DoMenuItem acFormBar, acEditMenu, 8, , acMenuVer70 DoCmd.PrintOut acSelection SendKeys ("^{f4}") قم بوضع الكود السابق عند حدث النقر لزر امر موجود على النموذج الرئيسي لا تنسى ان النموذج الرئيسي مسمى "formname" النموذج الفرعي مسمى "subformname" 1 رابط هذا التعليق شارك More sharing options...
officenamember قام بنشر أغسطس 26, 2003 الكاتب مشاركة قام بنشر أغسطس 26, 2003 :) :) :) بارك الله بك وادخلك فسيح جناته نعم هو المطلوب والف تحيه والف ورده شكرا جزيلا والسلام عليكم رابط هذا التعليق شارك More sharing options...
officenamember قام بنشر أغسطس 26, 2003 الكاتب مشاركة قام بنشر أغسطس 26, 2003 :cry: الله المستعان طلعت مشكلة بسيطة بعون الله المشكلة ان الامر يطبع سجل واحد فقط ولكن هذا السجل حسب الترتيب العام للسجلات الخاصة بهذا النموذج وانا عندي (مربع تحرير وسرد) بناء على الختيار منه تظهر السجلات المتعلقه بهذا الاختيار من بين مجموعة سجلات فمثلا السجل الاول لقيمة في مربع تحرير وسرد لايكون السجل الاول في الترتيب العام للسجلات المشكلة ان الامر يأخذ بالترتيب العام للسجلات وليس الترتيب الخاص بالقيمة التي في مربع التحرير والسرد والله يا اخ امير تعبتك معي :SHY: شكرا اولا واخيرا والسلام عليكم رابط هذا التعليق شارك More sharing options...
امير عاطف قام بنشر أغسطس 26, 2003 مشاركة قام بنشر أغسطس 26, 2003 (معدل) عفواً اخي .. لم افهم ما تريد الكود السابق يقوم بطباعة السجل اللي انت واقف عليه (السجل الحالي) في النموذج الفرعي . وحتى لو قمت بالذهاب للسجل الذي تريد من خلال الكومبو بوكس (مربع التحرير والسرد) وبعد ذلك قمت بالضغط على زر طباعة السجل الحالي بالنموذج الفرعي سوف يقوم بطباعة السجل اللي انت عنده في النموذج الفرعي ام انك تريد الطباعة ليس بناءاً على السجل الحالي بالنموذج الفرعي وانما بناءاً على السجل الموجود في مربع التحرير والسرد بغض النظر عن السجل الموجود في النموذج الفرعي؟؟؟؟ ممكن توضح بشكل تفصيلي اخر ؟ تم تعديل أغسطس 26, 2003 بواسطه امير عاطف رابط هذا التعليق شارك More sharing options...
officenamember قام بنشر أغسطس 26, 2003 الكاتب مشاركة قام بنشر أغسطس 26, 2003 استاذي العزيز امير عاطف انا اشرحلك الوضع عندي نموذج رئيسي وبه نموذج فرعي والنموذج الفرعي هذا يحتوي على سجلات كثيرة اذا عرضت بدون تصنيف . ويوجد في النموذج الرئيسي كومبو بوكس (مربع التحرير والسرد) بغرض عرض السجلات المطلوبه فقط وبناء على قيمة الكمبوبوكس هذه تخرج السجلات المرتبطة في النموذج الفرعي احيان 3 واحيان 6 وهكذا حسب الاختيار من الكمبوبكس المشكلة ان الكود يطبع السجل الاول او الثاني حسب الرغبه ولكن هذه السجلات حسب تسلسلها في النموذج بدون تصنيف اي يطبع السجلات وكأنني اتعامل مع هذا النموذج كرئيسي وليس فرعي به كمبوبكس المحتويات :- 1-نموذج رئيسي 2-نموذج فرعي لعرض السجلات 3-كمبوبكس لعرض السجلات المطلوبه وليس جميع السجلات ارجو ان تكون الفكرة واضحة وشكرا شكرا جزيلا والسلام عليكم رابط هذا التعليق شارك More sharing options...
امير عاطف قام بنشر أغسطس 26, 2003 مشاركة قام بنشر أغسطس 26, 2003 DoCmd.OpenForm "subformname" Forms("SubFormName").FilterOn = True Forms("SubFormName").Filter = "FieldNameInSubform = forms!FormName!ComboNameInMainform " DoCmd.GoToRecord , , acGoTo, Me.subformname.Form.CurrentRecord DoCmd.DoMenuItem acFormBar, acEditMenu, 8, , acMenuVer70 DoCmd.PrintOut acSelection SendKeys ("^{f4}") حيث: FieldNameInSubform هو اسم الحقل الموجود في النموذج الفرعي وقمت بربطة مع الكومبو بوكس في النموذج الرئيسي ComboNameInMainform هو اسم الكومبو بوكس الموجود بالنموذج الرئيسي رابط هذا التعليق شارك More sharing options...
officenamember قام بنشر أغسطس 27, 2003 الكاتب مشاركة قام بنشر أغسطس 27, 2003 بسم الله الرحمن الرحيم اخي الاستاذ امير جربت الكود الذي ارسلته لي مشكورا وبعد عمل التعديلات ليتناسب معي خرجت لي رسالة تقول ادخله قيمة معلمة ويريد فيها قيمة لحقل الربط وبعد ان ادخل له قيمة يقوم بطباعة صفحة فارغة ولا اعلم السبب :eek: شكرا جزيلا بداءت افقد اي امل في نجاح مهمتي هذه والسلام عليكم رابط هذا التعليق شارك More sharing options...
officenamember قام بنشر أغسطس 27, 2003 الكاتب مشاركة قام بنشر أغسطس 27, 2003 اخواني الكرام الاستاذ عاطف السلام عليكم هل تستطيع ارفاق ملف بعد التجربة عليه بنفس المواصفات التي ذكرت في رد سابق؟ هل يوجد طريقة اخرى لعرض السجلات بدلا من الكمبوبكس هذا الذي يحتاج وضع نموذج فرعي (النموذج الفرعي هو سبب المشاكل) (اي التعامل مع النموذج كرئيسي مع الفلترة للحقول المطلوبة ) اكيد في عالم البرمجة يوجد بس كيف شكرا لكم رابط هذا التعليق شارك More sharing options...
امير عاطف قام بنشر أغسطس 27, 2003 مشاركة قام بنشر أغسطس 27, 2003 تظهر رسالة القيمة المعلمة لأنك لم تأخذ في الاعتبار اسماء الحقول .... اي انك قمت بالخلط بين اسماء الحقول بالجداول واسماء مربعات النص المبنية على تلك الحقول بالنماذج ها هو المثال لترى بنفسك print_subform.zip رابط هذا التعليق شارك More sharing options...
officenamember قام بنشر أغسطس 28, 2003 الكاتب مشاركة قام بنشر أغسطس 28, 2003 بسم الله الرحمن الرحيم السلام عليكم بعون الله يوم السبت سوف اقارن بين الملف المرفق والملف الموجود لدي لكشف الفرق على جهازين ادامكم الله ذخرا لصالح الاسلام والمسلمين والسلام عليكم :) رابط هذا التعليق شارك More sharing options...
officenamember قام بنشر أغسطس 30, 2003 الكاتب مشاركة قام بنشر أغسطس 30, 2003 بسم الله الرحمن الرحيم وجدت المشكلة في الكمبوبكس لدي غير منظم وعند تحديد حقل له جميع الاحداث في البرنامج تنهار لانها قائمة عليه هل من طريقة بحيث يبقى الكمبوبكس كما كان غير منظم شكرا لكم والسلام عليكم رابط هذا التعليق شارك More sharing options...
الردود الموصى بها
Join the conversation
You can post now and register later. If you have an account, sign in now to post with your account.