Eterno problema... comprovar si el usuario ha introducido bien una fecha.

[zacktagnan]

A ver V€ro,

Se primeras para sacar la fecha en formato corto:

<%=FormatDateTime(Now, vbShortDate)%> ó <%=date%>


Con <%=FormatDateTime(Now, vbShortTime)%> lo que sacas es la hora en formato corto.


=====================

En cuanto a dónde, cómo hacer la verificación y cuando insertar el dato:

Yo lo que haría es mandar el formulario a su destino


formFecha.html ó formFecha.asp
<%
if Request.QueryString("falloFecha")<>false then
%>
<strong>La fecha ha sido insertada incorrectamente.</strong>
<%end if%>
<form action="finFecha.asp" method="post">
...
<input type name="fecha" type="text" id="fecha">
...
</form>


Entonces, al comienzo del archivo destino (finFecha.asp) hacer la verificación. Y si está no se cumple redirigir al usuario al archivo del formulario para que vuelva a insertar la fecha de nuevo correctamente, pudiendo incluso mostrarle un mensaje de error para indicarle lo que pasó. Si se cumple poner la fecha en formato corto e insertar datos en la base:


finFecha.asp
<%
Dim vfecha

vfecha=Request.Form("fecha")

if (vfecha="") OR (IsDate(vfecha)<>true) then
Response.Redirect("formFecha.html?falloFecha=true" ) ' *** Ó LA URL QUE SEA

else

vfecha = FormatDateTime((Request.Form("fecha")), vbShortDate)
' Y HACER LA SENTENCIA DEL INSERT DÓNDE EL VALOR A INSERTAR EN CAMPO FECHA SERÁ vfecha CON EL FORMATO dd/mm/aaaa

end if
%>


Creo que eso es todo. Admito correcciones ó sugerencias.

Espero que sirva para el propósito deseado.

Agur.

================================================== ========
zacktagnan.