Ayuda con el dataenvironment y datagrid

[infoshop]

Estoy haciendo un progrma de facturacion y necesito ejecutar una consulta de acces en vb6.0 pero necesito que segun el codigo de la cabesera de factura me muestre todos los productos con el mismo codigo, pero me muestra todos los que estan almacenados.

yo lo hago de la siguiente forma pero no funciona

Cadena = "SELECT Total.* FROM Total WHERE (Total.Id_factura = '" & text1.text & "')"

DataEnvironment1.Commands.Item("TotalF").CommandTe xt = Cadena
DataEnvironment1.Commands.Item("TotalF").Execute

les agradesco mucho su colaboracion

[GeoAvila]

usa el filter. y colocas tu expresion.. una pregunta mas.. "Total." en esta parte le agregas un punto a tu expresion es error de tipeo y asi la tenes.. porque esto puede hacer que expresion no se ejecute..

nos vemos..