چاپ گزارش

[ramsess]

سلام دوستان خسته ناشید
من می خوام بعد از اینکه دکه ذخیره رو زدم اتوماتیک اطلاعاتی رو که ذخیره کردم چاپ بگیره .
بانکم اکسس هست - گزارشگیری هم کرستال دارم هم دیتاریپورت
چون خودتون بهتر می دونید وقتی یک فیلدی ذخیره می شه می ره آخرین رکرود وای می سه و اگه دستور چاپ بدی همه بانک رو چاپ می گیره در واقع من می خوام اخرین صفحه رو چاپ کنه مرسی - خواهشا جواب بدین چومن خیلی وقته کسی به سوالام جواب نمی ده
:گریه:

[Tasiyan]

CrystalReport1.SelectionFormula = "{table1.id}='" + Text1.Text + "'"



:لبخند:


به جاي id فيلد خودتو بزار و ...

[ramsess]

خسته نباشی دوست من ولی این کد خطای متد رو می گیره کجا باید بنویسم و چطوری

+ ها و text1.text برای چیه؟

[Tasiyan]

دوست عزيز عبارتي كه داخل text نوشته ميشه رو داخل كريستال همون گزارش رو نشون ميده
مثلا شماره پرسنلي داري 1000و10001و10002 اگه تو تكست بنويسي 1000 گزارش مربوط به شخص 1000 رو تو پريويو نشون ميده

CrystalReport1.SelectionFormula = "{table1.id}='" + Text1.Text + "'"البته كد بالا مبوط به كريستال 7

براي كريستال 10 از كد زير استفاده كن


CrRep.RecordSelectionFormula = "{tblTelInfo.fldpeople}=" & rs.Fields!fldpeople

اميدوارم متوجه منظورم شده باشي
:لبخند:

[ramsess]

دوست عزیز واقعا ممنون از حوصله ایی به خرج دادی جواب شما درست بود توی جای دیگه استفاده کردم ولی تو این قسمت من نمی خوام کاربرم چیزی رو وارد کنه این قسمت از برنامم اینجوریه که یه کاربر یه سری مشخصات رو وارد می کنه بعد به محض اینکه دکه ذخیره رو می زنه صفحه گزارش رو نشون نده و مستقیم چاپ بکنه - یا اصلا دستوری بگو که adodc1 پس از دستور adodc1.recordset.update اتوماتیک خودش آخرین صفحه از گزارش رو بیاره مستحضر هستید که وقتی شما یک رکرود جدیدی رو ذخیره می کنید و صفحه گزارش رو بیارین اگه صد تا صفحه داشته باشین می ره اولین صفحه (این مشکل منه)

[Tasiyan]

دوست عزيز بعد از update كد زير رو وارد كن



Form1.Adodc1.Recordset.MoveLast

البته نميدونم دقيقا چي ميخواي :متفکر:

[ramsess]

ممنونم ولی این کد فقط روی بانک تاثیر داره تو گزارش نه !!!
دوست عزیز دقیقا من این رو می خوام که ابتدا با این دستور
adodc1.recordset.addnew
یه فیلد جدید ایجاد می کنم بعد از وارد کردن اطلاعات با زدن دستور ذخیره با دستور زیر اطلاعات ذخیره بشه adodc1.recordset.update
با این کار اطلاعات ما ذخیره می شه حالا بعد از دستور بالا من این کد رو نوشتم
Adodc1.Recordset.MoveLast
Form3.CRViewer91.Refresh
Form3.CRViewer91.ShowLastPage
Form3.Show
form3 همون صفحه گزارش منه حتی دیدی که به صفحه آخر گزارش هم اشاره کردم
وقتی که صفحه گزارش می آد اولین صفحه رو نشون من می ده یعنی اولین فیلدی که قبلا ذخیره کردم در صورتی که میخوام آخرین صفحه بیاد یعنی همون فیلدی که در بالا ذخیره کردم

[Tasiyan]

به نظر من شما بايد از فرمول كريستال استفاده كني تا به نتيجه برسي شايد راه هاي ديگه هم باشه . . .

مثال :
شماره آي دي افراد از 1 تا 100 ، وقتي شما مو لست ميكني 100 ميره تو تكست بعد اون تكست رو به فرمول كريستال بده

به همين راحتي :لبخند:

[ramsess]

مرسی الگوریتم خوبیه سعی می کنم کدش رو با وی بی پیدا کنم ولی با کرستال بلد نیستم اگه وقت کردی یه لینک خوب برای کد نویسی کرستال بدی ممنون می شم خسته نباشی از راهنماییات ممنونم

[rezano]

اگه میشه لطفاً طریقه ایجاد یک data report را بنویسید
اگر از منوی project - data eviroment نبود و در قسمت copmponent - design هم نبود چکار کنیم ؟

reza_noroozi87@yahoo.com
با تشکر

[reza_mn]

اگه میشه لطفاً طریقه ایجاد یک data report را بنویسید
اگر از منوی project - data eviroment نبود و در قسمت copmponent - design هم نبود چکار کنیم ؟

reza_noroozi87@yahoo.com
با تشکر

اول اینکه از کامل بودن نصب ویژوال بیسیکتون مطمئن باشید.
دوم : افزودن دیتا رپورت :

Project=> Add Data Report

سوم : افزدون Data Environment :

Project => more ActiveX Disigners> Data Environment

در صورتیکه پکیج رو کامل نصب کرده باشین این دو گزینه بصورت پیش فرض وجود خواهد داشت.

[ramsess]

لطفا یکی جواب بده من میخوام بعد از اینکه یک رکورد رو ذخیره کردم وقتی دکمه ذخیره رو زدم بلافاصله همون صفحه اتوماتیک بره چاپ؟!!!!1

[ramsess]

دوستان لطفا جواب بدین نمی دونم چرا مدتی دوستان کمک محبتی می کنن و اکثر سوالهای من بی پاسخ می مونه !!!

[ramsess]

دوستان خواهش می کنم جواب بدین
حداقلبگین من چه کدی رو بنویسم وقتی دکه ای زده شد دستور چاپ توی کرستال اجرا بشه
Form3.CRViewer91.PrintReport این رو نوشتم ولی عمل نمی کنه منظورم اینه که برنامه دیگه از من سوال نپرسه و بره چاپ

[BookWorm]

اگه سوال میکنه یه
sendkeys({~})
بعد از این دستوری که نوشتی بنویس

[vahidm]

سلام
حتما شما یک فیلد کلید یا منحصر به فرد دارید درسته ؟
اگر دارید راحت می تونید که این کار رو بکنید البته من از روی دیتاریپورت بلدم اگر با دیتا ریپورت می خوای و یک کلید منحصر به فرد دارید بگو تا برات توضیح بدم .

[farkhondehkar]

سلام
حتما شما یک فیلد کلید یا منحصر به فرد دارید درسته ؟
اگر دارید راحت می تونید که این کار رو بکنید البته من از روی دیتاریپورت بلدم اگر با دیتا ریپورت می خوای و یک کلید منحصر به فرد دارید بگو تا برات توضیح بدم .

سلام اقای وحید. من هم مشکل فرستادن اطلاعات به دیتا ریپورت دارم. البته اتصال بانک تو برنامه از نوع data invironment هستش. ممنون میشم راهنمایی کنید.مرسی.