SHAPE

Hola tengo el siguiente código:
With cmd
.ActiveConnection = cn
.CommandType = adCmdText
.CommandText = "SHAPE {SELECT * FROM proveedores_facturas WHERE
id_factura2} APPEND ({SELECT * FROM proveedores_facturas_lineas} AS
DETALLES RELATE id_factura TO factura)"
.Execute
End With

With rs
.ActiveConnection = cn
.CursorLocation = adUseClient
.Open cmd
End With
Set rs1 = rs(0).Value

Me falla en la última línea, y si miro el valor de rs(0) ejecutando en

a paso, veo que el valor es 132 ¿¿?? Que hago mal ?
Lo que quiero recibir son los datos de una factura en concreto y los
materiales de esa factura...

Gracias