Hente værdier fra database

JEg henter fra min database sådan:

SQL = "Select * from bogliste Order by titel Asc"
Set rs = Conn.Execute(SQL)
vur = rs("vur")
Response.Write "<table border='0px' cellspacing='0px' width='500px' style='border-collapse:collapse;'>"
Response.Write "<tr><td><span class='style3'><b>Titel</b></span></td><td><span class='style3'><b>Forfatter</b></span></td><td><span class='style3'><b>Vurdering</b></span></td></tr>"
Do
Response.Write "<tr>"
Response.Write "<td style='border-top:1px dotted; border-bottom:1px dotted; border-left:1px dotted; width:200; '><span class='style3'>"
Response.Write rs("titel")
Response.Write "</span></td><td style='border-top:1px dotted; border-bottom:1px dotted; border-left:1px dotted; width:200; '><span class='style3'>"
Response.Write rs("forf")
Response.Write "</span></td><td style='border-top:1px dotted; border-bottom:1px dotted; border-left:1px dotted; width:200; '>"
for t = 1 to vur
    Response.Write "<img src=""images/stjerne.jpg"" height=""12px"">"
next
Response.Write "</td></tr>"
rs.MoveNext

' Fortsæt indtil rs er gennemløbet (EOF = End Of File)
Loop While Not rs.EOF
Response.Write "</table>"
Conn.Close
Set Conn = Nothing

Men ligemeget hvad min værdi er i vur i databasen så laver den altid kun 4 <img src=""images/stjerne.jpg"" height=""12px"">.. Hvis jeg istedet bare siger den skal skrive tal kan den godt finde ud af det.. :-S JEg ved ikke hvad fejlen er?! Om den ligger i min løkke eller?!
Håber nogen kan se fejlen...