LISTAS desplegables (selects)

[rrufo]

Ami si q me funciona.
tienes razon el lo q dices,
pero creo q ejecutas el codigo asp y luego se lo mandass al cliente.

Este es el codigo definitivo, no he podido arreglar lo del parametro pero fuciona.
en asp facil enconrasras un ejemplo parecido.
pero con otro tipo de conexion de datos
--------------------------------------------

<SCRIPT LANGUAGE="Javascript">
function Reselect(fabrica)

{
Listas.Productos.length=0;
<%
set Marca = Server.CreateObject("ADODB.Recordset")
Marca.ActiveConnection = MM_Empresas_STRING
Marca.Source = "SELECT * FROM FS WHERE Denominacion <> '' ORDER BY Marca ASC"
Marca.CursorType = 0
Marca.CursorLocation = 2
Marca.LockType = 3
Marca.Open()
Marca_numRows = 0
%>

<%
While (NOT Marca.EOF)
%>

if (fabrica == "<%=(Marca.Fields.Item("Fabricante&qu ot;).Value)%>") {
var newElem = document.createElement("OPTION");
newElem.text = "<%=(Marca.Fields.Item("Marca"). Value)%>";
newElem.value = "<%=(Marca.Fields.Item("IdFS").V alue)%>";
document.forms("Listas").Productos.optio ns.add(newElem);
}
<%
Marca.MoveNext()
Wend
If (Marca.CursorType > 0) Then
Marca.MoveFirst
Else
Marca.Requery
End If
%>
}

</SCRIPT>
---------------------------------------------
este el la llamada
<select name="Categorias" size="10" onChange="Reselect (document.forms.Listas.Categorias[selectedIndex].value);">