PDA

View Full Version : سوال: ایجاد و چاپ گزارش



mohsenaminzare
دوشنبه 04 دی 1391, 18:23 عصر
با سلام
فرمی دارم با دو text box
یکی نام را نمایش می دهد و دیگری عدد
می خواهم گزارشی برروی برگه a5 چاپ کنم به طوری که در گزارش نام ها نمایش داده شود و تعداد صفحات برابر با عدد وارد شده در text box باشد

shahryari
دوشنبه 04 دی 1391, 18:45 عصر
با استیمول ریپورت به آسانی آب خوردن میسر است
اگر با استیمول ریپورت کار میکنی ، کدش را برایتان در پست بعدی بذارم

mohsen22
دوشنبه 04 دی 1391, 19:23 عصر
لینک داونلود اخرین نسخه شو زحمت می کشین ؟

mohsenaminzare
دوشنبه 04 دی 1391, 19:33 عصر
استیمول ریپورت چی هست ؟ third party ؟

shahryari
دوشنبه 04 دی 1391, 21:15 عصر
استیمول ریپورت چی هست ؟ third party ؟
...... :متفکر:
ليلي دختره بود يا پسره؟؟؟
استيمول رپورت يك كامپوننت گزارش گيري مثل كريستال ريپورتز.....
به آساني آب خوردن ميتونيد انواع گزارشهاي دايناميكي و استاتيكي درست كنيد.. با امكانات فوق العاده..


لینک داونلود اخرین نسخه شو زحمت می کشین ؟ نسخه اخرشو ندارم از همون 2010 Ultimate استفاده ميكنم
لينك دانلودش رو ندارم اما...
آموزش كامل از مبتدي تا حرفه اي همراه با ساخت چندين پروژه به همراه سورسشون و ورژن 2010 استيمول در يك دي وي دي به قيمت خيلي مناسب خريدم (9 هزار تومن).. چونكه پست تبليغاتي محسوب ميشه و خلاف قوانين سايته نميتونم لينكش را بذارم

mohsen22
سه شنبه 05 دی 1391, 22:24 عصر
پس حداقل استارت بزن تا یاد بگیریم

shahryari
سه شنبه 05 دی 1391, 22:50 عصر
در اين سوالي كه دوستمون مطرح كردن به ساده ترين روش به شرح زير است

تكست باكسي كه متنش قرار است به گزارش ارسال شود = TextBox1
" ‌‌" " تعداد چاپ ها رو مشخص ميكند = TextBox2
كنترلي متني كه در محيط طراحي استيمول وجود دارد = Text1
------------------------------------------------------------------------------
با اين شرايط كدهاي دكمه "چاپ" به شرح زير است:

Dim t As New Stimulsoft.Report.Components.StiText
t = StiReport1.GetComponentByName("Text1")
t.Text = Me.TextBox1.Text
StiReport1.Show()
For i As Integer = 1 To Val(TextBox2.Text)
StiReport1.Print()
Next
------------------------------