[Resolvido] Consulta com opção "todos"

Boa tarde moçada!

Estou fazendo uma consulta que tem a opção "Todos os médicos" mas não está funcionando. Quando escolho um dos médicos vai, mas do contrário não... Não dá erro, mas exibe um nome só e com dados incorretos.

Código do form:

<td width="100%"><form action="AG_selectVisitas_MedicoPeriodo2.asp" method="post" name="form" id="form">
 <div align="center">
 <center>
 <table width="293" border="0" cellpadding="0" class="style9">
 <tr>
 <td height="14" colspan="4"><div align="left">Médico
 <input type="hidden" name="cod_vendedor" value="<%=cod_vendedor%>" />
 </div></td>
 </tr>
 <tr>
 <td height="27" colspan="4" valign="bottom"><div align="left">
 <select name="nome_medico" id="nome_medico">
 <option value="0">------------ Todos os médicos ------------</option>
 <%Do while not rs.eof%>
 <option value="<%=rs("nome_agenda")%>"><%=rs("nome_agenda")%>
 <%
 rs.movenext
 Loop

 end if
 %>
 </option>
 </select>
 </div></td>

Código da listagem:

<%
cod_usuario = session("cod_usuario")
medico = Request.Form("nome_medico")
data1 = Request.Form("data_inicio")
data2 = Request.Form("data_fim")
data1 = data1&" 00:00"
data2 = data2&" 23:59"

if medico = "0" then

	sql = "set dateformat dmy select * from tab_agenda WHERE tab_usuario_cod_usuario='"&cod_usuario&"' AND data_agenda >='" & data1 & "' AND data_agenda <= '" & data2 & "' order by data_agenda ASC"
	set rs = conexaoDB.execute(sql)

	else

	sql = "set dateformat dmy select * from tab_agenda WHERE tab_usuario_cod_usuario='"&cod_usuario&"' AND nome_agenda='"&medico&"' AND data_agenda >='" & data1 & "' AND data_agenda <= '" & data2 & "' order by data_agenda ASC"
	set rs = conexaoDB.execute(sql)

end if

Session("sql") = ""
Session("sql") = sql
E exibe assim:

<td width="216" valign="top"><font color="#4770BF"><strong>
 <%if not rs.eof then
	response.write(rs("nome_agenda"))

end if%>

 <td><div align="center"><font color="#4770BF"><strong>

 <%if not rs.eof then
	response.write(rs("local_agenda"))
end if%></strong></font></div></td>

 <td valign="top"> <%if not rs2.eof then
	response.write(rs2("conta"))
end if%>	</td>
 <td valign="top"><%if not rs3.eof then
	response.write(rs3("conta2"))
end if%></td>
 <td valign="top"><%if not rs4.eof then
	response.write(rs4("conta3"))
end if%></td>

Alguém pode me ajudar?