PDA

View Full Version : گزارش گیری از آخرین رکوردهای ذخیره شده



h1and1saman
چهارشنبه 18 اسفند 1389, 23:28 عصر
سلام
من میخوام از آخرین ردیف رکوردم گزارش بگیرم-با دیتا ریپورت
مثلا من چند تا تکست باکس دارم که همه ی اینها در جدولی به نام مشخصات ذخیره میشن می خواستم ببینم چطور میتونم فقط از آخرین اطلاعات ذخیره شده گزارش بگیرم نه از همه اطلاعات
نمیدنوم تنوستم منظور رو برسونم
مثلا دیتابیس من به شکل زیره
family name id
karimi hassan 1
karimian hossein 2
حالا میخوام وقتی رو دکمه ای کلیک می شه فقط ردیف دوم برای گزارش ارسال بشه و اگه رکود جدیدی اضافه شد اون رکورد یعنی از آخرین رکورد گزارش بگیره(باadodc و دیتا ریپورت)
ممنون میشم مکمکم کنید

h1and1saman
جمعه 20 اسفند 1389, 13:23 عصر
یعنی کسی تمی دونه!!!!!!!!!!
یکی جواب ما رو بده خواهشا

shahramlotfi
جمعه 20 اسفند 1389, 13:46 عصر
براي كريستال ريپورت من اينطوري نوشتم

Adodc4.ConnectionString = "Provider=Microsoft.Jet.OLEDB.4.0;Data Source=" & App.Path & "\data.mdb"
Adodc4.CommandType = adCmdTable
Adodc4.RecordSource = "data"
Adodc4.Refresh
Adodc4.Recordset.MoveLast


Dim crApp As New CRAXDRT.Application
Dim crRept As New CRAXDRT.Report
Dim CrDBTable As CRAXDRT.DatabaseTable
Set crRept = crApp.OpenReport(App.Path & "\Report3.Rpt") 'Report File


crRept.RecordSelectionFormula = "{data.barcode}=" & "'" & Text16.Text & "'"

crRept.PrintOut
Set crApp = Nothing
Set crRept = Nothing

h1and1saman
شنبه 21 اسفند 1389, 13:38 عصر
امتحانش نکردم چه جواب داد بده و چه نده ممنونم
اگه دوستان روش های دیگه ای هم بلدند ممنون میشم راهنمایی کنید

javadt
شنبه 21 اسفند 1389, 22:21 عصر
بايد توي دستورات sql به آخرين ركورد بريد
بعد هم پاسش بديد به ريپورت

h1and1saman
یک شنبه 22 اسفند 1389, 11:49 صبح
میشه بیشتر توضیح بدی-چطور برم و پاسش بدم
شوتش نکنم:بامزه:
جواب بدی ممنونت میشم-برنامه واسه همین یه چیز ناقص مونده

Restlesa
یک شنبه 22 اسفند 1389, 12:10 عصر
دوست عزيز شما بايد از دستور Adodc1.Recordset.MoveLast استفاده كنيد
دكمه اي كه گزارشت رو نشون ميده كد بالا رو بزن و بعد دستور نمايش گزارشت
اين دستور فوكس فيلد بانك مورد نظرت رو مي بره به آخرين ركورد اون فيلد انخاب شده از بانك
يعني اگر مثال ذكر شده در بالا رو مد نظر بگيريم فوكس بر روي فيلد karimian hossein 2 قرار مي گيره

h1and1saman
یک شنبه 22 اسفند 1389, 13:35 عصر
این کار رو کردم دقیقا از دستور بالا استفاده کردم ولی نشد بازم امتحان می کنم جواب داد بهتون میگم مرسی از پاسخ گوییتون-ولی اگه بازم جا داشت بیشتر راهنمایی کنید منون میشم (همه که حرفه ای نیستند):خجالت::خجالت::لبخند:

h1and1saman
یک شنبه 22 اسفند 1389, 14:10 عصر
امتحان کردم نشد-جان من اگه بلدید کمک کنید دعاتون می کنم خیلی زیاد
با دستوری که گفتید میره رو رکورد آخر ولی چطور فقط فیلد آخر رو برای گزارش ارسال کنه همه ی اطلاعات رو می فرسته-کمک کنید لطفا خواهشا:گریه::گریه:

Restlesa
دوشنبه 23 اسفند 1389, 01:24 صبح
دوست عزیز از چه دستوری برای نمایش گزارشت استفاده می کنی ؟؟؟

h1and1saman
سه شنبه 24 اسفند 1389, 12:15 عصر
من تونستم اینکار رو بکنم ولی نه به روشی زیاد عادی
یعنی شماره id که به صورت autonumber تنظیم میشه رو تو یه متغیر ریختم بعد اون شماره رو سرچ کردم که در این صورت تو datagride فقط یه گزارش وجود داشت بعد ازش گزارش گرفتم که جواب داد-ولی فکر کنم راه راحتری هم باید وجود داشته باشه چون من یه خورده پیچوندمش
Set DataReport3.DataSource = ado
DataReport3.Show

Restlesa
جمعه 27 اسفند 1389, 17:00 عصر
دوست عزیز کار شما کاملا درست و کامل هستش
تنها راه ممکن اینه که آخرین Record ذخیره شده در بانک رو به دست بیارین که شما این کار رو با استفاده از ID انجام دادین
میشه کدش رو هم اینجا بزارین تا من هم استفاده کنم ؟؟؟؟