baran قام بنشر يونيو 21, 2005 قام بنشر يونيو 21, 2005 خي rudwan راسلت المنتدى منذ فترة كيف لي بمعاينة سجل واحد فقط لطباعته حيث كلما أردت طباعة تقرير في أكسس يطبع لي جميع السجلات مفرزة حسب تاريخ ادخالها طباعة سجل بعد انشاء تقرير خاص بكل سجل هذا السؤال قد ارسلته إلى المنتدى فيما سبق وقد جاوب عليه الأخ أبو هادي ولكن بشكل مختصر وجواب غامض أرجو ممن يعرف الجواب أن يجاوبني وجزى الله المجيب خيراً وكان ردك : طيب أعطنا ملاحظاتك على ملف أبو هادي اذا كان فيه أمور غير واضحه لديك أو اطلع على هذا الموضوع طباعة سجل من على النموذج الفرعي ففيه شرح مفصل للأستاذ أمير عاطف أو أرفق لنا مثالا على مشكلتك بالتفصيل اذا كانت مشكلتك مختلفه عن المثالين السابقين تحياتي و الآن أرسل لك مثالاً عبر القسم المؤقت أرجو أن تصلك ولو كان لدي بريدك لراسلتك عليه
عبدالمانع قام بنشر يونيو 22, 2005 قام بنشر يونيو 22, 2005 السلام عليكم ورحمه الله وبركاته ،،، أخي الكريم / baran تضع الكود التالي عند النقر في الزر الامر المراد معاينه الطباعة ، كما يراد منك إضافه ترقيم تلقائي وإضافتة الى الجدول ثم تضيفه الى النموذج لكي تتم المعاينة بالشكل المطلوب والحقيقة ان فية عده طرق لكن هذة ابسط طريقه ،،، الكود بالشكل هذا : DoCmd.OpenReport "اسم التقرير", acViewPreview, , "CSN= " & CSN الطريقة : - أسم التقرير الذي لديك = اسم التقرير - اسم حقل الترقيم التلقائي في النموذج = CSN - اسم حقل الترقيم التلقائي في التقرير = CSN أتمنى ان تكون الطريقه مناسبك لك ،،، مع تحياتي للجميع ،،، عبدالمانع
baran قام بنشر يونيو 24, 2005 الكاتب قام بنشر يونيو 24, 2005 ألأخ عبدالمانع كل الشكر لك مقدماً علماً أني لم أجرب الكود بعد وجزاك الله عن الاجابة كل الخير
baran قام بنشر يونيو 24, 2005 الكاتب قام بنشر يونيو 24, 2005 أخي الكريم عبدالمانع السلام عليكم ورحمة الله بعد أن جربت الكود حاولت أن أحدد للبرنامج حجم الورقة لأن الورقة A4 كبيرة للبرنامج الذي استعمله فهل لك أن تزودني بحل آخر وهل هناك امكانية للطباعة مباشرة من خلال زر دون معاينته
rudwan قام بنشر يونيو 24, 2005 قام بنشر يونيو 24, 2005 السلام عليكم شكرا أخ عبد المانع للاجابه , حيث تأخرت في الدخول للمنتدى . للطباعه مباشرة ضع acViewNormal بدلا من acViewPreview تحياتي للجميع
عبدالمانع قام بنشر يونيو 24, 2005 قام بنشر يونيو 24, 2005 وعليكم السلام ورحمه الله وبركاته ،،، أهلا بك أخي الكريم / baran وبالتوفيق إن شاء الله ،،، أما الاستاذ / رضوان بارك الله فيك على مجهواتك القيمه في المنتدى وأسال الله التوفيق لنا ولكم ،،، مع التحية ،،، عبدالمانع
baran قام بنشر يونيو 25, 2005 الكاتب قام بنشر يونيو 25, 2005 أخواني الأعزاء هل أقول ألف شكر لكم أم أقول ماذا فلا أستطيع أن أقول أي شيء سوى أن أقول وفقكم الله وأدخلكم الجنة من أوسع أبوابها وأسكنكم فسيح جنانه وسؤالي كيف لي أن أحدد حجم الورقة جزاكم الله خيراً
الدكتور خضر الرجبي قام بنشر يونيو 25, 2005 قام بنشر يونيو 25, 2005 السلام عليكم أخي باران ، بارك الله فيك لتخصيص حجم الصفحة المراد طباعته لا بد من استخدام الحلول البرمجية ، والأمر ليس بالبساطة التي قد يتصورها البعض . إن كنت من محبي الحلول البرمجية وبإمكانك التفاعل معها أرجو اعلامي حتى ابدأ درس جديد في هذا الخصوص ولكن ليس هنا بل في موضوع الدروس لأن الموضوع معقد جدا وطويل جدا. علما أن طريقة المعالجة في أكسيس 2000 تختلف تماما عن أكسيس 2002 فأعلى وشرحي سيكون عن الأخير. تستحق الشكر على طرح مثل هذا الموضوع. مع الاحترام والتقدير
baran قام بنشر يونيو 26, 2005 الكاتب قام بنشر يونيو 26, 2005 (معدل) الأخ خضر إذا كنت استحق الشكر فماذا تستحق أنت : أخي العزيز أريد وضع حجم صفحة ثابتة ثم أقفل البرنامج فلا أحد يغير ابعاد الصفحة ربما قد فكرت بالحلول البرمجية أنت وفهمتني أني أريد تقارير صغيرة وأخرى كبيرة فلا أريد ذلك لأن ذلك متعب حقاً وإذا كان لا بد فأنا بانتظار ردك حول هذا الموضوع الذي تعبت منه نوعاً ما كل الشكر لك بالنسبة للحلول البرمجية فأعشقها كل العشق و أني أجيد لغة البرمجة(Visual Basic 6.0) إلا أني لا أجيد استخدام الكريستال ريبورت لذا وهذا ما أعتقده أنه نقطة الضعف لدي مع التحية وأنا بانتظار مثال مبسط حول هذا الموضوع ولا أخفيك كنت معتقداَ أن كل ما في الأمر أننا علينا تحديد حجم التقرير في وضعية التصميم وتكون الطباعة مناسبة حينها كما نشاء تم تعديل يونيو 26, 2005 بواسطه baran
الدكتور خضر الرجبي قام بنشر يونيو 28, 2005 قام بنشر يونيو 28, 2005 السلام عليكم أخي باران ، لئلا أضوع وقتك ، وتنتظرني وهأنت تقول أنك تعشق البرمجة وعندك الخبرة في VBA ، فأحولك للموضوع مباشرة ، لأنني بصراحة أحتاج على الأقل لأسبوع أو أكثر لحل هذه المشكلة ، إذا لم تتصول لنتيجة انتظرني . هنا الموضوع الجميل مع الاحترام والتقدير
baran قام بنشر يوليو 1, 2005 الكاتب قام بنشر يوليو 1, 2005 أخي العزيز قلت لدي الخبرة بالفيجوال بيسك(VB6) وليس فيجوال بيسك فورابيليكاشن VBA وأنت تعلم أنها تختلف بعض الشيء وبالاضافة إلى هذا فأنا ضعيف الخبرة بأمور الطباعة في الفيجوال فلا تؤاخذني على تكرار سؤالي وأنا بانتظارك جزاك الله خيراً
الدكتور خضر الرجبي قام بنشر يوليو 1, 2005 قام بنشر يوليو 1, 2005 حياك الله ، إن شاء، الله ييسر الأمور
baran قام بنشر يوليو 5, 2005 الكاتب قام بنشر يوليو 5, 2005 أنا بانتظار حل يفي بالغرض وهذا فقط تذكير مني لأعضاء المنتدى
الدكتور خضر الرجبي قام بنشر يوليو 7, 2005 قام بنشر يوليو 7, 2005 السلام عليكم أخي باران ، بارك الله فيك اسف لتأخري عليك بالحل ، بصراحة كنت أنوي ترجمة كامل الموضوع الذي أشرت له سابقا لأهميته ولكنه طويل جدا. ولئلا أجعلك تنتظر أكثر وفرت لك حل يفي بالغرض كمطلبك ، وأرجو أن ينال اعجابك ويلبي ما تطلبه . الحل يعتمد على فتح التقرير ثم تحديد خصائصه تلقائيا ولفهم الخصائص يمكن مراجعة الرابط الذي أشرت له سابقا. مع الاحترام والتقدير PrinterSettings.rar
baran قام بنشر يوليو 8, 2005 الكاتب قام بنشر يوليو 8, 2005 (معدل) ها أنا أحمّل ما أرفقته فبارك الله فيك وسأزودك بأفضل دعاء مني أوجهه إلى الخالق الجبار عله يفيدك ويزيد من موازين حسناتك يا أخي بعد الدعاء لك جربت الملف ولكنني لم أفلح في معرفة أي من الأرقام توضح أبعاد الصفحة Private Sub ÃãÑ1_Click() DoCmd.OpenReport "r1", acPreview With Application.Reports("r1").Printer .TopMargin = 1440 .BottomMargin = 1440 .LeftMargin = 1440 .RightMargin = 1440 .ColumnSpacing = 360 .RowSpacing = 360 .ColorMode = acPRCMColor .DataOnly = False .DefaultSize = False .ItemSizeHeight = 2880 .ItemSizeWidth = 2880 .ItemLayout = acPRVerticalColumnLayout .ItemsAcross = 6 .Copies = 1 .Orientation = acPRORLandscape .Duplex = acPRDPVertical .PaperBin = acPRBNAuto .PaperSize = acPRPSEnv11 .PrintQuality = acPRPQMedium End With End Sub تم تعديل يوليو 8, 2005 بواسطه baran
الدكتور خضر الرجبي قام بنشر يوليو 9, 2005 قام بنشر يوليو 9, 2005 السلام عليكم أخي باران ، بارك الله فيك شكرا لك للدعاء ولك المثل بإذن الله ، PaperSize = acPRPSEnv11 في هذه الجملة يتم تحديد حجم الورقة ويوجد أحجام كثيرة جدا أرجو مراجعة الرابط المشار إليه لمتغيرات حجم الصفحة. مع الاحترام والتقدير
baran قام بنشر فبراير 9, 2006 الكاتب قام بنشر فبراير 9, 2006 الأعزاء في المنتدى بعد تطبيقي لأكثر من مرة ونجاحي في تطبيق هذا الأمر DoCmd.OpenReport "اسم التقرير", acViewPreview, , "CSN= " & CSN حيث - أسم التقرير الذي لديك = اسم التقرير - اسم حقل الترقيم التلقائي في النموذج = CSN - اسم حقل الترقيم التلقائي في التقرير = CSN تظهر لي رسالة تقول: لأنه قيد الستخدام مسبقاً من قبل شخص آخر أو عملية أخرى main تعذر على مشغل قاعدة البيانات تأمين الجدول
baran قام بنشر فبراير 9, 2006 الكاتب قام بنشر فبراير 9, 2006 الأعزاء في المنتدى بعد تطبيقي لأكثر من مرة ونجاحي في تطبيق هذا الأمر DoCmd.OpenReport "اسم التقرير", acViewPreview, , "CSN= " & CSN حيث - أسم التقرير الذي لديك = اسم التقرير - اسم حقل الترقيم التلقائي في النموذج = CSN - اسم حقل الترقيم التلقائي في التقرير = CSN تظهر لي رسالة تقول: لأنه قيد الستخدام مسبقاً من قبل شخص آخر أو عملية أخرى main تعذر على مشغل قاعدة البيانات تأمين الجدول
baran قام بنشر فبراير 12, 2006 الكاتب قام بنشر فبراير 12, 2006 ماذا جرى للاعضاء انا بانتظار الحل عسى ان يكون التأخير خيراً
الردود الموصى بها
Join the conversation
You can post now and register later. If you have an account, sign in now to post with your account.