zorrani

Crea una consulta con los datos que desea imprimir, incluyendo el doigo del banco. Luego desde Vb Crea un procedimiento que cargue le siguiente. SQL SQL="SELECT * FROM Consulta_Reporte WHERE IdBanco=" & Codigo Set rs = NEW ADODB.Recorset rs.Open SQL,...

Veo que te falta el siguiente comando. Cr1.databasaname="c:\base.mdb" Y Cr1. Printreport Suerte