webForumDet fria alternativet

Datum problem med lite logik

ASPur ASP

2 svar · 161 visningar · startad av Rossifumi

Medlem sedan okt. 20001 558 inlägg
Frågan#1

Hejsan igen ;)

Har följande kod just nu:

sMaskin = Request.Form("maskinID")

	sStartDatum = Request.Form("hyrUtDatum1") & Request.Form("hyrUtDatum2") & Request.Form("hyrUtDatum3")
		'sStartDatum = CDate(sStartDatum)

	sSlutDatum = Request.Form("hyrInDatum1") & Request.Form("hyrInDatum2") & Request.Form("hyrInDatum3")
		'sSlutDatum = CDate(sSlutDatum)

	sPerson = Request.Form("hyrPerson")
	
	sForetag = Request.Form("hyrForetag")

	mySQL = "SELECT * FROM maskinHyrTable WHERE hyrMaskinID = " & sMaskin & " ORDER BY hyrUtDatum ASC"
	Set objRS = objConn.Execute(mySQL)

		Do While Not objRS.EOF
			[b]Ifall den redan är bokad Then[/b]
				Response.Write "Oops, det här funkar inte"
			End If
		objRS.MoveNext
		Loop

Som ni ser så finns det en rad som heter "Ifall den redan är bokad", vad jag vill göra där är att jämföra en massa datum.

I databasen lagrar jag hyrUtDatum(när man lämnar ut maskinen) och hyrInDatum (när man får tillbaka den). Jag har sedan ett formulär när man skall boka en maskin med sStartDatum och sSlutDatum.

Hur skriver jag den IF-satsen som jämför ifall de datum man försöker boka in krockar med en redan utförd bokning :q

MVH

------------------
"When the 500 isn't right, you're in hell, when a Superbike isn't right, it's ok"
Valentino Rossi, Nastro Azurro Honda

Medlem sedan dec. 200012 464 inlägg
#2

if  not (    datediff("d",sStartDatum,cdate(objRs("hyrInDatum"))) < 0
         or  datediff("d",sSlutDatum,cdate(objRs("hyrUtDatum"))) > 0 ) then

Något sådant kanske.

Egentligen borde du väl lägga in det i din select och bara kontrollera om du fått någon post eller inte

------------------
essentitia preter non sans multiplicandum

Medlem sedan okt. 20001 558 inlägg
#3

TACK LarsG, den verkar funka bra :)

Hur menar du att jag skulle lägga in den i selecten?

------------------
"When the 500 isn't right, you're in hell, when a Superbike isn't right, it's ok"
Valentino Rossi, Nastro Azurro Honda

138 ms totalt · 3 externa anrop · v20260731065814-full.b746b907
0 ms — hämta forumlista (cache)
0 ms — hämta statistik (cache)
135 ms — hämta tråd, inlägg och bilagor (db)