06/04/2006, 12:22
|
| | | Fecha de Ingreso: marzo-2006
Mensajes: 66
Antigüedad: 19 años, 1 mes Puntos: 0 | |
| hola mc-quake...mira es sobre esta funcion que salia en un link que me dio aprendiz y era para cambiar la fecha...
"Function FechaGenerica(fecha)
If IsDate(fecha)=True Then
DIM dteDay, dteMonth, dteYear
dia = Day(fecha)
mes =Month(fecha)
ano = Year(fecha)
FechaGenerica = ano & "/" & Right(Cstr(mes + 100),2) & "/" & Right(Cstr(dia + 100),2)
Else
FechaGenerica = Null
End If
End Function
"
y la linea que me marca el error esta en esta funcion... |