mejor pongo todo el codigo del formulario:
<form name="FormListEmbar" method="post" action="/Embar/FrameListEmbarDet.asp?CodConfr=<%=RstConfr("Id")%> ">
<p>
<select name="cboConf" class="CabezaTabla">
<%
Set RstConfr = server.CreateObject("ADODB.Recordset")
RstConfr.source="SELECT * FROM Confraria ORDER BY NomeConfra"
RstConfr.Cursortype=adOpenStatic
RstConfr.ActiveConnection="DSN=master;'';'';"
RstConfr.Open%>
<%If RstConfr.recordcount > 0 then
do while not RstConfr.eof
Response.write("<option value= " & RstConfr("Id") & ">" & RstConfr("NomeConfra") & "</option>")
RstConfr.movenext
loop
end if
RstConfr.Close
Set RstConfr=Nothing%>
</select>
<input name="Enviar" type="submit" id="Enviar" value="Enviar">
</form>