24. marts 2001 - 21:29Der er
1 kommentar og 1 løsning
dato bliver opfattet som tekst?
Jeg skal tjekke på en dato fra et formularfelt, men det fungerer ikke. Dato må ikke være mindre end dags dato, og må ikke være større end dags dato +7 1. dato = Request.Querystring(\"dato\") If Request.Querystring(\"dato\") <= DateAdd(\"d\", 7, date)Then Response.write\"Rigtig\" Else Response.write \"Forkert\" End If Resultatet her er \"Forkert\" 2. dato = Request.Querystring(\"dato\") If dato > Date+7 Then Response.write\"Forkert\" Elseif dato < Date Then Response.write\"ForkertForkert\" Else Response.write\"Rigtig\" End if Resultatet her er \"Forkert\"
I dette særtema ser vi på, hvordan cloud og AI bliver fundamentet for virksomhedernes digitale forretning, og hvordan de nye muligheder for automatisering og forretningsværdi kan udnyttes uden at miste overblik, sikkerhed og menneskelig kontrol.
<% dim DatoDiff DatoDiff = DateDiff(\"d\", Date, Request.Querystring(\"dato\")) \'DatoDiff er nu antal dage
If DatoDiff <= 0 Then Response.write \"Det er desværre for sent at booke :-( \" ElseIf DatoDiff <= 7 Then response.write \"tillykke \" HentDatabase() Else Response.write \"Denne uge er ikke tilgængelig endnu \" End If
Function HentDatabase() Dim Con Set Con=Server.CreateObject(\"ADODB.Connection\") Con.Open\"Driver={Microsoft Access Driver (*.MDB)};DBQ=\" & Server.MapPath(\"stenlund.mdb\") Dim RS Set RS=Server.CreateObject(\"ADODB.RECORDSET\") RS.Open \"SELECT dato FROM Holdoversigt\",Con \'*********** \' Din databasekode skal indsættes her :-)) \'************ RS.Close Set RS=Nothing End Function %>
..håber sq ikke jeg har fået en hjerneblødning :-)
HorsMarken
Synes godt om
Ny brugerNybegynder
Din løsning...
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.
