20 svar · 508 visningar · startad av Jesper T
Jag får inte detta att funka.
Så här skulle jag vilja ha´t:
Om dateFrom och dateTo är inom "rätt" intervall.
(dateFrom skall ha inträffat men dateTo skall inte ha inträffat.) och både dateFrom och dateTo kall kunna vara tomma eller null
(vet inte vad som returneras ifrån ett recset om man inte fyller den med ngt.)
null & null = OK
"1999-01-01" & "2008-01-01" = OK
null & "2008-01-01" = OK
"1999-01-01" & null = OK
null & "1999-01-01" = Inte OK
"2008-01-01" & "1999-01-01" = Inte OK
"2008-01-01" & null = Inte OK
If (datediff("s",dateFrom,now()) > 1 and datediff("s",dateTo,now()) < 1) or dateFrom ="" or dateTo="" then
'ett och
else
'annat
end if
Jag vet inte om jag tolkat ditt halvkryptiska problem rätt men här är ett förslag
blnIntervalOk = True
If dateFrom = "" And DateDiff("d", Now(), dateTo) < 0 Then blnIntervalOk = False
If dateTo = "" And DateDiff("d", Now(), dateFrom) > 0 Then blnIntervalOk = False
If DateDiff("d", dateFrom, dateTo) > 0 Then blnIntervalOk = False
If blnIntervalOk Then
[blue]'ett och[/blue]
Else
[blue]'annat[/blue]
End If
Nepp. Testa detta.(som är inom intervallet för "now")
blnIntervalOk = True
dateFrom="2001-01-01" : dateTo="2005-01-01"
If dateFrom = "" And DateDiff("d", Now(), dateTo) < 0 Then blnIntervalOk = False
If dateTo = "" And DateDiff("d", Now(), dateFrom) > 0 Then blnIntervalOk = False
If DateDiff("d", dateFrom, dateTo) > 0 Then blnIntervalOk = False
If blnIntervalOk Then
Response.write "Ok, gäller!"
Else
Response.write "Gäller ej!"
End If
samma fel
va, är det fel på dem?
Mja... det kan jag väl inte säga direkt, men för mig är dom för luddiga.
Vad är icke tillåtet?
If dateTo = "" And dateTo < Now Then IG
If dateFrom = "" And dateFrom > Now Then IG
If dateFrom > dateTo Then IG
Så uppfattade jag det.
Alltså.
Både dateFrom och dateTo skall kunna vara tomma.
Men, finns ett datum i något av dem, så måste det vara "rätt".
(dateFrom skall ha passerats men dateTo skall inte ha passerats.)
Du har ingen möjlighet att göra det direkt med SQL?
Är lite enklare...
Men det borde väl gå att skrvia så här:
n = Now
If IsNull(dateFrom) Then dateFrom = n
If IsNull(dateTo) Then dateTo = n
If dateFrom > n Or dateTo < n Then
'Inte ok
Else
'Ok
End If
Möjligt att du får skriva n = Date. Beroende på vad för datum som kommer ur DBn.
Erik Juhlin skrev:
Du har ingen möjlighet att göra det direkt med SQL?
Är lite enklare...
Iofs. men jag behöver alla poster ändå.
Jag vet! :i :)
Dim n,dateFrom,dateTo
n = now()
dateFrom="" : dateTo=""
If Not IsDate(dateFrom) Then dateFrom = n
If Not IsDate(dateTo) Then dateTo = n
If DateDiff("n", n, dateFrom) > 0 Or DateDiff("n", n, dateTo) < 0 Then
Response.write "Inte OK!"
Else
Response.write "OK!"
End If
Ungefär så jag skrev ju.
Smartare att använda Len istället för IsDate eftersom att längden ligger lagrat för strängar. Men jag förutsätter att det kommer null-värden får databasen när det inte finns något datum och då fungerar IsNull bra.
Ok, men jag fick aldrid din att funka.
Du har ingen möjlighet att göra det direkt med SQL?
Är lite enklare...
Hur skulle det se ut då då?
Så här skriver man i SQL-Server. Tror man får använda NOW() istället för GETDATE() i Access.
SELECT * FROM tbl WHERE GETDATE() BETWEEN COALESCE(datefrom, GETDATE()) AND COALESCE(dateto, GETDATE())
Tack, det är mySql, det verkar som om även mySql har den funktionen också.
Men vad är igentligen skillnaden?
på:
now() BETWEEN sp_validdatefrom AND sp_validdateto
eller:
now() BETWEEN COALESCE(sp_validdatefrom, now()) AND COALESCE(sp_validdateto, now())
Resultatet blir ju det samma.
Denna post visas te.x. inte i något fall:
sp_validdatefrom = "1999-01-04"
sp_validdateto = ""
Fältet måste vara i datumformat och det ska vara NULL om inte något datum är angett.
Ok, men går det att sätta fältet till null om fältformatet är datetime?
Yes, går dock inte att sätta det till "" då...