Valider på datoformat ?

http://roenving.users.whitehat.dk/WD3Input.html

Brug det JavaScript, det vil være det mest optimale! ;-)

//>Rune

Nu er der bare lige det ved det at jeg skal bruge det i asp og ikke i javascript :o)

/Websam

Som jeg plejer at sige, hvorfor gøre det i ASP når det kan gøres "live" med JavaScript?
    Der er da ikke noget mere trælst end at siden skal reloade hver gang den skal valideres!

//>Rune

jeg ville også bruge javascript, men hvis du vil gøre det i ASP, hvorfor så ikke bruge IsDate() funktionen, som er indbygget i asp :o)

du kan finde flere funktioner her:
http://msdn.microsoft.com/library/default.asp?url=/library/en-us/script56/html/vtoriFunctions.asp

Det er ikke for at være uhøflig men men men jeg skal bruge det i asp og brugeren skal skrive nødagtig dd-mm-yyyy og ikke noget med / måneds navne og ikke noget med javascript :o) Kan i hjælpe ?!?

/Websam

Brug isdate() funktionen i ASP. Sæt session.lcid = 1030 i toppen så kører den med dansk datoformat....

session.lcid = 1030
if not isDate(strDate) then
  ShowError = ShowError & "<b>Datoen</b> skal være i formatet dd-mm-yyyy<br>"
end if

udbygger lige så den ikke tager navne...

if not isDate(strDate) or len(strDate) <> 10 then

og så lige et svar fennec :o) Grunden til det er at den kunde jeg er ved at lave dette for har bedt om at det ikke skal være med java men med vb istedet jeg vil klart selv benytte java da det er meget hurtigere end vb og mindre resurce krævende.

/websam

Enig... Kunder ved ikke altid hvad der er bedst. Det kender jeg kun selv alt for godt, men det er dem der betaler regningerne :o)

Prøv med:

strDate = "12-24-2004"

eageleye >> hvordan klare jeg så den ???

/websam

Godt set eagleeye....
Jeg skal nu til at ændre alle mine datovalideringer :o(

isDate er fin til nogle ting men den har den uheldighed den kan finde på at bytte rundt på dag og måned. Du kan kombinere den med day og month sådan man tjekker om dagen er imellem 1 og 31 samt månede er imellem 1 og 12

Så du bliver nød til noget i stil med det du har været i gang med.

if isDate(strDate) and int(day(strDate))>=1 and int(day(strDate))<=31 and int(month(strDate))>=1 and int(month(strDate))<=12 then
  'dato ok
end if

Det er ikke nok. Den læser bare dagen som 24, men dagen er 12 og måneden er 24 (fejl tastning). Jeg har lige lavet dette script som klarer det:

function MyIsDate(dato)
dim returVal
returVal = false
if len(dato) = 10 then
  if isnumeric(left(dato,2)) then
  if cint(left(dato,2)) >= 1 and cint(left(dato,2)) <= 31 then
    if isnumeric(mid(dato,4,2)) then
    if cint(mid(dato,4,2)) >= 1 and cint(mid(dato,4,2)) <= 12 then
      if isnumeric(right(dato,4)) then
      if isDate(dato) then
        returVal = true
      end if
      end if
    end if
    end if
  end if
  end if
end if
MyIsDate = returVal
end function

og nu godtager den kun - som seperator

function MyIsDate(dato)
dim returVal
returVal = false
if len(dato) = 10 then
  if isnumeric(left(dato,2)) then
  if cint(left(dato,2)) >= 1 and cint(left(dato,2)) <= 31 then
    if isnumeric(mid(dato,4,2)) then
    if cint(mid(dato,4,2)) >= 1 and cint(mid(dato,4,2)) <= 12 then
      if isnumeric(right(dato,4)) then
      if mid(dato,3,1) = "-" and mid(dato,6,1) = "-" then
        if isDate(dato) then
        returVal = true
        end if
      end if
      end if
    end if
    end if
  end if
  end if
end if
MyIsDate = returVal
end function