Letzte geänderte Zeile (in anderer Farbe) darstellen

[siggi3]

Hallihallo,
ich mache einen Live Ergebnisdienst einer Sportveranstaltung und möchte jeweils die Zeile in der der zuletzt ins Ziel gekommene Sportler neu aufgeführt ist in einer anderen Farbe als die anderen darstellen, damit er innerhalb der Liste sofort zu erkennen ist.

Es müsste also ein Befehl sein der jeweils nur den letzten geänderten Eintrag markiert (kann auch ein Pic davor aufgerufen werden oder so etwas in der Richtung).
Danke sehr für Eure Hilfe.
Siggi

[Markus Mühlich]

Hallihallo,

HalloHalli,

der zuletzt ins Ziel gekommene Sportler neu aufgeführt ist in einer anderen Farbe als die anderen darstellen, damit er innerhalb der Liste sofort zu erkennen ist.

Ohne Deinen Code zu kennen, behaupte ich mal, daß Du die Datensätze aus einem Recordset holst und diese dann in eine Tabelle schreibst:

<%Do Until rs.eof%>
<td><%=rs("datensatz")%></td>
<%
rs.MoveNext
Loop%>

Nun gibt es verschiedene Möglichkeiten den letzten Datensatz zu ermitteln. Ich selber löse das gerne mit einer zusätzliche Funktion,
die mir dadurch überall zur Verfügung steht:

<%function isLast(rs)
rs.movenext
if rs.eof Then
isLast = True
Else
isLast = False
End If
end function%>

Die Ausgabe der Datensätze sieht dann wie folgt aus:

<%Do Until rs.eof%>
<td
if isLast(rs) = true Then
Response.Write("style='backgroundColor:#ff0000;'")
end if

<%=rs("datensatz")%></td>

<%rs.MoveNext
Loop%>

Viele Grüße aus Köln
Markus

[Siggi3]

Hallihallo,
da bin ich schon wieder.
Vielen Dank erstmal Michael für Deine Antwort.

Nach langem "Gewurschtel":-) sieht die Datei (in Auszügen) jetzt so aus:

<%@LANGUAGE="VBSCRIPT"%>
<!--#include file="Connections/score.asp" -->
<%function isLast(D1)
D1.movenext
if D1.eof Then
isLast = True
Else
isLast = False
End If
end function%>

.
.
.

<tr align="left" valign="top">
                <td height="42" width="54%">
                  <%Do Until D1.eof%>
                  <table width="1%" border="0" cellspacing="0" cellpadding="0" <%if isLast(D1) = true Then
Response.Write("bgcolor='#ff0000;'")
end if%>>
                    <tr align="left" valign="top">
                      <td width="24%"><img src="pix_tr.gif" width="20" height="1"></td>
                      <td width="25%"><img src="pix_tr.gif" width="70" height="1"></td>
                      <td width="24%"><img src="pix_tr.gif" width="70" height="1"></td>
                      <td width="27%"><img src="pix_tr.gif" width="25" height="1"></td>
                      <td width="27%"><img src="pix_tr.gif" width="45" height="1"></td>
                      <td width="27%"><img src="pix_tr.gif" width="45" height="1"></td>
                    </tr>
                    <tr align="left" valign="top" >
                      <td width="24%" class="klein"><%=(D1.Fields.Item("Start").Value)%></td>
                      <td width="25%" class="klein"><%=(D1.Fields.Item("Nachname").Value)%></td>
                      <td width="24%" class="klein"><%=(D1.Fields.Item("Vorname").Value)%></td>
                      <td width="27%" class="klein"><%=(D1.Fields.Item("Nation").Value)%></td>
                      <td width="27%" class="klein"><%=(D1.Fields.Item("Weite").Value)%></td>
                      <td width="27%" class="klein"><%=(D1.Fields.Item("Punkte").Value)%></td>
                    </tr>
                  </table>
                  <%
D1.MoveNext
Loop%>

Ergebnis ist jetzt ein in einer wunderschönen Farbe hinterlegte Fehlermeldung.:-)
Kompilierungsfehler in Microsoft VBScript- Fehler '800a03ea'
---------
Syntaxfehler

/iisHelp/common/500-100.asp, line 122

on error go to 0
---------^
ADODB.Field- Fehler '800a0bcd'

Entweder BOF oder EOF ist True, oder der aktuelle Datensatz wurde gelöscht. Die angeforderte Operation benötigt einen aktuellen Datensatz.

/scoring/zz1.asp, line 190
 ------
(Immerhin ein Teilerfolg) :-)

Möglichweise kann uns ja jemand aus dem Schlammassel helfen.:-)

[Siggi3]

Ach herrje, Markus wollte ich latürnich danken, nicht Michael.:-)

[Markus MÜhlich]

Hallo,

Nach langem "Gewurschtel":-) sieht die Datei (in Auszügen) jetzt so aus:

ich kann da eigentlich kein Fehler erkennen, außer

Response.Write("bgcolor='#ff0000;'")

ist HTML-Syntax, kein CSS. Daher sollte ...("bgcolor='#ff0000'") richtig sein. Aber das ist nicht der Grund für den Abbruch.

Syntaxfehler
/iisHelp/common/500-100.asp, line 122

Was steht denn in Zeile 122?

Entweder BOF oder EOF ist True,

Ich bezweifle, daß damit das Recordset D1 gemeint ist, da Du ja immer mit EOF zunächst überprüfst ob sich überhaupt ein Datensatz in diesem Recordset befindet.

/scoring/zz1.asp, line 190

Was steht in Zeile 190?

Gruß
Markus