Skriv ingen data hvis db er tom

If rs.EOF or rs.BOF Then
  Response.Write("ingen data")
End If

skal den ind her:

<%
bgskift=0
do while not RS.EOF
bgskift=bgskift + 1

if bgskift = 2 then
bgskift = 0
end if

if bgskift = 0 then
color="bgcolor='#eeeeee'"
else
color="bgcolor='#ffffff'"
end if
%>

eller i selve sql stringen i toppen

<%
If rs.EOF or rs.BOF Then
  Response.Write("ingen data")
Else
  bgskift=0
  do while not RS.EOF
    bgskift=bgskift + 1

    if bgskift = 2 then
      bgskift = 0
    end if

    if bgskift = 0 then
      color="bgcolor='#eeeeee'"
    else
      color="bgcolor='#ffffff'"
    end if
  rs.movenext
  loop
End If
%>