If Not InStr(Request.Form("Datofelt"), "-") Or InStr(Request.Form("Datofelt"), "/") Then str = Request.Form("Datofelt") datoStr = Left(str,2) & "/" & mid(str,3,2) & "/" & mid(str,5) End If
Ja det var kun fordi jeg er doven og tænkte at der måske var en smart funktion til at lave et dato felt eller lign. Ligesom i fx. Access hvor man kan formatere feltet således at der i princippet kun kan tastes en dato på én bestemt måde (__/__/____)
Ja men så det input feltet som skal kunne formatere datoen korrekt, den kan så vidt jeg ved ikke bare modtage en "tilfældig" streng og formatere det korrekt.
Du kunne lave et javascript på din for som sikrede at man hvade korrekt dato format inden data blev sendt til siden...
Denne kode tjekke for 02-03-2003 eller 02/03/2003 eller 02032003
str = "02032003"
if isDate(str) then dato = CDate(str) elseif len(str) = 8 then dato = Left(str,2) & "/" & mid(str,3,2) & "/" & mid(str,5) dato = CDate(dato) else dato = str end if
Tilladte BB-code-tags: [b]fed[/b] [i]kursiv[/i] [u]understreget[/u] Web- og emailadresser omdannes automatisk til links. Der sættes "nofollow" på alle links.