
04/06/2008, 13:30
|
| | Fecha de Ingreso: abril-2008
Mensajes: 425
Antigüedad: 17 años Puntos: 2 | |
Respuesta: Otra pregunta sobre Crystal y VB6 Gracias! lo solucione poniendo esto asi
Call Conecta
Screen.MousePointer = vbHourglass
Screen.MousePointer = vbDefault
sql = "SELECT * from CompCompra "
rsAux.Open sql, cn, adOpenDynamic, adLockPessimistic
Report.SQLQueryString = sql
Report.RecordSelectionFormula = "{compcompra.nrocomp} = '" & FrmCompra.TxtNumComp & "'"
CRViewer1.ReportSource = Report
'CRViewer1.Refresh
CRViewer1.ViewReport
el unico problema que tengo ahora es q el primer registro que muestra esta bien, pero si cargo nuevos datos y le pido que los muestre me trae el reporte con los campos en blanco.
Ahh CRViewer1.Refresh me da error
Alguna Idea |