نمايش چند گزارش از برنامه توسط كاربر

[abdoreza57]

سلام


با چه دستوري ميتونم ريپورتهاي برنامه را انتخاب كرده و پرينت بگيرم
البته اينو با چرخاندن لقمه دور سر هم ميشه ! ولي از دوستان كسي راهنمايي ميكنه كه چطور ميشه اين گزارشات را تو فرم تيك زد و همه را باهم نشان داد (يا همون پرينت گرفت )

يه چيزي مثل فايل ضميمه

[alirezabahrami]

سلام


با چه دستوري ميتونم ريپورتهاي برنامه را انتخاب كرده و پرينت بگيرم
البته اينو با چرخاندن لقمه دور سر هم ميشه ! ولي از دوستان كسي راهنمايي ميكنه كه چطور ميشه اين گزارشات را تو فرم تيك زد و همه را باهم نشان داد (يا همون پرينت گرفت )
سلام
يه چيزي مثل فايل ضميمه
جناب abdoreza57 از اون دسته کاربران قدرشناس است .
جناب abdoreza57! شما برای انجام اینکار می توانید یک لیست باکس بر روی فرمت قرار بدهید که در واقع آیتم های این لیست باکس باید شامل نام گزارشهای برنامه ات باشد.برای اینکه نام تمام گزارشها در این لیست باکس درج شود در قسمت row sourse لیست باکس کد زیر را وارد کن!


SELECT Name FROM msysobjects WHERE Type=-32764;

سپس multi select لیست باکس را در حالت Simple قرار بده!
در مرحله بعد یک کمندباتن بر روی فرم قرار بده و در رویداد کلیک آن کد زیر را وارد کن!


For Each varSelected In Me.NameListBox.ItemsSelected
DoCmd.OpenReport Me.NameListBox.ItemData(varSelected), acViewPreview, "", "", acNormal
Next varSelected


NameListBox نام لیست باکس شما است.
با این کد شما میتوانید تمام گزارشاتی که در لیست باکس انتخاب کرده اید را یکجا باز کنید و اگر میخواهید بدون اینکه گزارشات باز شوند و فقط از آن چاپ بگیرید دستور print را جایگزین کن.
موفق باشید

[abdoreza57]

سلام

از لطف شما سپاسگذارم و اينكه اساتيد گرانمايه اي چون شما و ديگر دوستان مرا مورد عنايت خود قرار ميدهند شرمنده ام
حقير برنامه نويس نيستم ولي به لطف شما عزيزان چيزايي كه ياد گرفتم خيلي جاها كارم را راه ميندازه لذا با يك تكمه تشكر نميشه اينو جبران كرد !
هیچ وقت نمی توان با مشت گره کرده دست کسی را فشرد
(http://www.google.com/url?sa=t&rct=j&q=&esrc=s&source=web&cd=1&ved=0CCsQFjAA&url=http%3A%2F%2Fchatnahal.ir%2Fview%2Fpost%3A1835 6&ei=CieNUdn_BqqC4ATFloGwDQ&usg=AFQjCNH1n72jDuUzQdB_H88NwtdXVWjRrw&bvm=bv.46340616,d.bGE&cad=rja)

مصداق جمله بزرگ نيچه صادقانه ميگم نميتونم قدر اين زحماتتون را جبران كنم گو اينكه تو يكي از پستهاتون فرموديد اين كارتون خداپسندانه هست ولي هر كسي مسوليتي داره و وقت ارزشمندي كه نميشه به اين سادگي از كنار اون گذشت و خيلي دوست داشتم يه جوري از شرمندگي هم شما و هم ديگر اساتيدي چون جناب پيروزمهر عزيز و اميري گل و ... با آنچه در توانم بود قدرداني ميكردم ولي دوست دارم بدونيد من اون چيزي كه در توانم هست دعاي خيري هست كه اميدوارم قبول كنيد .....




اراتمند شما

[abdoreza57]

سلام

روش فوق العاده اي هست شايد تنها ايرادش اين باشه كه تمام گزارشات را ليست ميكنه !!
من با مخفي كردن گزارشاتي كه نياز به اونها تو اون فرم نبود هم نتونستم به نتيجه برسم علي ايحال ميشه جوري فيلتر كرد كه فقط همون گزارشات مد نظر بيان و نه همه؟

بازم ممنون از توجهتون

[Abbas Amiri]

سلام

روش فوق العاده اي هست شايد تنها ايرادش اين باشه كه تمام گزارشات را ليست ميكنه !!
من با مخفي كردن گزارشاتي كه نياز به اونها تو اون فرم نبود هم نتونستم به نتيجه برسم علي ايحال ميشه جوري فيلتر كرد كه فقط همون گزارشات مد نظر بيان و نه همه؟

بازم ممنون از توجهتون

سلام
با اجازه از استاد عزیزمان آقای بهرامی
شما میتوانید روش زیر رو اتخاذ کنید
Row Source Type لیست باکس رو Value List درنظر بگیرید و اسامی گزارشات رو دستی داخل Row Source آن بنویسید .
یک راه دیگه هم هست که پیچیده تره و پیشنهاد نمیشه.

[abdoreza57]

سلام

دوستاني كه از نمونه فوق ميخوان استفاده كنند يه مطلب كه بعيد ميدونستم بشه از جناب اميري تو پيام شخصي سوال كردم و جوابشون را عينا قرار ميدم :

به جاي نام گزارشات ليست شده چطور ميتونيم نام مستعار (Description) را بنويسيم

سلام
برای این منظور به روش زیر عمل کنید:
2=Column Count و 1 =Bound Column و Column Widths=0;4
در Row Source آن هم مقادیر دوگانه ، اسامی لاتین و عنوان فارسی بنویسید :



"Report1";"نام گزارش 1";"Report2";"نام گزارش 2";"Report3";"نام گزارش 3"


آقاي اميري ممنون از راهنماييتون
موفق باشيد دوستان

[Abbas Amiri]

سلام

دوستاني كه از نمونه فوق ميخوان استفاده كنند يه مطلب كه بعيد ميدونستم بشه از جناب اميري تو پيام شخصي سوال كردم و جوابشون را عينا قرار ميدم :

به جاي نام گزارشات ليست شده چطور ميتونيم نام مستعار (Description) را بنويسيم


آقاي اميري ممنون از راهنماييتون
موفق باشيد دوستان

البته آن روش پیچیده تر این نبود و می توانست تمام گزارشاتی که خصوصیت تگ آنها مقداری خاصی داشت را همراه با کپشن ریپورت نمایش دهد.
موفق باشید