
03/06/2008, 18:53
|
| | Fecha de Ingreso: abril-2008
Mensajes: 425
Antigüedad: 17 años Puntos: 2 | |
Respuesta: Aplicar filtros crystal vb6 ya lo solucione, muchas gracias
ahora el problema es que yo quiero que me muestre 1 solo dato que yo selecciono:
lo que hago es esto, la sentencia sql funciona, pero cuando muestra el crviewer me salen todos los datos de la tabla
Call Conecta
SQL = "SELECT * from CompCompra Where NroComp='" & FrmCompra.TxtNumComp.Text & "' "
rsAux.Open SQL, cn, adOpenDynamic, adLockPessimistic
If rsAux.RecordCount < 1 Then
MsgBox ("Anda a Cagar")
Else
rsAux.Find "NroComp='" & FrmCompra.TxtNumComp.Text & "'"
If rsAux.EOF Then
MsgBox "No encontrado"
Else
Report.SQLQueryString = sql
Report.DiscardSavedData
Report.EnableParameterPrompting = False
Report.RecordSelectionFormula = "{compcompras.nrocomp}=" & FrmCompra.TxtNumComp.Text
End If
Screen.MousePointer = vbHourglass
CRViewer1.ReportSource = Report
CRViewer1.ViewReport
creo que esta mal el RecordSelectionFormula....... como lo podria hacer??
GRACIAS
Última edición por analoyra; 03/06/2008 a las 19:51 |