slette IE's cache (Internet Explorers midlertidige internetfiler) hjælper nogle gange da IE laver nogle svindelnumre med at lave nogle versioner af dem den ser således at den slipper for at hente den samme version.
Funktioner --> Internetindstillinger --> Tryk på Slet filer i Midlertidige internetfiler-sektionen --> Ok --> Ok
Så ser det jo fint ud og det ser også ud som om at den laver SESSION.LCID (der står for danske indstillinger på blandt dato/tid samt valuta). Vil så også tro at det går i orden med den anden side når du lige får slette de filer.
nej det er jo noget vrøvl. jeg har generede datoerne med følgende kode
LPDay indeholder en dato, som var med formattet dd-mm-yyyy hh:mm:ss den laver så alle kampe og smider dem ind i en tabel. kigger jeg så ind i databasen, så står datoerne rigtig.
Set Counter = Conn.Execute("SELECT * FROM Ligaer where Aktiv=1") do While Not counter.EOF If Now() > counter("LPDay") then Hold = "" Set teams = Conn.Execute("SELECT * FROM Brugere where liga ='" & counter("ID") & "'") do While Not teams.EOF Hold = Hold & teams("ID") teams.movenext If not teams.EOF then Hold = Hold & ", " end if loop arrHold = split(Hold,",") startdate = counter("LPDay") playday = DateAdd("d",14,startdate) count = Ubound(arrHold) for b = 1 to count Response.Write "<BR>" for a = 0 to count/2 ' Her udskrives outputtet strSQL = "Insert into Kampe (Hjemmehold, Udehold, Playday, liga) values(" &arrHold(0+2*a)& ", " &arrHold(1+2*a)& ", '" &playday& "', '" & counter("ID") & "')" Conn.Execute(strSQL) next arrHold=rotate(arrHold) playday = DateAdd("d",7,playday) next playday = DateAdd("d",-7,playday) strSQL1 = "Update Ligaer Set LPDay = '" &playday& "' Where ID =" & counter("ID") &"" Conn.Execute(strSQL1) end if Counter.Movenext loop
Når jeg så henter datoerne med dette kode, så er det at den kommer med de forkerte datoer. dato1 = Date() SQL = "SELECT * FROM kampe where Liga = " & brugernick("Liga") & " AND Playday >=#" & dato1 & "#" Set kampe = Conn.Execute(SQL) Sub kamp(halo,hallo) SQL = "SELECT * FROM Brugere where ID= " & kampe(halo) Set str = Conn.Execute(SQL) response.write str(hallo) end Sub
<% do While Not kampe.EOF %> <tr><td><% kamp "Hjemmehold", "teamname" %> - <% kamp "Udehold", "teamname" %> <% =kampe("playday") %></td></tr><% kampe.movenext %></tr> <% loop %>
Tilladte BB-code-tags: [b]fed[/b] [i]kursiv[/i] [u]understreget[/u] Web- og emailadresser omdannes automatisk til links. Der sættes "nofollow" på alle links.