DataReport - DataEnviroment y Listview

[jeaguiar25]

Esta es mi última duda para terminar mi proyecto, luego de esto creo que por un rato no molesto más.

Necesito imprimir un solo registro almacenado en una Tabla. Genere el DataEnviroment con su correspondiente conección y distintos comandos para relacionarlos con Distintos DataReport. Tres de ellos me dejan imprimir el total de datos de 3 distintas tablas, pero con uno de ellos necesito poder imprimir el registro seleccionado según un listview en un form. Luego coloque una sentencia SQL para que me traiga este registro pero me trae nuevamente todos, en este momento la sentencia la tengo redactada así:

Private Sub Imprimir_Asignacion_Click()
Call Imprimir
End Sub
----------------------------------------------------------
Private Sub Imprimir()
Dim RsImprimir As ADODB.Recordset
Set RsImprimir = New ADODB.Recordset

With ListView2.SelectedItem
RsImprimir.Open "SELECT * FROM Asignado WHERE ID = " & ListView2.SelectedItem.Textcnn, adOpenDynamic, adLockBatchOptimistic

DataReport3.Show 1

End With
End Sub
----------------------------------------------------------
A quien me pueda ayudar muchas gracias.....

PD: Alguien lo desea puedo pasarles el proyecto por correo para que vean más certeramente el error.
Saludos
José