Error Code......hvad skal jeg gøre?

hvad står der i linje 15?

Hej Bocker........hvis du svarer på det andet også ligger der 100 point til dig.

Men det er i den  kode her:

Response.Write"<table align='center' cellpadding='20' cellspacing='5' border='0'>"
    count = 1
    Response.Write("<tr>")
    While NOT oRS.EOF
          If count MOD 3 = 0 Then
            Response.Write("</tr><tr>") & vbCrLf
              Response.Write("<td id=""tdblank"" valign=""middle""><a href=""index.asp?ID=" & oRS.fields("ID") & """>" & "<img src=""" & oRS.fields("Foto") & """ border=""0"">" & "<br>" & oRS.fields("Beskrivelse") & "</a></td>") & vbCrLf
              count = count + 1
          oRS.MoveNext
    Wend
    Response.Write("</table>")

jamen, hvilken er linje 15???

Du mangler en End If

ahh... du skal have en end if, hvis du laver linjeskift efter dit if statement!

Skriv lige koden.........

if count mod 3 = 0 then Response.Write("</tr><tr>") & vbCrLf

Du skal huske et </tr> efter løkken også...

Er lidt grøn i det her endnu!!! :-(

Her altså:

oRS.MoveNext
    Wend
    Response.Write("</tr></table>")

Og hvor skal det End If stå?

Du skal ikke have en end if, hvis du skriver det på én linje, og ja det </tr> skal stå der.

Vil du ikke lige skrive koden så det står i 2 linjer og med End If på det rigtige sted, for texten skal jo stå under hvert billed.

if count mod 3 = 0 then
response.write("</tr><tr>") & vbCrLf
end if

Yes det kører nu............

Bocker vil du have points for det første spørgsmål jeg oprettede?

Hedder: "Med counter, men hvordan kan man ellers lave det???? 100"

Så svar kom lige med et svar der......