Joshua
12 de Agosto del 2003

Hola a todos.
Necesito saber como trabajar con el DataReports y Cristal Report , como se manda a imprimir un reporte o obtener algun codigo de ejemplo para mandar a imprimir una factura o cualquier documento , como hacer un filtro con una fecha inicial y fecha final validando que la fecha inicial nunca debera ser mayor que la final , como controlar errores dados por campos con valores null que contenga la tabla.
Si alguien puede ayudarme al respecto o donde puedo bajar manuales gratis por internet que me ayuden a resolver.

Gracias

xvisual
12 de Agosto del 2003

hola joshua
espero que esto se sirva

'imprimir en crystal report
report2.ReportFileName = direccion del reporte
report2.WindowWidth = 681
report2.WindowHeight = 506
report2.WindowLeft = 120
report2.WindowTop = 64
report2.Destination = crptToWindow
report2.Action = 1
report2.PrintReport

'validacion fecha
If DateValue(txt_feciniaseg.Text) > DateValue(txt_fecfinaseg.Text) Then
MsgBox "La Fecha Desde No Puede Ser Mayor que Hasta", vbCritical, ""
txt_fecfinaseg.SetFocus
Exit Sub
End If

'respecto a tu tecera pregunta sies al momento de grabar es solo
ver si el dato viene null
ejm if txt_rut.text "" then
msgbox "Debe Ingresar el rut", vbCritical, ""
txt_rut.setfocus
exit sub ' o function
end if

' si es el caso de leer un dato y desplegarlo en un texto u otro
tipo de control
ejm
txt_telefono.text = iif(isnull(tabla!rut)="",tabla!rut)