Lørdag/søndag
Jeg har lavet en side, hvor at det kun skulle være muligt at svare på konkurrencen mandag - fredag.Det drejer sig om nedenstående side. Kan man lave det sådan at man ikke har mulighed for at se siden eller at man blot ikke kan sende det afsted, hvis det er lørdag/søndag.
I første omgang har jeg bare ikke linket op til siden i weekenden. Men der er selvfølgelig nogen som har gemt linket til siden og prøver så at snyde på den måde.
<%
Session.LCID = 1031
Set Conn = Server.CreateObject("ADODB.Connection")
Conn.Open "DRIVER={Microsoft Access Driver (*.mdb)}; DBQ=" & server.MapPath("konkur.mdb")
SQLstmt = "SELECT * FROM konkur WHERE idnr = " & Request("idnr")
Set rs = conn.Execute(SQLstmt)
navn = rs("navn")
dato = rs("dato")
%>
text
<%
RS.Close
SQLstmt = "SELECT TOP 1 * FROM resultat ORDER BY ID desc;"
Set rs = conn.Execute(SQLstmt)
IF NOT rs.EOF Then
s1a = rs("s1a")
s1 = rs("s1")
s2 = rs("s2")
s3 = rs("s3")
periode = rs("periode")
%>
TExt
<%
ELSE
response.write ","
END IF
RS.Close
conn.Close
Set conn = nothing
Set SQLstmt = nothing
%>
