Antes que nada Feliz dia!! para todos los trabajadores del foro!!
De nuevo yo, haciendo consultas ...
el tema es que hago un formulario que relleno, por ahora, solo el encabezado de una factura. cuando presiono un button deberia por un lado cargar la base de datos y por el otro o mandar a imprimir o ver la previsualizacion, pero me carga la base, pero no me muestra nada
hasta que salgo y entro del programa.
Aqui posteo lo que hice
Private Sub CmdImprimir_Click()
Call Conecta
Rs.Open "select * from compcompra", cn, adOpenDynamic, adLockOptimistic
If Rs.EOF Or Rs.BOF Then
MsgBox ("Tabla sin registros!")
Else
Rs.AddNew
Rs(0) = FrmCompra.TxtNumComp.Text
Rs(1) = FrmCompra.DTPicker1.Value
Rs(2) = FrmCompra.TxtSuc.Text
Rs(3) = FrmCompra.Txttipo.Text
Rs.Update
Rs.Close
MsgBox ("Alta Confirmada")
TxtNumComp.Text = ""
TxtSuc.Text = ""
Txttipo.Text = ""
DataEnvironment1.Command2 Format(Val(Me.TxtNumComp.Text), "00000000")
DataReport2.Show
DataReport2.Refresh
'DataReport2.PrintReport
End If
End Sub
si a alguien se le ocurre una idea..... Bienvenido!!