obtener valores de un combo

[AlZuwaga]

Lo que suelo hacer en estos casos es agregar la descripción del option al ID, separado por algún delimitador dentro del value. Luego, cuando lo recojo, lo separo mediante split y los manejo independientemente uno de otro. Así:



<Form Action=activa_encuesta.asp Method=Get>
<Select Name="Eleccion">
<%
Set conn = Server.CreateObject("ADODB.Connection")
conn.Open "DBQ=E:\Asp\Diagnostico\Menu\Diagnostico.mdb;Drive r={Microsoft Access Driver (*.mdb)}"
SQL = "Select * From encuesta"
Set rs = conn.Execute(SQL)
While Not rs.EOF
%>
<option value="<% = rs("id_encuesta") & "|" & rs("nombre") %>"><%=rs("nombre")%></option>
<%
rs.MoveNext
Wend
rs.Close
%>
</Select>
<input name="Activar" type="submit" id="Activar" value="Activar">
</FORM>



Y luego, en activa_encuesta.asp:

Eleccion = Split(Request("Eleccion"), "|")
id_encuesta = Eleccion(0)
nombre = Eleccion(1)