request.form("fecha") rarisimo

[Bluesman74cl]

señores.. tengo un form que tiene un input que se llena a partir de un calendario pop up en donde escojo la fecha y luego lo envia para ser procesado a la misma pagina.. pero haciendo pruebas me he dado cuanta de que me resive una fecha mala...
lo explico hago click en el calendario emergente y seleciono por ejemplo

30/11/2004 quedando expresado en el input como 2004/11/30..envio
y resivo en la siguiente pagina asi

Código:

iddoc = request.QueryString("iddoc")
fecha = request.form("date")


dia   = day(fecha)
mes   = month(mes)
anno  = year(anno)
response.write(dia)
response.write"    "
response.write(mes)
response.write"    "
response.write(anno)
response.write"    "
response.write"    "
If IsEmpty(Mes)  then Mes   = Month(Date) end if
if IsEmpty(Anno) then Anno  = Year(Date) end if
if IsEmpty(dia)  then dia   = Day(date) end if
fecha = dateserial(anno, mes, dia)
response.write(formatdatetime(fecha,1))

y al desplegar la info a aparece

30 12 1899 Sábado, 30 de Diciembre de 1899


por que puede estar pasando esto... alguien sabe
se los agradezco desde ya..

[Hereje]

No entiendo muy bien, pero creo que seria así:

Código:

iddoc = request.QueryString("iddoc")

If IsDate(request.form("date")) Then

fecha = CDate(request.form("date"))

dia   = day(fecha)
mes   = month(fecha)
anno  = year(fecha)

Else

mes = Month(Date) 
anno = Year(Date) 
dia   = Day(date) 

End If

response.write(formatdatetime(fecha,1))

[Hereje]

perdon, falto una linea:

fecha = dateserial(anno, mes, dia)

y luego...

response.write(formatdatetime(fecha,1))

[skatomundo]

De La Ultima Forma Si...la Veo.. Entiendo..

Si Declaras La "fecha", Pues De Esa Obtienes Day, Month Y Year

[skatomundo]

dia = day(fecha)
mes = month(mes)
anno = year(anno)



ESTO SI...
dia = day(fecha)
mes = month(fecha)
anno = year(fecha)

[Hereje]

De vuelta, creo que esto seria lo más conveniente:

iddoc = request.QueryString("iddoc")

If IsDate(request.form("date")) Then

fecha = CDate(request.form("date"))

Else

fecha = Date()

End If

response.write(formatdatetime(fecha,1))