skift ved ny dag

ok har nu roddet med det en masse timer og tror jeg har denne løsning:

<%
if session("dag") = "" then
session("dag") = date
end if

if session("dag") <> date then
session("opskrift") = ""
end if

if session("opskrift") = "" then

set Conn = Server.CreateObject("ADODB.Connection")
DSN = "Driver={Microsoft Access Driver (*.mdb)}; "
DSN = DSN & "DBQ=" & Server.MapPath("opskrifter.mdb")
Conn.Open DSN


Set rs = Server.CreateObject("ADODB.RecordSet")
SQL = "SELECT * FROM opskrift"
rs.Open SQL, Conn, 3, 1
rndMax = rs.RecordCount
Randomize
rndNumber = Int((RND * rndMax))  'Find et random nummer
rs.Move rndNumber 'Flyt til den valgte record
response.write rs("opskriftid")
session("opskrift") = rs("opskriftid")
rs.Close
Conn.Close
set Conn=Nothing
set rs=Nothing
session("dag") = date

else


set Conn = Server.CreateObject("ADODB.Connection")
DSN = "Driver={Microsoft Access Driver (*.mdb)}; "
DSN = DSN & "DBQ=" & Server.MapPath("opskrifter.mdb")
Conn.Open DSN


Set rs = Server.CreateObject("ADODB.RecordSet")
SQL = "SELECT * FROM opskrift where opskriftid = " & session("opskrift") & ""
rs.Open SQL, Conn, 3, 1

response.write rs("opskriftid")

rs.Close
Conn.Close
set Conn=Nothing
set rs=Nothing
session("dag") = date

end if
%>

er der nogen der kan gennemskue om det gør det at den finder en random dagens ret hver dag?

Hvis du bruger Acess så kan man ikke lave sådan den automatisk klokken 00:00 laver en ny random post. Det du kan gøre er at havde en tabel som hvori du gemme den random-post som skal vises samt datoen.

Den side som viser den random-post hender så ID og datoen. Er datoen mindre end idag så find en ny random post og gemt det nye ID samt dato i tabellen.

Ved at gemme det i session vil hver enkelt bruger få vist hver sin random post men kun så længe man er på siden, hvis man lukker browseren og åbenr den igen vil man få en ny post.

Du kan lave dit kode om så de gemmer det i Application variablen i stedet for sessions variablen så er det ens for alle brugerne..

Du retter bare session til Application.
session("dag") = date
bliver til:
application("dag") = date

takker for svar. Tror jeg holder mig til din første ide med en tabel til det, det må vist være det mest smarte i det her tilfælde.
Super mange gange takker for hjælpen, smider du lige et svar?

Ok, ja det gør jeg da ;)