Error en consulta sql con vb6

[ARGFA]

mi problema es realizando una consulta sql, lo que trato de hacer es extraer dos campos de la misma tabla con dos filtros o condiciones. pero la consulta me da error, por supuesto que la debo estar escribiendo mal. vean si me pueden ayudar con eso....
gracias...
esta es la consulta.
Código vb:

Código vb:

Set rsrsfactura = myconn.Execute("SELECT nro_fact,fec_emis FROM dbo_reng_pag WHERE ((cob_num = codigopagotemporal) && (tp_doc_cob =  "FACT"  )")
 

quiero el numero de factura y la fecha de la misma que se encuentran en la tabla dbo_reng_pag donde cob_num = codigopagotemporal(este es una variable) y tp_doc_cob = "FACT"(esta es una cadena de texto, FACT)

supongo que la consulta es asi, pero igual me da error...

[lokoman]

Hola!
Trata asi:

Código vb:

rsrsfactura.open "SELECCION CAMPOS FROM TABLA WHERE cob_num =" _
& codigopagotemporal _
& " AND tp_doc_cob = 'FACT' ", myconn,  adOpenDynamic, adLockOptimistic
 
IF RSRSFACTURA.EOF=FALSE THEN
'...
'TU CODE AQUI
'...
END IF
 

[ARGFA]

disculpa pero no enetendi tu codigo.... esta como incompleto, falto la otra condicion.
gracias de antemano

[ARGFA]

el error que me da, es error de sintaxy falta operador ()......

[ARGFA]

OYE ME FUNCIONO BIEN , MUCHAS GRACIAS.... pero ahora me da el error que requiere un objeto..
no esta agarrado el valor de codigopagotemporal (este es una variable numerica)... y digo que no la esta agarrando porque mando a imprimir esa variable antes de la consulta y si imprime su valor.

[ARGFA]

Código vb:

rsCodigopago.MoveFirst
            codigopagotemporal = rsCodigopago!cob_num_temp
            'Print codigopagotemporal
            rsrsfactura.Open "SELECT nro_fact,fec_emis FROM dbo_reng_pag WHERE cob_num =" _
            & codigopagotemporal _
            & " AND tp_doc_cob = 'FACT' ", myconn, adOpenDynamic, adLockOptimistic
            Print rsrsfactura!nro_fact
            Print rsrsfactura!fec_emis
 

codigopagotemporal es una variable numerica y
FACT es una cadena de texto.
ese es mi codigo actualmente....

[ARGFA]

listo ya resuelto..... muchisimas gracias... de verdad...
aqui te pongo el codigo final....

Código vb:

rsCodigopago.MoveFirst
            codigopagotemporal = rsCodigopago!cob_num_temp
            'Print codigopagotemporal
            Set rsfactura = myconn.Execute("SELECT nro_fact,fec_emis FROM dbo_reng_pag WHERE cob_num =" & codigopagotemporal & " AND tp_doc_cob = 'FACT' ")
            Print rsfactura!nro_fact
            Print rsfactura!fec_emis
 

MUCHISIMAS GRACIAS AMIGO...!!!

[lokoman]