---

Halløjsa!

Jeg har følgende IF-Statement:

If Request.Form("Dato") = "**-**-****" Then
Response.Write "<p>OK!</p>"
Else
Response.Write "<p>Dataformatet er forkert!</p>"   
End If

Meningen er: at formfeltet "Dato" skal udfyldes med dd-mm-åååå.
Jeg havde egentligt håbet lidt på at * eller ? kunne bruges som
wildcard, men det viste sig at det kunne det ikke.

Nogle ideer?

--
Vil du lære at kode HTML, XHTML, CSS, SSI eller ASP?
- Pædagogiske tutorials på dansk
- Kom godt i gang med koderne
KLIK HER! => http://www.html.dk/tutorials

---

Jacob .. skrev:

> If Request.Form("Dato") = "**-**-****" Then

> Meningen er: at formfeltet "Dato" skal udfyldes med dd-mm-åååå.
> Jeg havde egentligt håbet lidt på at * eller ? kunne bruges som
> wildcard, men det viste sig at det kunne det ikke.

Nej. Du kan ikke bruge wildcards i en streng. Du kan validere på to
måder - enten kan du bruge et Regex til at teste om strengens
format overholder formalia eller også kan du prøve at konvertere
datofeltet til en datoværdi og se om den er gyldig.

Du kan benytte funktionerne IsDate og DateSerial til den sidste
metode.
--
Jens Gyldenkærne Clausen
Svar venligst under det du citerer, og citer kun det der er
nødvendigt for at forstå dit svar i sammenhængen. Se hvorfor og
hvordan på http://usenet.dk/netikette/citatteknik.html

---

> Du kan benytte funktionerne IsDate og DateSerial til den sidste
> metode.

Hej Jens (Sover du mon aldrig). Kan du komme nærmere ind på IsDate
og DateSerial og hvordan de skal skrives ind i mit script?

--
Vil du lære at kode HTML, XHTML, CSS, SSI eller ASP?
- Pædagogiske tutorials på dansk
- Kom godt i gang med koderne
KLIK HER! => http://www.html.dk/tutorials

---

"Jacob .." <laessoe@yahoo.com> skrev
> > Du kan benytte funktionerne IsDate og DateSerial til den sidste
> > metode.
> Kan du komme nærmere ind på IsDate
> og DateSerial og hvordan de skal skrives ind i mit script?

'Start af validering af datoen
Dim myDate
myDate = Request.Form("Dato")

If IsDate(myDate) Then
Response.Write("OK!")
Else
Response.Write("Det var en nitte, prøv igen.")
End If
'Slut

Sådan kunne det se ud, men det skal jo nok tilpasses lidt til dine behov.



Mvh. Voller.