Foros del Web » Programando para Internet » ASP Clásico »

listbox ¿que hago?

Estas en el tema de listbox ¿que hago? en el foro de ASP Clásico en Foros del Web. <html> <head> <title>Prueba</title> <script language = "JavaScript"> <% dim conexion, consulta, record Set conexion = Server.CreateObject("ADODB.Connection") Set record = Server.CreateObject("ADODB.Recordset") conexion.Open "base","","" consulta = "SELECT ...
  #1 (permalink)  
Antiguo 21/10/2003, 06:49
 
Fecha de Ingreso: octubre-2003
Mensajes: 19
Antigüedad: 20 años, 8 meses
Puntos: 0
Exclamación listbox ¿que hago?

<html>
<head>
<title>Prueba</title>

<script language = "JavaScript">

<%
dim conexion, consulta, record
Set conexion = Server.CreateObject("ADODB.Connection")
Set record = Server.CreateObject("ADODB.Recordset")
conexion.Open "base","",""

consulta = "SELECT * FROM sucursal;"
set record = conexion.execute(consulta)
x=0
%>

// FUNCION DE COMBO BOX COMBINADO
function sublist(inform,selecteditem)
{
inform.subcatagory.length = 0
<%
count= 0
y=0
do while not record.eof
%>
x = <%=trim(y) %>;
subcat = new Array();
subcatagorys = "<%=(record("nom_sucursal"))%>";
subcatagoryof = "<%=(record("nom_sucursal"))%>";
subcatagoryid = "<%=(record("ide_empresa"))%>";
subcat[x,0] = subcatagorys;
subcat[x,1] = subcatagoryof;
subcat[x,2] = subcatagoryid;
if (subcat[x,2] == selecteditem)
{
var option<%=trim(count)%> = new Option(subcat[x,0],subcat[x,2]);
inform.subcatagory.options[inform.subcatagory.length]=option<%= trim(count)%>;
}
<%
count = count + 1
y = y + 1
record.movenext
loop
record.close
set record = nothing
conexion.close
set conexion = nothing
%>
}
</script>

</head>

<body>
<form name="form1">
<p>
<select size="1" id="nom_empresa" name="nom_empresa" onChange ="javascript:sublist(this.form,nom_empresa.value); ">
<option selected>Selecciona una Empresa</option>
<%
dim conexion2, consulta2, record2
Set conexion2 = Server.CreateObject("ADODB.Connection")
Set record2 = Server.CreateObject("ADODB.Recordset")
conexion2.Open "base","",""

consulta2 = "SELECT ide_empresa,nom_empresa FROM Empresa_orden;"
set record2 = conexion2.execute(consulta2)
do while not record2.eof
%>
<option value="<%=record2("ide_empresa")%>"><%=record2("no m_empresa")%></option>
<%
record2.movenext
loop
record2.close
set record2 = nothing
conexion2.close
set conexion2 = nothing%>
</select>
</p>
<p>
<SELECT id="subcatagory" name="subcatagory" size="1">
<Option selected value="subcatagory"></option>
</SELECT>

</p>
</form>
</body>
</html>
necesito ayuda urgente lo que pasa es que no se como guardar estos datos en la base de datos ya que el combobox enlazado me lo arroja la funcion javascript y no se que poner en la pagina insertar_datos.asp ya que el value dice "subcatagory" que hago.............
please ayuda


pd:esta funcion me la dieron aqui
__________________
:adios:
Atención: Estás leyendo un tema que no tiene actividad desde hace más de 6 MESES, te recomendamos abrir un Nuevo tema en lugar de responder al actual.
Respuesta




La zona horaria es GMT -6. Ahora son las 22:46.