Select con Where...

[Prefontaine]

<%
cLugar=request.form("Lugar")
cPrueba=request.form("Prueba")

Set rsdb = Server.CreateObject("ADODB.Recordset")

strSQL = "select atleta,marca,lugar,fecha,Posicion from rank_mundial_masc where Prueba= "&cPrueba&" AND Lugar= "&cLugar&""

rsdb.Open strSQL, Conn
%> <%if rsdb.eof then%>