DataReport

سلام
من در vb6 یک برنامه نوشتم که جستجو می کنه
حالا می خواهم اگه پیدا شد در جستجو بتونم اون رکورد را توی datareport نمایش دهم
مشکل اینجاست که وقتی datar.show می نویسم کل رکورد ها رو نمایش می ده
این مشکل را چگونه حل کنم که فقط اون رکورد که پیدا شده ریپورت بده ؟؟؟
ممنون

دوست عزیز شما با کد زیر میتونید اطلاعاتتون رو فیلتر و رکوردست تشکیل شده رو به datareport1 بفرستید
فقط قبلا باید datareport1 رو طراحی کرده باشید

کد:

---

If Adodc1.Recordset.RecordCount > 0 Then
      On Error Resume Next
      Set Cnn = New ADODB.Connection
      Cnn.CursorLocation = adUseClient
      Cnn.ConnectionString = Adodc1.ConnectionString
      Cnn.Open
      Adoview.Close
      SqlTxt = "SELECT * FROM Table where date="1390/05/02""
      Set Adoview = New ADODB.Recordset
      Adoview.Open SqlTxt, Cnn, adOpenStatic, adLockPessimistic
      Set DataReport1.DataSource = Adoview
      DataReport1.Show 1
  End If

---

امیدوارم جوابتو گرفته باشی