hvis ikke lidt så MEGET tricky

Her er en opskrift (ikke testet):

<script type="text/javascript">
function hiliterow(r) {
document.getElementById(r).style.backgroundColor="#f0d0d0"
}
function loliterow(r) {
document.getElementById(r).style.backgroundColor="#ffffff"
}
</script>
<table>
<%
dim rownbr : rownbr=0
do
rownbr=rownbr+1
%>
<tr id="<%=rownbr%>">
  <td onmouseover="hiliteRow(<%=rownbr%>)" onmouseout="loliteRow(<%=rownbr%>)">
  </td></tr>
<%
loop until rownbr=5
%>
</table>

hvor skal jeg sætte det ind ?

mit loop der laver rækker osv ser sådan ud
<% do while not rs.EOF %>
  <tr>
    <td width="38" height="19" align="center"><!--webbot bot="HTMLMarkup" startspan --><% if session("lvl") >= "3" then %>
<% if rs("billede") <> "" then
response.write "<a href=""?billede=" & rs("id") & """><img border=""1"" src=""" & rs("billede") & """ width=""10"" height=""10"" style=""color: rgb(0,0,0); border: 1px solid rgb(0,0,0)""></a>"%>
<%else%>
<small><font
    face="Arial">Intet</font></small>
<%end if%>
<% Else %>
<small><font
    face="Arial">Intet</font></small>
<% end if %><!--webbot
    bot="HTMLMarkup" endspan --></td>
    <td width="209" height="19" align="center"><p align="left"><small><font face="Arial"><!--webbot
    bot="HTMLMarkup" startspan --><%
if session("lvl") >= "3" then
if rs("mellemnavn") = null then
strNavn = rs("fornavn") & " " & rs("efternavn")
else
strNavn = rs("fornavn") & " " & rs("mellemnavn") & " " & rs("efternavn")
end if
If (Request.Cookies("stemt") = "") then
Response.Write StrNavn & "&nbsp;" & "(<b><a href=top.asp?action=addone&id=" & rs("ID") & "><font color=""#000000"">Stem</font></a></b>)"
Elseif (Request.Cookies("stemt") = "ja") then
Response.Write strNavn
end if
elseIF session("lvl") < "3" then
strNavn = rs("efternavn")
Response.Write strNavn
end if
%><!--webbot bot="HTMLMarkup" endspan --></font></small></td>
    <td width="68" height="19" align="center"><small><font face="Arial"><!--webbot
    bot="HTMLMarkup" startspan --><% if session("lvl") >= "2" then %>
<% if rs("alder") = 0 then
response.write "Ukendt"
else
response.write(rs("alder"))
end if%>
<% Else %>
<% Response.Write "X" %>
<% end if %><!--webbot bot="HTMLMarkup" endspan --></font></small></td>
    <td width="60" height="19" align="center"><small><font face="Arial"><!--webbot
    bot="HTMLMarkup" startspan --><% if session("lvl") >= "3" then %>
<% =rs("klasse")%>
<% Else %>
<% Response.Write "X" %>
<% end if %><!--webbot bot="HTMLMarkup" endspan --></font></small></td>
    <td width="60" height="19" align="center"><!--webbot bot="HTMLMarkup" startspan --><% if session("lvl") >= "3" then %>
<% =rs("stemmer")%>
<% Else %>
<% Response.Write "X" %>
<% end if %><!--webbot
    bot="HTMLMarkup" endspan --></td>
    <td width="60" height="19" align="center"><!--webbot bot="HTMLMarkup" startspan --><% if session("lvl") >= "3" then %>
<%= (rs("roev")+rs("patter")+rs("krop")+rs("cme"))/4%>
<% Else %>
<% Response.Write "X" %>
<% end if %><!--webbot
    bot="HTMLMarkup" endspan --></td>
    <td width="59" height="19" align="center"><small><font face="Arial"><!--webbot
    bot="HTMLMarkup" startspan --><% if session("lvl") >= "3" then %>
<% =rs("patter")%>
<% Else %>
<% Response.Write "X" %>
<% end if %><!--webbot bot="HTMLMarkup" endspan --></font></small></td>
    <td width="59" height="19" align="center"><small><font face="Arial"><!--webbot
    bot="HTMLMarkup" startspan --><% if session("lvl") >= "3" then %>
<% =rs("roev")%>
<% Else %>
<% Response.Write "X" %>
<% end if %><!--webbot bot="HTMLMarkup" endspan --></font></small></td>
    <td width="59" height="19" align="center"><small><font face="Arial"><!--webbot
    bot="HTMLMarkup" startspan --><% if session("lvl") >= "3" then %>
<% =rs("krop")%>
<% Else %>
<% Response.Write "X" %>
<% end if %><!--webbot bot="HTMLMarkup" endspan --></font></small></td>
    <td width="59" height="19" align="center"><small><font face="Arial"><!--webbot
    bot="HTMLMarkup" startspan --><% if session("lvl") >= "3" then %>
<% =rs("cme")%>
<% Else %>
<% Response.Write "X" %>
<% end if %><!--webbot bot="HTMLMarkup" endspan --></font></small></td>
    <td width="60" height="19" align="center"><small><font face="Arial"><!--webbot
    bot="HTMLMarkup" startspan --><% if session("lvl") >= "3" then %>
<% if rs("aksp") = 0 then
response.write "Ukendt"
else
response.write(rs("aksp"))
end if%>
<% Else %>
<% Response.Write "X" %>
<% end if %><!--webbot bot="HTMLMarkup" endspan --></font></small></td>
    <td width="101" height="19" align="center"><p align="left"><font face="Arial"><a
    href="top.asp?id=<%=rs("id")%>" style="color: rgb(0,0,0)"><!--webbot bot="HTMLMarkup"
    startspan --><% if session("lvl") >= "3" then %>
<small><font face="Arial"><span
style="color: rgb(0,0,0)"><%=left(rs("kommentar"),15)%></span></font></small>
<% Else %>
<% Response.Write "" %>
<% end if %><!--webbot bot="HTMLMarkup" endspan --></a></font></td>
  </tr>
<% rs.movenext %>
<%loop %>

nogen der kan hjælpe herfra ?

lader den lige stå en dag..

ups