Avatar billede muffemand Nybegynder
20. juni 2004 - 17:12 Der er 14 kommentarer og
1 løsning

Farve i tabel hver anden gang

Ja, jeg skal prøve at forklare.
Hvis man har et sted hvor der skal komme nogle links f.eks.
Så har man:
<table>
  <tr>
    <td>Bla bla</td>
  </tr>
</table>

Og så står linket der hvor der står bla bla. Nemt nok!
Men hvis man nu skal tilføje nogle (Via ASP naturligvis) så kommer der jo flere. Hvordan gør jeg så sådan at hver anden f.eks. får en anden baggrundsfarve end den før ?
F.eks.:
<table>
  <tr>
    <td>Bla bla</td>
  </tr>
  <tr>
    <td bgcolor="#FFFF00">Bla bla</td>
  </tr>
  <tr>
    <td>Bla bla</td>
  </tr>
  <tr>
    <td bgcolor="#FFFF00">Bla bla</td>
  </tr>
</table>

Håber i forstår hvad jeg mener.


Muffe
Avatar billede reb Nybegynder
20. juni 2004 - 17:20 #1
Hej Muffe.

Er antallet af links "fast" eller kommer det fra en database ?

mvh

Rene
Avatar billede muffemand Nybegynder
20. juni 2004 - 17:21 #2
Det kommer fra en database. Og man kan selvfølgelig tilføje nye og slette osv. osv.
Avatar billede reb Nybegynder
20. juni 2004 - 17:29 #3
Prøv således:
<table>
<%
While NOT rs.EOF

if farve="#000000" then
farve="#FFFFFF"
Else
farve="#000000"

%>
<tr bgcolor="%=farve%>">
<td>bla bla</td>
</tr>

<%
rs.movenext
Wend
%>
</table>

osv osv
Avatar billede muffemand Nybegynder
20. juni 2004 - 17:37 #4
Hmmm, det er den ikke glad for :)
Den siger:
Microsoft VBScript compilation error '800a0400'

Expected statement

/links.asp, line 158

Wend
^

Og hvis jeg bruger loop istedet for Wend siger den også fejl.
Men et spørgsmål. Du skriver:
if farve="#000000" then...
Jeg har jo ingen farver i min database skal du tænke på. Så jeg ved ikke lige hvorhenne af den finder ud af om det er #000000 eller en anden farve fra.
Avatar billede figora Nybegynder
20. juni 2004 - 17:41 #5
Jeg fik lige lavet denne her hurtig, den kan sikkers gøres kortere:
<% farve = 1 %>
<table>
  <tr>
    <%if farve = 1 then%><%farve = farve - 1%><td bgcolor="FFFFFF"><%else%><td bgcolor="FFFF00"><%farve = farve + 1%><%end if%>Bla Bla</td>
  </tr>
  <tr>
    <%if farve = 1 then%><%farve = farve - 1%><td bgcolor="FFFFFF"><%else%><td bgcolor="FFFF00"><%farve = farve + 1%><%end if%>Bla Bla</td>
  </tr>
  <tr>
    <%if farve = 1 then%><%farve = farve - 1%><td bgcolor="FFFFFF"><%else%><td bgcolor="FFFF00"><%farve = farve + 1%><%end if%>Bla Bla</td>

  </tr>
</table>
Avatar billede muffemand Nybegynder
20. juni 2004 - 17:47 #6
Nope, den virkede heller ikke figora. Sorry :)
Avatar billede tubber Juniormester
20. juni 2004 - 17:49 #7
<HTML>
<HEAD>
<TITLE>Kom og Vind Rundspørge</TITLE>

<%

    Set Conn = Server.CreateObject("ADODB.Connection")
    Conn.Open "DRIVER={Microsoft Access Driver (*.mdb)}; DBQ=" & Server.MapPath("info.mdb")
    dbdata = request.querystring("MyData")
    Sql = "SELECT * FROM tblInfo order by dbID asc;"
    Set hent = conn.execute(sql)
   
%>

<style>
    td {
    font-family:    verdana,arial;
    font-size:    12px;
    }
</style>


</HEAD>
<BODY>
<CENTER><H1>Test</H1></CENTER>

</BODY>
<%   
    Farve = 1
       
    do while not Hent.eof
   
           
    Farve = Farve * -1                                                         
                                                                                 
    Select Case Farve                                                   
        Case -1                                                             
        Color = "5090F9"                                             
        Case 1                                                             
        Color = "ADABBA"                                             
    End Select

%>   
<TABLE BGCOLOR="<%=color%>" WIDTH="600px" ALIGN="CENTER" BORDER="1">
    <TR>
        <TD ALIGN=LEFT WIDTH="200px" VALIGN="TOP">
            <B>Brugernavn:</B><BR>
            <%=hent("dbNick")%>
        </TD>
        <TD ALIGN=LEFT WIDTH="400px" VALIGN="TOP">
            <B>Dato:</B><BR>
            <%=hent("dbDato")%>
        </TD>
    </TR>
    <TR>
        <TD ALIGN=LEFT VALIGN="TOP" WIDTH="200px">
            <B>Mening om forslaget:</B><BR>
            <%=hent("dbSvar")%>
        </TD>
        <TD ALIGN=LEFT WIDTH="400px" VALIGN="TOP">
            <B>Note:</B><BR> <%=hent("dbNote")%>
        </TD>
           
    </TR>
</TABLE>

<%
    hent.movenext
    Loop
%>
<%
    Conn.Close
    Set Conn = Nothing
%>
Avatar billede tubber Juniormester
20. juni 2004 - 17:50 #8
hov det sidste mangler.....

2 sec.....
der er lige noget galt her hehe
Avatar billede tubber Juniormester
20. juni 2004 - 17:51 #9
<HTML>
<HEAD>
<TITLE>Farver</TITLE>

<%

    Set Conn = Server.CreateObject("ADODB.Connection")
    Conn.Open "DRIVER={Microsoft Access Driver (*.mdb)}; DBQ=" & Server.MapPath("info.mdb")
    dbdata = request.querystring("MyData")
    Sql = "SELECT * FROM tblInfo order by dbID asc;"
    Set hent = conn.execute(sql)
   
%>

<style>
    td {
    font-family:    verdana,arial;
    font-size:    12px;
    }
</style>


</HEAD>
<BODY>
<CENTER><H1>Farver</H1></CENTER>
<%   
    Farve = 1
       
    do while not Hent.eof
   
           
    Farve = Farve * -1                                                           
                                                                                 
    Select Case Farve                                                   
        Case -1                                                             
        Color = "5090F9"                                             
        Case 1                                                             
        Color = "ADABBA"                                             
    End Select

%>   
<TABLE BGCOLOR="<%=color%>" WIDTH="600px" ALIGN="CENTER" BORDER="1">
    <TR>
        <TD ALIGN=LEFT WIDTH="200px" VALIGN="TOP">
            <B>Brugernavn:</B><BR>
            <%=hent("dbNick")%>
        </TD>
        <TD ALIGN=LEFT WIDTH="400px" VALIGN="TOP">
            <B>Dato:</B><BR>
            <%=hent("dbDato")%>
        </TD>
    </TR>
    <TR>
        <TD ALIGN=LEFT VALIGN="TOP" WIDTH="200px">
            <B>Mening om forslaget:</B><BR>
            <%=hent("dbSvar")%>
        </TD>
        <TD ALIGN=LEFT WIDTH="400px" VALIGN="TOP">
            <B>Note:</B><BR> <%=hent("dbNote")%>
        </TD>
           
    </TR>
</TABLE>

<%
    hent.movenext
    Loop
%>
<%
    Conn.Close
    Set Conn = Nothing
%>
</BODY>
</HTML>

Sådan der var det hele :)
Avatar billede tubber Juniormester
20. juni 2004 - 17:54 #10
og ser tablen skal skrives lidt om :)

<TABLE>
<%   
    Farve = 1
       
    do while not Hent.eof
   
           
    Farve = Farve * -1                                                           
                                                                                 
    Select Case Farve                                                   
        Case -1                                                             
        Color = "5090F9"                                             
        Case 1                                                             
        Color = "ADABBA"                                             
    End Select

%>   
    <TR>
        <TD BGCOLOR="<%=color%>" ALIGN=LEFT WIDTH="200px" VALIGN="TOP">
            <%=hent("dbNick")%>
        </TD>
    </TR>
<%
    hent.movenext
    Loop
%>
<%
    Conn.Close
    Set Conn = Nothing
%>
</TABLE>

Den skal nok nærmere se sådan her ud :)
Avatar billede muffemand Nybegynder
20. juni 2004 - 17:55 #11
Så for den :)
Det virkede sgu. Med lidt justeringer til mit egen design naturligvis. Men lav et svar, så får du point.

I øvrigt også tak til I andre, men tubber havde rigtigt ;)
Avatar billede figora Nybegynder
20. juni 2004 - 17:55 #12
<% farve = 1 %>
<%do until NOT rs.EOF
    if farve = 1 then
      bg="FFFFFF"
      farve = farve -1
    elseif farve = 0 then
      bg="FFFF00"
      farve = farve + 1
    end if
    igennem = igennem + 1
    %>
<table>
    <tr>
      <td bgcolor="<%=bg%>">Bla Bla</td>
    </tr>
    <%
    rs.movenext
    loop%>
</table>

så kom den i en lidt bedre version...
Avatar billede tubber Juniormester
20. juni 2004 - 17:56 #13
Jammen der er et svar her :)
Avatar billede tubber Juniormester
20. juni 2004 - 17:57 #14
Hov var lige for hurtig

svar!
Avatar billede thesurfer Nybegynder
20. juni 2004 - 18:26 #15
Nu har jeg godt nok ikke læst alle indlæggene (er doven), men man kunne vel nøjes med:

<%
farve = "#FF0000"
do while not rs.eof
%>
tabel halløj her:

<td bgcolor="<%=farve%>">Bla Bla</td>
<%
if farve = "#FF0000" then
  farve = "#0000FF"
else
  farve = "#FF0000"
end if

rs.movenext
loop

' andet aspkode her
%>

- Koden er ikke testet.

Ingen grund til at bruge 2 variabler, til at bestemme farven, når man kan nøjes med éen :-)
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