رفع اشکال تکرار در دیتا ریپورت

[unforgiven]

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

Dim strPath As String

strPath = App.Path + "\storage.mdb"
DataEnvironment1.Connection1.ConnectionString = strPath

DataEnvironment1.Connection1.Open
DataEnvironment1.Command1
Set DataReport3.DataSource = DataEnvironment1.rsCommand1
DataReport3.Sections("section1").Controls("label1").Caption = frmedit.Text3.Text
DataReport3.Show 1

رکورد مورد نظر رو به تعداد رکورد های موجود در بانک چاپ می کنه
لطفا منو راهنمایی کنید

[unforgiven]

من می خوام فقط این رکورد چاپ بشه

[ehsan_ansaripoor]

دوست برای این کار باید از دستورات SQL استفاده کنی به این صورت:


DataEnvironment1.Commands("Command1").CommandText = "select * from Table where ..."

[alireza_CBoy]

رکورد مورد نظر رو به تعداد رکورد های موجود در بانک چاپ می کنه

دوست عزیز در دستورات SQL با دستور DISTINCT میتونید از تکرار جلوگیری کنید .