Los Foros de ASPTutor.com
Home | Perfil | Registrarse | Temas Activos | Miembros | Buscar | FAQ
Usuario:
Password:
 Todos los Foros
 ADO
 Combo-box enlazados con BBDD
 Foro Bloqueado  Tema Bloqueado


Autor Temas
danimouse
Starting Member


19 Posts
Mensajes - 06 May 2003 :  10:56:52  Ver Perfil  Enviar Email
Hola que tal. Tengo un gran problema ya que estoy empezando y no sé mucho (por no decir nada) de javascript.
Entre los ejemplos de código de asp, hay uno en el que se enlazan dos combo-box con una base de datos. El ejemplo es el siguiente:
<html>
<head>
<script language = "JavaScript">
<%'CONSULTA PARA OBTENER LOS DATOS
Set Conn = Server.CreateObject("ADODB.Connection")
Conn.Open("DRIVER={Microsoft Access Driver (*.mdb)}; DBQ=" & Server.MapPath("\database\hard.mdb"))

productos_Sql = "Select distinct familia, codigo, denominacion from articulos "
set rs = CreateObject("ADODB.Recordset")
rs.Open productos_Sql, Conn
x=0
%>
// FUNCION DE COMBO BOX COMBINADO
function sublist(inform, selecteditem)
{
inform.subcatagory.length = 0
<%
count= 0
y=0
do while not rs.eof
%>
x = <%= trim(y) %>;
subcat = new Array();
subcatagorys = "<%=(rs("codigo"))&" "&(rs("denominacion")) %>";
subcatagoryof = "<%=(rs("familia"))%>";
subcatagoryid = "<%=(rs("codigo"))%>";
subcat[x,0] = subcatagorys;
subcat[x,1] = subcatagoryof;
subcat[x,2] = subcatagoryid;
if (subcat[x,1] == 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
rs.movenext
loop
rs.close
%>
}
</script>
</head>
<body bgcolor="#CDB1B7">
<h2 align="center"><b><i><font color="#AE1732"><u>Combo-box enlazados </u></font></i></b></h2>
<form name="prueba">
<div align="center">
<center>
<table border="0" width="80%">
<tr>
<td width="77%">
<select size="1" id="familia" name="familia" onChange = "javascript:sublist(this.form, familia.value);">
<option selected>Selecciona una familia</option>
<%familias_Sql = "Select distinct id,familia from familias"
rs.Open familias_Sql, Conn
do while not rs.eof
%>
<option value="<%=rs("id")%>"><%=rs("familia")%></option>
<%rs.movenext
loop
set rs=nothing
conn.close
set conn=nothing%>
</select>&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp; <SELECT id="subcatagory" name="subcatagory" size="1">
<Option selected value="none"></option>
</SELECT></td>
<td width="9%">
<p align="left">
</p>
</td>
</tr>
</table>
</center>
</div>
<center>
</form>
</center>
</body>
</html>
//////////////////////////////
El problema es que mi base de datos está de la siguiente manera:
TablaMarca: NombreMarca, CaracMarca, Foto
TablaSistema:NombreSistema,CaracSistema
TablaModelo:CodModelo,NombreMarca,NombreSistema.
Éstas son mis tres tablas y yo quiero tener dos combos. Uno para marcas y otro para sistemas de forma que me aparezcan todos los modelos de la marca y el sistema seleccionado.
Si alguien pudiera ayudarme se lo agradecería. Ya lo he intentado tó.
Gracias de antemano

nubeazul
Moderator


814 Posts
Posted - 15 May 2003 :  09:38:25  Ver perfil  Enviar e-mail  Visit nubeazul's Homepage
Pues solo modific el código para tus tablas

Nubeazul
Contruyendo un Mundo más Azul y HumanoInicio Pagina

   
 Foro Bloqueado  Tema Bloqueado
Ir a:
Los Foros de ASPTutor.com Los Foros de ASPTutor.com
Ir al principio de la Página

 Imprimir Tema
 

Descargas de manuales¦ Ejemplos de código ¦ Artículos mas visitados ¦ Envía tu articulo ¦ Foros ¦
  Libro de visitas ¦Crea un enlace con ASPTutor 
 

    © 2001-Hasta hoy  Pedro Rufo Martín  contactar