13/05/2009, 02:42
|
| | | Fecha de Ingreso: abril-2009
Mensajes: 7
Antigüedad: 16 años Puntos: 0 | |
| Respuesta: Ayuda. Error '13' No coinciden los tipos.
Saludos,
Me tira el mismo error y al combiarlo por .filter, ahora me da otro error.
Mi codigo:
With MiRs
.Requery
.Filter "Mes='" & mes & "'" And "Anyo='" & anyo & "'"
If .EOF Then
List1.AddItem "Nada en este Mes"
Else
List1.AddItem !Nombre
.MoveNext
.Filter "Mes='" & mes & "'" And "Anyo='" & anyo & "'"
If .EOF Then
Exit Sub
Else
List1.AddItem !Nombre
.MoveNext
.Filter "Mes='" & mes & "'" And "Anyo='" & anyo & "'"
If .EOF Then
Exit Sub
Else
List1.AddItem !Nombre
.MoveNext
end if
end if
end if
.requery
end with
Si me pueden decir cual es mi error.
Un saludo y muchas gracias |