nicht angemeldet
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.:-)