Hola, amigos.
Estoy montando un informe con Datareport. Se trata de un Listado de datos bancarios para una domiciliación de pagos de recibos por banco. El dataReport está enlazado a un DataEnvironment con una instrucción SQL de lo más simple: Select * from datos_bancos order by codigo_cuenta.
(Datos_banco es una tabla que se llena en tiempo de ejecución con los
datos de los registros correspondientes a un banco determinado). En el formulario tengo tres botones (Vista preliminar, Imprimir, Salir sin imprimir).

Código correspondiente a cada botón:

Private Sub Command_vista_pre_Click()
dataReport_banco.Show
End Sub

Private Sub Command_imprimir_Click()
dataReport_banco.PrintReport (True)
Frameseleccion.Visible = True '(*)
Textsituarse.Text = ""
End Sub

Private Sub Command_no_imprimir_Click()
Frameseleccion.Visible = True '(*)
Textsituarse.Text = ""
End Sub

(*) Se muestra en pantalla una lista de bancos para seleccionar aquél cuyos datos vayan a imprimirse.)

Para el DataReport tengo este código:

Private Sub DataReport_QueryClose(Cancel As Integer, CloseMode As Integer)
Unload DataEnvironment_datos_banco
End Sub

Todo va perfectamente: la vista preliminar muestra los datos pertinentes, imprime los datos correspondientes al banco que se ha seleccionado...
hasta que, después de imprimir, se selecciona otro banco y se pulsa el botón de "Vista preliminar". Entonces muestra los datos correspondientes a la anterior selección. (Pero imprime los datos correctos)

¿Alguien puede echarme una mano?

Gracias

Hola compañero Aldeanete, prueba haciendo un refresh antes de mostrar en la vista preliminar.

Prueba a cerrar el recordset antes de la línea dataReport_banco.Show. Y también antes de esa línea, inserta un DoEvents. Creo que con sólo eso se te solucionará el problema.

__________________
José María Movilla Cuadrado
______________________
www.foro.vb-mundo.com
www.vb-mundo.com

El Maestro Movilla Tiene Toda la Razón. El es un experto en Datareport (Entre otras tantas cosas)...

En el evento terminate de tu datareport... cierra tu recorset (Comando)...

Ejemplo.

Environment.rsComando.Close...

O antes de aperturar el data report puedes evaluar si ya esta abierto para cerrarlo...

if Environment.rsComando.State then Environment.rsComando.Close....

PD. He escrito esta desde este editor.... asi que puede haber cometido algun error, pero, prueba cualquiera de estas soluciones....

Suerte...

__________________
---- Wilfredo Polanco ----
República Dominicana, Santo Domingo, D.N.

tanto Movilla como Polanco tienen razon(no es nada nuevo)lo que yo hice cuando tenia el mismo problema que no refrescaba los datos fue la 1° opcion de polanco cerrarlo siempre y me funciona de maravillas asi que te lo aconcejo con respecto ala 2° opcion tambien es correcta pero por una cuestion de esfuerzos y costos yo opte por la primera

__________________
JHB

Sois un encanto y os doy las gracias... pero ninguna de vuestras soluciones funciona (al menos en mi programa).
Una pista: si tras el intento fallido de vista preliminar vuelvo a intentarlo, entonces sí funciona (?)