Den samme celle farve hver anden gang

If C = 0 THEN

ok... det forstår jeg intet af? hvad mener du?

If C = 0 THEN
color = "Din farvekode"
c = 1
Elseif C = 1 THEN
color = "Din farvekode"
c = 0
End If

Det placeres efter din Do While... og resten kan du naesten gaette dig til

undskyld det foerste indlaeg, en mindre tastefejl :)

det ligner noget jeg kan bruge, og da jeg er dårlig til at gætte kan du så ikke lave noget mere for mig. Jeg er temmelig newbie.. det er jo 200 point...

jo, hvad skulle det vaere?

evt. sætte det du skrev før ind i koden. Så det kommer til at virke..?

<%            ' HER henter vi de fem nyeste nyheder
            SQL = "SELECT TOP 5 * FROM nyhed ORDER BY Cdate(dato) DESC;"
            SET RS_nyhed = conn.execute(SQL)
C = 0
            DO WHILE NOT RS_nyhed.EOF
If C = 0 THEN
color = "Din farvekode"
c = 1
Elseif C = 1 THEN
color = "Din farvekode"
c = 0
End If

                Response.write "<tr><td colspan=2 bgcolor="& color &"><font face='Verdana, Arial, Helvetica, sans-serif' size='1'>"
                Response.write "<a href='nyhed.asp?id=" & RS_nyhed("id") & "'>&gt;&gt; "
                Response.write RS_nyhed("dato")
                Response.write " - "
                Response.write left(RS_nyhed("overskrift"),55)
                IF len(RS_nyhed("overskrift")) > 55  THEN Response.write "..."
                Response.write "</font></td></tr>"

            RS_nyhed.movenext
            LOOP
            %>

nu er jeg ikke lige sikker men er det ikke bg color den hedder?

2 min kigger lige på det...

jeg har lige et sidste spørgsmål. Er det muligt at sætte en onmouseover funktion ind i cellen så den skifter når man holder musen over, og skifter derefter tilbage til "color" farven.

ja, hvis du har funktion er det ikke noget problem

så bliver det hele:


<script language="javascript">
function rOver(obj,c)
{
  obj.style.backgroundColor=c
}
function rOut(obj,c)
{
  obj.style.backgroundColor=c
}
</script>

<table>
<%

  Dim SQL, RS_nyhed, bgColorOn, bgColor, Count

  SQL = "SELECT TOP 5 * FROM nyhed ORDER BY Cdate(dato) DESC;"
  SET RS_nyhed = conn.execute(SQL)

  Count = 0

  Do WHILE RS_nyhed.EOF = False

    If Count Mod 1 = 0 Then
      bgColorOn = "999999"
      bgColor  = "CCCCCC"
    Else
      bgColorOn = "CCCCCC"
      bgColor  = "999999"
    End If

    Response.Write "<tr bgcolor=""" & bgColor & """ onMouseOver=""rOver(this,'#" & bgColorOn & "');"" onMouseOut=""rOut(this,'#" & bgColor & "');""><td colspan=2><font face='Verdana, Arial, Helvetica, sans-serif' size='1'>"
    Response.Write "<a href='nyhed.asp?id=" & RS_nyhed("id") & "'>&gt;&gt; "
    Response.Write RS_nyhed("dato")
    Response.Write " - "

    If Len(RS_nyhed("overskrift")) > 55 Then
      Response.Write left(RS_nyhed("overskrift"),55) & "..."
    Else
      Response.Write RS_nyhed("overskrift"),55)
    End If

    Response.Write "</font></td></tr>"

    RS_nyhed.movenext

  Loop
%>
</table>

ja, jeg vil mene at det er rigtigt, virker det?

du kan jo prøve, jeg skrev det bare


der er en enkelt fejl, men det er kun et # der mangler.

Response.Write "<tr bgcolor=""" & bgColor & """ onMouseOver=""rOver(this,'#" & bgColorOn & "');"" onMouseOut=""rOut(this,'#" & bgColor & "');""><td colspan=2><font face='Verdana, Arial, Helvetica, sans-serif' size='1'>"
   

skal være:

Response.Write "<tr bgcolor="#"" & bgColor & """ onMouseOver=""rOver(this,'#" & bgColorOn & "');"" onMouseOut=""rOut(this,'#" & bgColor & "');""><td colspan=2><font face='Verdana, Arial, Helvetica, sans-serif' size='1'>"

hvad med min del af opgaven? skal det ikke beloennes eller mener du bare at det er ligegyldigt?