مشکل در کار با DataEnvironment

[hossein.e]

با سلام
من تو برنامه‌ام در یک قسمت بر حسب تاریخ جستجویی رو انجام میدم و اونو تو دیتاگرید نشون می‌دم و اینکار رو با نوشتن کوییری انجام میدم اما حالا می‌خوام همین رو چاپ کنم اما دقیقا نمیدنم که تو DataEnvironment کدوم قسمتها رو باید به این کوییری لینک کنم تا بتونم تو چاپ نیز نتیجه این جستجو رو ببینم.
:متفکر:

[shinap]

سلام
من ترجیها از Data Environment استفاده نمی کنم
با کد زیر میتونی اطلاعات مورد نظر رو به Data Report ارسال کنی بدون استفاده از Data Environment



Private Sub Command1_Click()
t1 = "SELECT * FROM hogog WHERE sal =" + sal + " AND" + " mah =" + mah + ";"
With Adodc1
.ConnectionString = "Provider=Microsoft.Jet.OLEDB.3.51;" & _
"Persist Security Info=False;Data Source=" & strPath & _
"; Mode=Read|Write"
.CursorLocation = adUseClient
.CursorType = adOpenStatic
.CommandType = adCmdText
.RecordSource = t1
.Refresh
End With
If Adodc1.Recordset.EOF = True And Adodc1.Recordset.BOF = True Then
Adodc1.Recordset.Close
msg = MsgBox("Data Not Find", vbOKOnly + vbExclamation, "Err")
adodc1open = 0
Exit Sub
End If
With DataReportlisbim
Set .DataSource = Adodc1
End With

With DataReportlisbim.Sections("ph") 'ph=datareport Page heder
'used label in datareport
.Controls("lblnamshe").Caption = namsaz
.Controls("lblsartitr1").Caption = sartitr1
End With


With DataReportlisbim.Sections("d") 'd=datareport detail
'used textbox in datareport
.Controls("txtkod").DataField = "kod"
.Controls("txtnam").DataField = "nam"
End With

With DataReportlisbim.Sections("rf") 'rf=datareport report footer
.Controls("funmozsab").DataField = "mozsab"
.Controls("funmozayakar").DataField = "mozayakar"
End With
DataReportlisbim.Show
adodc1open = 1

End Sub

[meh_secure]

datenv.commands.item(0).commandtext = strSQL

[ehsan_ansaripoor]

دوست عزیز ببین این کد کمکی بهت می کنه:




DataE.rsGroup_List.Open " SHAPE {select * from Table where tarikh between '" & tarikh(0).Caption & "' and '" & _
tarikh(1).Caption & "'}"

[hossein.e]

این دستورات رو در کدوم قسمت باید وارد کنم لطفا در مورد چگونگی ارتباطات با connection و command بیشتر توضیح دهید