selected a un combo

[lf_sanchez]

Objeto Select (Combobox)
Tengo un objeto select

<select name="cmb_Categoria" id="cmb_Categoria" style="font-size:10px" >
<%
While NOT Categoria.EOF %>
<option value="<% Response.Write((Categoria.Fields("codigo"))) %>"
<%
if len(df_Categoria) > 0 AND Categoria.Fields.Item("codigo") = df_Categoria then
Response.Write("SELECTED")
Else
Response.Write("")
End if %>>
<% Response.Write((Categoria.Fields("glosa")))%>
</option>
<%
Categoria.MoveNext()
Wend
Categoria.Close()
Set Categoria = Nothing
%>
</select>

Como ven se puebla dinamicamente de una tabla de la base de datos.
MI pregunta esta en que como hacer para que quede selecionado en combo en el texto asignado por un objeto input text que tiene el texto del combo que quiere que quede seleccionado.
<input type="radio" name="radiobutton" value="radiobutton" onClick="document.frm_Clasifica.df_Codigo.value='< %=Clasifica.Fields("codigo")%>';
document.frm_Clasifica.df_Glosa.value='<%=Clasific a.Fields("glosa")%>';
document.frm_Clasifica.df_Categoria.value='<%=Resp onse.Write((Clasifica.Fields("categoria")))%>';
document.frm_Clasifica.df_Desc_Categoria.value='<%
=Response.Write((Clasifica.Fields("d_categoria"))) %>';
-----------------------------------------------
Esta Asignacion no me funciona, el listbox queda en blanco

document.frm_Clasifica.cmb_Categoria.value='<%
=Response.Write((Clasifica.Fields("d_categoria"))) %>';

----------------------------------------------

document.frm_Clasifica.df_Orden.value='<%=Clasific a.Fields("orden_impresion")%>';"
>

Ayuda por favor

[Mickel]

debes usar listindex, no value, con los select. Si no sabes como, pregunta y te buscamos un ejemplo...

[Kaopectate]

Hola lf_sanchez.

MI pregunta esta en que como hacer para que quede selecionado en combo en el texto asignado por un objeto input text que tiene el texto del combo que quiere que quede seleccionado.

Sería bueno que describieras un poquito mejor tu problema para ayudarte. Sin embargo, si lo que deseas es seleccionar dentro de un select el que mas acerque a lo escrito en un text, entonces revisa el FAQ-60 el cual es una aproximación a ese problema.

Si no es eso lo que necesitas, aún necesitamos saber si tu problema se resuelve con JavaScript o con ASP, asi que por favor, explícanos de nuevo para poder actuar.

Saludos.

[nachohuerta]

Ya paso buen tiempo...

aunque creo que esto es mas para ASP.
Creo que podrias hacer algo asi para que no te compliques..



<select name="cmb_Categoria" id="cmb_Categoria" style="font-size:10px" >
<%
While NOT Categoria.EOF %>

<%
if len(df_Categoria) > 0 AND Categoria.Fields.Item("codigo") = df_Categoria then
%>
<option value="<% Response.Write((Categoria.Fields("codigo"))) %>" selected> <% Response.Write((Categoria.Fields("glosa")))%> </option>
<%else%>
<option value="<% Response.Write((Categoria.Fields("codigo"))) %>" selected> <% Response.Write((Categoria.Fields("glosa")))%> </option>
<%end if%>
<%
Categoria.MoveNext()
Wend
Categoria.Close()
Set Categoria = Nothing
%>
</select>

[nachohuerta]

Ya paso buen tiempo...

aunque creo que esto es mas para ASP.
Creo que podrias hacer algo asi para que no te compliques..



<select name="cmb_Categoria" id="cmb_Categoria" style="font-size:10px" >
<%
While NOT Categoria.EOF %>

<%
if len(df_Categoria) > 0 AND Categoria.Fields.Item("codigo") = df_Categoria then
%>
<option value="<% Response.Write((Categoria.Fields("codigo"))) %>" selected> <% Response.Write((Categoria.Fields("glosa")))%> </option>
<%else%>
<option value="<% Response.Write((Categoria.Fields("codigo"))) %>" > <% Response.Write((Categoria.Fields("glosa")))%> </option>
<%end if%>
<%
Categoria.MoveNext()
Wend
Categoria.Close()
Set Categoria = Nothing
%>
</select>