una función para validar una fecha

[chelys]

hola necesito una función para validar la fecha de mi formulario a la hora que la introduzca que mande el mensaje de error

[jjlallana]

Función de VBScript:
IsDate(expresión)

Espero que te sirva.

Saludos :)

[chelys]

hola no me funciono te escribo la función para ver si me puedes ayudar asi lo hice<script LANGUAGE="VBScript">

sub funcion1()

Dim Formu
Set Formu = Document.formulario
If IsNumeric(Formu.text3.Value) Then
alert "NO PUEDE INTRODUCIR NUMEROS"
Formu.text3.Value = ""
Formu.text3.focus()
end if
end sub
</script>

[chelys]

oye el mensaje esta mal no es de numeros por favor diculpa

[jjlallana]

¿Te dá algun error o no te hace nada?

[chelys]

no me manda ningun error no hace nada

[chelys]

esta es mi función la de arriba me equivoque

<script LANGUAGE="VBScript">

sub funcionfech()

Dim Formu
Set Formu = Document.formulario
If IsDate(Formu.text2.Value) Then
alert "FECHA INVALIDA"
Formu.text2.Value = ""
Formu.text2.focus()
end if
end sub
</scripta>

[chelys]

te digo que no me manda ningun error pero tampoco me hace nada no se si me puedas ayudar ha disculpa la falta de ortografia pero es que necesito mucho eso y ando un poco en las nubes

[jjlallana]

En el codigo que has mandado no veo que evento hace que se ejecute el script.
Si es para un formulario deberias introducirla en un OnSubmit() para que se ejecute en el momento de enviarlo:
(algo asi más o menos)
Function formfecha_OnSubmit()
If not IsDate(document.formfecha.fecha.value) then
MsgBox ...
formfecha_OnSubmit=false
End if
End function


Saludos

[chelys]

MIRA YO LO QUIERO HACER DESDE MI FORMULARIO O DEL LADO DEL CLIENTE Y LO QUIERO HACER CON EL EVENTO ONBLUR DESDE EL <INPUT TYPE=TEXT NAME="text2" onblur="funtionfecha">

no se si me explico

la funcion que me mandaste ya la probe y tampoco me funciona no se si estoy mal ya probe asi sola y la llame desde el submit y no hace nada no se si puedas explicarlo con mas detalle por favor gracias

[mikel_gomez]

Si quieres una función javascript de validación de fechas, prueba con la siguiente:

Código:

    <script type="text/javascript">
      function validaFecha(dia, mes, ano) {
        var mesNum     = parseInt(mes,10)-1;
        var fechaAno   = new Date(parseInt(ano,10),1,1);
        var fechaDate  = new Date(parseInt(ano,10),mesNum,parseInt(dia,10));
        return (fechaAno.getFullYear() == fechaDate.getFullYear() &&
                                          mesNum == fechaDate.getMonth()) ? true : false;
      }
 </script>

Saludos.

<style>.t{font: 8pt verdana; text-decoration: none; color: black;}</style><hr><span class="t"><a href="mailto:[email protected]" class="t" style="font: 10pt;">Mikel Gómez</a><br>Hay que aprender mucho para saber poco.</span>

[mikel_gomez]

Y tienes un ejemplo completo en la siguiente discusión:

<a href='ir.asp?http://www.forosdelweb.com/mensaje.asp?id=86109' target='_blank'>http://www.forosdelweb.com/mensaje.asp?i...</a>

Saludos.

<style>.t{font: 8pt verdana; text-decoration: none; color: black;}</style><hr><span class="t"><a href="mailto:[email protected]" class="t" style="font: 10pt;">Mikel Gómez</a><br>Hay que aprender mucho para saber poco.</span>

[salmos]

&lt;INPUT TYPE=TEXT NAME=&quot;text2&quot; onblur=&quot;vbscript:funcionfech()&quot;&gt;

[chelys]

gracias mikel pero al llamar la función na hace nada no si puedas ser mas detallado

[salmos]

&lt;script LANGUAGE=&quot;Vbscript&quot;&gt;
Function fecha()
If IsDate(document.formulario.text2.Value) Then
alert(&quot;Es una fecha&quot;)
else
alert(&quot;No es una fecha&quot;)
document.formulario.text2.value = &quot;&quot;
document.formulario.text2.focus()
end if
End Function
&lt;/script&gt;
&lt;form name=&quot;formulario&quot; method=&quot;post&quot;....
&lt;INPUT TYPE=TEXT NAME=&quot;text2&quot; onblur=&quot;vbscript:fecha()&quot;
&lt;/form&gt;

A mi asi me funciona lo acabo de probar.

[chelys]

oye salmos si funciona muchas gracias te agradesco tu ayuda

te mando muchos saludos gracias ;)

[salmos]

Me alegro.

Saludos. :P