Random udtræk fra db

Jeg har forgæves forsøgt at lave et tilfældigt udtræk fra en database, nedenfor er den stump som gerne skulle trække et tilfældigt id fra databasen og lave et link til netop det id

<%
strSQL = "SELECT * FROM artikler WHERE ID = ("&_
    "SELECT Min(ID) FROM artikler WHERE ID >= (" &_
    "SELECT Round(CDbl(" & Replace(Rnd(),",",".") &_
    "*Max(ID))) FROM artikler))"
Set rs = objConn.Execute(strSQL)
response.write "<b>" & rs("overskrift") & "</B><br>" & rs("beskrivelse") & "<BR><BR><IMG SRC='img/punkt.gif' BORDER='0' WIDTH='6' HEIGHT='6' ALIGN='bottom' ALT=''> <a HREF='artikler/show.asp?id=" & rs("id") & "&cat=" & rs("kategori") & "'>" & rs("overskrift") & "</a><BR>"
%>


Er der nogen som kan se hvad der er galt, og ja databasen er åben

På forhånd tak

Morten