Jag har gjort en databas, där det finns fälten vecka och namn.
När det är vecka 1 så ska det komma upp det som står i namn fältet, vecka.
Ex,
vecka 1 sova
vecka 2 äta
vecka 3 träna
I vecka 1 ska det stå sova hela veckan....hoppas att ni förstår.
<%
Set Connection = Server.CreateObject("ADODB.Connection")
Connection.Open "Driver={Microsoft Access Driver (*.mdb)}; DBQ=c:\inetpub\wwwroot\cgi-bin\databas.mdb"
SQL = "SELECT namn, vecka FROM klubbstugan"
Set RS = Connection.execute(SQL)
%>
<%
do until rs.EOF
If DatePart("ww", rs("vecka"),2) = DatePart("ww", Date(), 2) Then
response.Write rs("namn")
end If
loop
%>
Men det funkar ej, någon som har en bättre lösning?
Testa att lägga det du får från databasen i en variabel innan du jämför den mot andra... det har en tendens att hålla kvar samma record när man loopar...:
<%
Set Connection = Server.CreateObject("ADODB.Connection")
Connection.Open "Driver={Microsoft Access Driver (*.mdb)}; DBQ=c:\inetpub\wwwroot\cgi-bin\databas.mdb"
SQL = "SELECT namn, vecka FROM klubbstugan"
Set RS = Connection.execute(SQL)
%>
<%
var = rs("vecka")
do until rs.EOF
If DatePart("ww", var,2) = DatePart("ww", Date(), 2) Then
response.Write rs("namn")
end If
loop
%>
... men detta sätt tror jag inte är så bra... det är bättre att låta SQL hålla reda på sortering och urval, istället för att göra en loop där du gör ditt urval... Nu vet jag inte hur man skapar urvalsfrågor för datum, då jag inte hållt på med det alls... men jag vet att det finns många andra här som kan...