Avatar billede plato Juniormester
05. august 2006 - 15:26 Der er 9 kommentarer og
1 løsning

Vise indhold efter kl. 24 ASP

Hejsa NG.

Er der nogen der kan hjælpe mig med, hvordan jeg får denne kode til kun at vise indhold efter kl. 24 for en pågældende dag, som jeg selv styrer med en dato.

I tabellen er der et felt 'spilletid' hvor data er indsat som f.eks 12:35, 15:45. Men når 'spilletid' er f.eks 00:05 skal den vise denne?

Er det til at forstå?

strSQL = "SELECT * FROM tvmovies Where dato LIKE '"&FormatDateTime(Now, vbShortDate)&"' AND showkanal LIKE '05'"
Set rs5 = objConn.Execute(strSQL)
if rs5.eof or rs5.bof then
Response.Write("")
Else
              Response.Write("<tr>")
                Response.Write("<td colspan='3' height='20'></td>")
              Response.Write("</tr>")
              Response.Write("<tr>")
                Response.Write("<td colspan='3' width='700' bgcolor='#E1E1E1'><img src='grafik/images/tv2film.gif'></td>")
              Response.Write("</tr>")

Do While Not rs5.EOF
%>
              <tr>
                <td bgcolor='#FFFFFF' class='list_font' height="18"><a class="list_font_link" href="film.asp?mode=visfilm&amp;Id=<%=rs5("movielink")%>"><%=left(rs5("film"),50)%></a></td>
                <td bgcolor='#FFFFFF' class='list_font'><%=rs5("spilletid")%></td>
                <td bgcolor='#FFFFFF' class='list_font'><%=rs5("genre")%></td>
              </tr>
<%
rs5.movenext
loop
end if
Avatar billede Slettet bruger
05. august 2006 - 16:07 #1
øh... nej den forstår jeg bestemt ikke...

Hvorfor viser den ikke 00:05 i spilletid når den skal dette?

\Dan
Avatar billede plato Juniormester
05. august 2006 - 16:33 #2
Oki. Jeg har nogle tv.film  der bliver vist ud fra en pågældende dato. Alle tv-film har en spilletid. Men hvis nu kun jeg vil have vist de film der har en spilletid efter 00:00. Dvs. hvis en film har spilletid 00:05. Så skal den vises. Alle film før 00:00 (f.eks i dag) skal ikke vises.

Fik du den nu, ellers må jeg linke til problemet.
Avatar billede plato Juniormester
05. august 2006 - 16:41 #3
http://www.filmnet.dk/test3/today.asp?mode=order_by_canal

De to øverste film på DR 1 skal ikke vises. Da de er før 00:00
Avatar billede Slettet bruger
05. august 2006 - 18:01 #4
Ja ok... men så er vi jo nød til at have to klokkeslæt... Altså 00:00 og så et andet tidspunkt som der ikke må vises noget i mellem...
I nedenstående eksempel er det lavet til kl. 06:00

strSQL = "SELECT * FROM tvmovies Where dato LIKE '"&FormatDateTime(Now, vbShortDate)&"' AND showkanal LIKE '05'"
Set rs5 = objConn.Execute(strSQL)
if rs5.eof or rs5.bof then
Response.Write("")
Else
              Response.Write("<tr>")
                Response.Write("<td colspan='3' height='20'></td>")
              Response.Write("</tr>")
              Response.Write("<tr>")
                Response.Write("<td colspan='3' width='700' bgcolor='#E1E1E1'><img src='grafik/images/tv2film.gif'></td>")
              Response.Write("</tr>")

Do While Not rs5.EOF
spilletid = rs5("spilletid")
if ((hour(spilletid)>00 OR hour(spilletid)>0) AND (hour(spilletid)<06 OR hour(spilletid)<6)) then
%>
              <tr>
                <td bgcolor='#FFFFFF' class='list_font' height="18"><a class="list_font_link" href="film.asp?mode=visfilm&amp;Id=<%=rs5("movielink")%>"><%=left(rs5("film"),50)%></a></td>
                <td bgcolor='#FFFFFF' class='list_font'><%=rs5("spilletid")%></td>
                <td bgcolor='#FFFFFF' class='list_font'><%=rs5("genre")%></td>
              </tr>
<%
end if
rs5.movenext
loop
end if

\Dan
Avatar billede Slettet bruger
05. august 2006 - 18:03 #5
- og så lige en anden ting... Hvorfor i alverden sætter du den til at skrive ingenting hvis resultatet er rs5.EOF eller rs5.BOF???
- det bør vel bare gøres sådan her:
strSQL = "SELECT * FROM tvmovies Where dato LIKE '"&FormatDateTime(Now, vbShortDate)&"' AND showkanal LIKE '05'"
Set rs5 = objConn.Execute(strSQL)
if (rs5.eof=False and rs5.bof=False) then
              Response.Write("<tr>")
                Response.Write("<td colspan='3' height='20'></td>")
              Response.Write("</tr>")
              Response.Write("<tr>")
                Response.Write("<td colspan='3' width='700' bgcolor='#E1E1E1'><img src='grafik/images/tv2film.gif'></td>")
              Response.Write("</tr>")

Do While Not rs5.EOF
%>
              <tr>
                <td bgcolor='#FFFFFF' class='list_font' height="18"><a class="list_font_link" href="film.asp?mode=visfilm&amp;Id=<%=rs5("movielink")%>"><%=left(rs5("film"),50)%></a></td>
                <td bgcolor='#FFFFFF' class='list_font'><%=rs5("spilletid")%></td>
                <td bgcolor='#FFFFFF' class='list_font'><%=rs5("genre")%></td>
              </tr>
<%
rs5.movenext
loop
end if

\Dan
Avatar billede plato Juniormester
05. august 2006 - 18:31 #6
Kigger på din løsning. Ang 18:03:37.. Er ikke så god til ASP. Men stykker sammen efterhånden som jeg lærer. Men jeg mangler grundprincipperne.
Avatar billede plato Juniormester
05. august 2006 - 18:38 #7
Hov.. Nu forstod jeg.. Den skal udskrive ingenting. Men det er pga. andre ting.
Avatar billede plato Juniormester
05. august 2006 - 18:48 #8
Det virker. Tak for hjælpen. Husk at smide et svar. :)
Avatar billede Slettet bruger
05. august 2006 - 21:12 #9
- hehe helt ok!

her et svar...

\Dan
Avatar billede plato Juniormester
06. august 2006 - 14:50 #10
Hej Dan

Hvis tidspunktet er 00:05 vises filmen ikke?
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