• Lunes 23 de Diciembre de 2024, 04:20

Autor Tema:  Reporte No Muestra Datos  (Leído 1524 veces)

cmweb

  • Nuevo Miembro
  • *
  • Mensajes: 5
    • Ver Perfil
Reporte No Muestra Datos
« en: Sábado 3 de Junio de 2006, 03:33 »
0
He diseñado un formulario que solicita parametros de mes y clase
Cuando selecciono "todas las clases" funciona ok, pero cuando selecciono la opcion "una Clase" y digito la clase. El reporte no muestra nada
¿ Que esta pasando ?

Gracias de antemano
Carlos

Este es el codigo del evento Click del Boton de comando que imprime el reporte:
Lamentablemente no puedo adjuntar el mdb, pues su tamaño es 289 Kb
---
Private Sub Informe_ClasesMes_Click()
On Error Resume Next
If IsNull(Me.cboClase.Value) And gpoClase = 1 Then
   Cancel = True
   cboClase.SetFocus
Else
    Dim strWhere As String
    If gpoClase = 1 Then
       strWhere = "month([feref])= " & numes & " and year([feref]) =" & Me!añov
       strWhere = strWhere & " AND val([cdclase]) = " & Me!cboClase
    Else
       strWhere = "month([feref])= " & numes & " and year([feref]) =" & Me!añov
    End If
   
    DoCmd.OpenReport "infClasesMarca", acPreview, , strWhere
    DoCmd.SelectObject acReport, "infClasesMarca"
    DoCmd.Close acForm, Me.Name
End If
   
If Err = 2501 Then Err.Clear
End Sub