Visual Basic - datareport

Hola amigos tengo una pregunta, alguien sabe como conectar en datareport al componente data quiero hacer un reporte en el datareport que me muestre lo que este en un text. este fue el codigo que hice para ello.
Dim Ssql As String
Ssql = " select date, dwn, rev, descp, qut, jobo, size,insp,sn,plant,leng,with,thick,aqua,nmr,commen from qctable where joborder like"
Ssql = Ssql & "'" & Text1.Text & "*' order by [joborder]"
Data2.RecordSource = Ssql
'Data2.Refresh
With DataReport1.Sections("Section2").Controls
.Item("label19").Caption = Data2.Recordset.Fields("date")
.Item("label20").Caption = Data2.Recordset.Fields("dwn")
.Item("label21").Caption = Data2.Recordset.Fields("rev")
.Item("label22").Caption = Data2.Recordset.Fields("descp")
.Item("label23").Caption = Data2.Recordset.Fields("qut")
.Item("label24").Caption = Data2.Recordset.Fields("jobo")
.Item("label25").Caption = Data2.Recordset.Fields("size")
End With
DataReport1.Orientation = rptOrientLandscape
DataReport1.Show
pero cuando corro el datatareport me da este error invalid data source, yo por lo general uso el dataenvironment para esto pero no me funciona, si algien sabe como conectar un data report sin un dataenvi.... , porfavor me lo diga gracias a todos Eduardo.

me parece que le falta poner la propiedad DataSource al DataReport

Set DataReport1.DataSource = Data2 (después del End With)

Yo nunca lo he probado con un control Data, pero con un recordset ADO funciona.