ASP - hvad er galt her??

Ja, hvad er der galt her?
Koden får IIS til at gå ned............
<%
Set rs = conn.execute(\"select count(ID) as count from t_fisk\")
Randomize
StrInt = Int(rnd * rs(\"count\"))
If strInt > rs(\"count\") -5 Then
strInt = strInt - 1
elseif strInt = 0 then
strInt = strInt + 1
end if
    set rs2 = conn.execute(\"select * from t_fisk\")
    rs2.move(strInt)
%>