Error de sistema: -2147217913 The conversion of a char data type to a datetime data type resulted in an out-of-range datetime value.
Este error aparece cuando intentamos dar formato (año-mes-dia) a una fecha para aplicarlo en una consulta que solo acepta la estructura (dia-mes-año). Por ejemplo:
Set rstCorte = Rst("SELECT top 1 * FROM corteszx WHERE corte = 'z' and usufecha = '" & Libreria.Formato(date, "yyyy-mm-dd") & "' " , Ambiente.Connection )
El error se soluciona al modificar el orden de dia-mes-año de esta manera: Libreria.Formato(date, “dd-mm-yyyy”)
Set rstCorte = Rst("SELECT top 1 * FROM corteszx WHERE corte = 'z' and usufecha = '" & Libreria.Formato(date, "dd-mm-yyyy") & "' " , Ambiente.Connection )