 
			
				13/05/2009, 02:42
			
			
			     |  
      |    |    |    Fecha de Ingreso: abril-2009  
						Mensajes: 7
					  Antigüedad: 16 años, 7 meses 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           |