Problemer med én løkke

Jeg har lidt problemer med nedenstående løkke.

Nedenstående kode udskriver poster fra db i en tabel, hvor den første kolonne indeholder et link. Som det kan ses kommer linket kun i de poster hvor jeg ikke formaterer cellerne med variablen c2.

Hvordan får jeg løkken til at linke alle poster i første kolonnne inklusive dem jeg formaterer med variablen c2. Jeg kan ikke lige få det til at virke!!

c2 = "#CCFFFF"
c1 = "#FFFFFF"


For i = 0 to recordSet.Fields.Count -3
  if isnull(recordSet.Fields(7).value) and isnull(recordSet.Fields(8).value) then
      response.write vbTab & vbTab & "<td bgcolor=""" & c2 & """>" & recordSet.Fields(i) & "</td>" & vbCrLf
  else
    if i = 0 then
      response.write vbTab & vbTab & "<td bgcolor=""" & c1 & """><a href=""sendopg.asp?sagsnr=" & recordSet.Fields(i) & """>" & recordSet.Fields(i) & "</a></td>" & vbCrLf
    else
      response.write vbTab & vbTab & "<td bgcolor=""" & c1 & """>" & recordSet.Fields(i) & "</td>" & vbCrLf
    end if
  end if
NEXT

    response.write vbTab & "</tr>" & vbCrLf
    recordSet.Movenext
Loop