Avatar billede eromaster Nybegynder
10. august 2003 - 15:17 Der er 8 kommentarer og
1 løsning

Skiftende farver på linier

Jeg har et clanwar script og jeg skal have det lavet sådan at hveranden tabel linie er en anden farve´

Kode:
<table border="0" cellspacing="0" cellpadding="1" width="100%" ID="Table14">
    <tr>
        <td width=25%><font face=tahoma size=2 color=#ffffff>Opponent</font></td>
        <td width=15%><font face=tahoma size=2 color=#ffffff>Type</font></td>
        <td width=15%><font face=tahoma size=2 color=#ffffff>Result</font></td>
        <td width=30%><font face=tahoma size=2 color=#ffffff>Maps</font></td>
        <td width=15%><font face=tahoma size=2 color=#ffffff>Date</font></td>
    </tr>
    <tr>
        <td background=gfx/line.jpg height=1 width=100% colspan=6></td>
    </tr>

<%
Set DataConn = Server.CreateObject("ADODB.Connection")
DSN = "DRIVER={Microsoft Access Driver (*.mdb)};uid=admin; "
DSN = dsn & "DBQ=" & server.mappath("db/db.mdb")
DataConn.Open DSN
%>


<%
Set show = Server.CreateObject("ADODB.RecordSet")
show.open "Select * From [kampe] order by id desc", DataConn
if not show.EOF then
show.MoveFirst
end if
do while not show.EOF
if int(show("resultat_os")) > int(show("resultat_dem")) then color = "#33CC33"
if int(show("resultat_os")) < int(show("resultat_dem")) then color = "#CC3333"
if int(show("resultat_os")) = int(show("resultat_dem")) then color = "#CCCC33"
%>



    <tr>
        <td><font face=tahoma size=2 color=#ffffff><a href="default.asp?page=cw_report&id=<%=show("id")%>"><%=show("fjende")%></a></font></td>
        <td><font face=tahoma size=2 color=#ffffff><%=show("type")%></font></td>
        <td><font face=tahoma size=2 color=<%=color%>><%=show("resultat_os")%> - <%=show("resultat_dem")%></font></td>
        <td><font face=tahoma size=2 color=#ffffff><%=show("map1")%> / <%=show("map2")%></font></td>
        <td><font face=tahoma size=2 color=#ffffff><%=show("dato")%></font></td>
        <td align="center"><a href="default.asp?page=cw_report&id=<%=show("id")%>"><img alt="Matchreport" src="gfx/matchreport.gif" border="0" width="16" height="16"></a></td>
        <td></td>
    </tr>


<%
show.MoveNext
loop
show.Close
set show = nothing
Dataconn.Close
%>
</table>
Avatar billede vbcoder Nybegynder
10. august 2003 - 15:25 #1
og ?
Avatar billede eromaster Nybegynder
10. august 2003 - 15:26 #2
og hvad?
Avatar billede eromaster Nybegynder
10. august 2003 - 15:27 #3
Okay jeg laver spørgsmålet om så. Jeg skal have lavet sådan at hver anden linie er grå f.eks.
Avatar billede eagleeye Praktikant
10. august 2003 - 15:32 #4
Tag et kig her:
http://activedeveloper.dk/aspdigital/2002101701.asp'
Princippet er at få bygget en if sætning ind som denne i dit loop så den sifter farve for hver linje.:

        If blnBGColor = True Then
            strBGColor = "#999966"
            blnBGColor = False
        Else
            strBGColor = "#CCCC99"
            blnBGColor = True
        End If
Avatar billede Jman Praktikant
10. august 2003 - 15:35 #5
<%
Set show = Server.CreateObject("ADODB.RecordSet")
show.open "Select * From [kampe] order by id desc", DataConn
if not show.EOF then
show.MoveFirst
end if

BGfarve = 0
do while not show.EOF
if int(show("resultat_os")) > int(show("resultat_dem")) then color = "#33CC33"
if int(show("resultat_os")) < int(show("resultat_dem")) then color = "#CC3333"
if int(show("resultat_os")) = int(show("resultat_dem")) then color = "#CCCC33"

If BGfarve = 0 Then
      bg="#C0C0C0"
      BGfarve = BGfarve + 1
    Else
      bg="#DDEEFF"
      BGfarve = 0
    End If
%>



    <tr>
        <td><font face=tahoma size=2 color=#ffffff><a href="default.asp?page=cw_report&id=<%=show("id")%>"><%=show("fjende")%></a></font></td>
        <td><font face=tahoma size=2 color=#ffffff><%=show("type")%></font></td>
        <td><font face=tahoma size=2 color=<%=color%>><%=show("resultat_os")%> - <%=show("resultat_dem")%></font></td>
        <td><font face=tahoma size=2 color=#ffffff><%=show("map1")%> / <%=show("map2")%></font></td>
        <td><font face=tahoma size=2 color=#ffffff><%=show("dato")%></font></td>
        <td align="center"><a href="default.asp?page=cw_report&id=<%=show("id")%>"><img alt="Matchreport" src="gfx/matchreport.gif" border="0" width="16" height="16"></a></td>
        <td></td>
    </tr>


<%
show.MoveNext
loop
show.Close
set show = nothing
Dataconn.Close
%>
</table>
Avatar billede eromaster Nybegynder
10. august 2003 - 15:35 #6
øh kan jeg ikke lige gennemskue,
Avatar billede eagleeye Praktikant
10. august 2003 - 15:39 #7
Såden her :



<table border="0" cellspacing="0" cellpadding="1" width="100%" ID="Table14">
    <tr>
        <td width=25%><font face=tahoma size=2 color=#ffffff>Opponent</font></td>
        <td width=15%><font face=tahoma size=2 color=#ffffff>Type</font></td>
        <td width=15%><font face=tahoma size=2 color=#ffffff>Result</font></td>
        <td width=30%><font face=tahoma size=2 color=#ffffff>Maps</font></td>
        <td width=15%><font face=tahoma size=2 color=#ffffff>Date</font></td>
    </tr>
    <tr>
        <td background=gfx/line.jpg height=1 width=100% colspan=6></td>
    </tr>

<%
Set DataConn = Server.CreateObject("ADODB.Connection")
DSN = "DRIVER={Microsoft Access Driver (*.mdb)};uid=admin; "
DSN = dsn & "DBQ=" & server.mappath("db/db.mdb")
DataConn.Open DSN
%>


<%
Set show = Server.CreateObject("ADODB.RecordSet")
show.open "Select * From [kampe] order by id desc", DataConn
if not show.EOF then
show.MoveFirst
end if
do while not show.EOF

        If blnBGColor = True Then
            strBGColor = "#999966"
            blnBGColor = False
        Else
            strBGColor = "#CCCC99"
            blnBGColor = True
        End If


if int(show("resultat_os")) > int(show("resultat_dem")) then color = "#33CC33"
if int(show("resultat_os")) < int(show("resultat_dem")) then color = "#CC3333"
if int(show("resultat_os")) = int(show("resultat_dem")) then color = "#CCCC33"
%>

    <tr>
        <td bgcolor="<%=strBGColor%>"><><font face=tahoma size=2 color=#ffffff><a href="default.asp?page=cw_report&id=<%=show("id")%>"><%=show("fjende")%></a></font></td>
        <td bgcolor="<%=strBGColor%>"><font face=tahoma size=2 color=#ffffff><%=show("type")%></font></td>
        <td bgcolor="<%=strBGColor%>"><font face=tahoma size=2 color=<%=color%>><%=show("resultat_os")%> - <%=show("resultat_dem")%></font></td>
        <td bgcolor="<%=strBGColor%>"><font face=tahoma size=2 color=#ffffff><%=show("map1")%> / <%=show("map2")%></font></td>
        <td bgcolor="<%=strBGColor%>"><font face=tahoma size=2 color=#ffffff><%=show("dato")%></font></td>
        <td bgcolor="<%=strBGColor%>" align="center"><a href="default.asp?page=cw_report&id=<%=show("id")%>"><img alt="Matchreport" src="gfx/matchreport.gif" border="0" width="16" height="16"></a></td>
        <td bgcolor="<%=strBGColor%>"></td>
    </tr>


<%
show.MoveNext
loop
show.Close
set show = nothing
Dataconn.Close
%>
</table>
Avatar billede Jman Praktikant
10. august 2003 - 15:40 #8
<%
Set show = Server.CreateObject("ADODB.RecordSet")
show.open "Select * From [kampe] order by id desc", DataConn
if not show.EOF then
show.MoveFirst
end if

BGfarve = 0
do while not show.EOF
if int(show("resultat_os")) > int(show("resultat_dem")) then color = "#33CC33"
if int(show("resultat_os")) < int(show("resultat_dem")) then color = "#CC3333"
if int(show("resultat_os")) = int(show("resultat_dem")) then color = "#CCCC33"

If BGfarve = 0 Then
      bg="#C0C0C0"
      BGfarve = BGfarve + 1
    Else
      bg="#DDEEFF"
      BGfarve = 0
    End If
%>



    <tr bgcolor="<%=BGfarve%>">
        <td><font face=tahoma size=2 color=#ffffff><a href="default.asp?page=cw_report&id=<%=show("id")%>"><%=show("fjende")%></a></font></td>
        <td><font face=tahoma size=2 color=#ffffff><%=show("type")%></font></td>
        <td><font face=tahoma size=2 color=<%=color%>><%=show("resultat_os")%> - <%=show("resultat_dem")%></font></td>
        <td><font face=tahoma size=2 color=#ffffff><%=show("map1")%> / <%=show("map2")%></font></td>
        <td><font face=tahoma size=2 color=#ffffff><%=show("dato")%></font></td>
        <td align="center"><a href="default.asp?page=cw_report&id=<%=show("id")%>"><img alt="Matchreport" src="gfx/matchreport.gif" border="0" width="16" height="16"></a></td>
        <td></td>
    </tr>


<%
show.MoveNext
loop
show.Close
set show = nothing
Dataconn.Close
%>
</table>
Avatar billede Jman Praktikant
10. august 2003 - 15:40 #9
der var lige en fejl i første post.
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