Avatar billede plato Juniormester
29. april 2004 - 07:50 Der er 10 kommentarer og
1 løsning

Vise efter dagens dato

Hejsa NG.

Jeg bakser lidt med at få koden til at vise de felter i DB'en som passer efter dagens dato, men det virker ikke rigtig.

Nogen der kan hjælpe?

strSQL = "SELECT * FROM premiere WHERE dato = " & Response.Write("Date") & " ORDER BY dato ASC"
Avatar billede goose Nybegynder
29. april 2004 - 07:56 #1
Prøv evt. med:

dagidag = date()
strSQL = "SELECT * FROM premiere WHERE dato >" & dagidag & " ORDER BY dato ASC"

/Goose
Avatar billede plato Juniormester
29. april 2004 - 08:05 #2
Desværre, så udskriver den bare hele listen.
Avatar billede cesil Nybegynder
29. april 2004 - 08:08 #3
prøv
strSQL = "SELECT * FROM premiere WHERE dato >#" & date() & "# ORDER BY dato ASC"
Avatar billede goose Nybegynder
29. april 2004 - 08:09 #4
- og dit felt med dato er i formatet date i databasen ?

/Goose
Avatar billede plato Juniormester
29. april 2004 - 08:14 #5
cesil.

Jeps. dato er sat til dato og klokkeslet i DB'en.

I får lige hele koden:

<%
strConnect = "Provider=Microsoft.Jet.OLEDB.4.0;Data Source="& Server.Mappath("data.mdb")
Set objConn = Server.CreateObject ("ADODB.Connection")
objConn.Open strConnect   


strSQL = "SELECT * FROM premiere WHERE dato >#" & date() & "# ORDER BY dato ASC"

Set rs = objConn.Execute(strSQL)

                           
                 

Do While Not rs.EOF
    id = rs("id")
    titel = rs("titel")
    link = rs("link") 
    pic = rs("pic") 
    dato = rs("dato")
%>
                    <tr valign="top">
                      <td width="100"><a href="http://www.filmnet.dk/trailer.asp?id=<%=link%>"><img src="pics/<%=pic%>" width="80" height="117" border="0"></a></td>
                      <td width="265" class="tekstboks"><strong>Titel:</strong><br><a href="http://www.filmnet.dk/trailer.asp?id=<%=link%>"><strong><%=titel%></strong></a><br><br>
                        <strong>Premiere:</strong><br><%=dato%><br><br>- <a href="http://www.filmnet.dk/trailer.asp?id=<%=link%>">Se flere detaljer</a>
                       
                      </td>
                    </tr>
                    <tr valign="top">
                      <td width="100">&nbsp;</td>
                      <td width="275" class="tekstboks">&nbsp;</td>
                    </tr>

<%
  rs.movenext
loop
rs.Close
objConn.Close
%>
Avatar billede plato Juniormester
29. april 2004 - 08:15 #6
cesil.

Den udskriver også hele listen
Avatar billede cesil Nybegynder
29. april 2004 - 08:21 #7
datoen skal køres igennem den her function for at få det rigtige format.

<%
Function ConvertToSqlDate(dato)
    dim SQLYear,SQLMonth,SQLDay
    SQLYear = Year(dato)
    SQLMonth = Month(dato)
    SQLDay = Day(dato)
    if SQLDay<10 then
        SQLDay = 0&SQLDay
    end if
    if SQLMonth<10 then
        SQLMonth = 0&SQLMonth
    end if
    ConvertToSqlDate = SQLMonth&"-"&SQLDay&"-"&SQLYear
End Function

strConnect = "Provider=Microsoft.Jet.OLEDB.4.0;Data Source="& Server.Mappath("data.mdb")
Set objConn = Server.CreateObject ("ADODB.Connection")
objConn.Open strConnect   


strSQL = "SELECT * FROM premiere WHERE dato >#" & ConvertToSqlDate(date()) & "# ORDER BY dato ASC"

Set rs = objConn.Execute(strSQL)

                           
                 

Do While Not rs.EOF
    id = rs("id")
    titel = rs("titel")
    link = rs("link") 
    pic = rs("pic") 
    dato = rs("dato")
%>
                    <tr valign="top">
                      <td width="100"><a href="http://www.filmnet.dk/trailer.asp?id=<%=link%>"><img src="pics/<%=pic%>" width="80" height="117" border="0"></a></td>
                      <td width="265" class="tekstboks"><strong>Titel:</strong><br><a href="http://www.filmnet.dk/trailer.asp?id=<%=link%>"><strong><%=titel%></strong></a><br><br>
                        <strong>Premiere:</strong><br><%=dato%><br><br>- <a href="http://www.filmnet.dk/trailer.asp?id=<%=link%>">Se flere detaljer</a>
                       
                      </td>
                    </tr>
                    <tr valign="top">
                      <td width="100">&nbsp;</td>
                      <td width="275" class="tekstboks">&nbsp;</td>
                    </tr>

<%
  rs.movenext
loop
rs.Close
objConn.Close
%>
Avatar billede goose Nybegynder
29. april 2004 - 09:10 #8
Prøv evt. og indsæt dette allerøverst i dit dokument:

<%
Session.LCID = 1030
%>

/Goose
Avatar billede plato Juniormester
08. november 2004 - 22:43 #9
Lukket.
Avatar billede goose Nybegynder
09. november 2004 - 09:05 #10
- og hvad var løsningen ?

/Goose
Avatar billede plato Juniormester
09. november 2004 - 09:26 #11
Omstrukturering af hele skidtet ;)
Avatar billede Ny bruger Nybegynder

Din løsning...

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.

Loading billede Opret Preview
Kategori
Kurser inden for grundlæggende programmering

Log ind eller opret profil

Hov!

For at kunne deltage på Computerworld Eksperten skal du være logget ind.

Det er heldigvis nemt at oprette en bruger: Det tager to minutter og du kan vælge at bruge enten e-mail, Facebook eller Google som login.

Du kan også logge ind via nedenstående tjenester

IT-JOB