Que onda ciisteado mira no s eque tanto nivel tengas de programacion pero tratare de explicarte como si superas o.k y si no aqui te dejo mi correo ya que todavia no se como hacer que me lleguen las respuestas a mi correo electronico y no me doy cuanta de cuando responden
o.k vamos a empezar
Comentas que tienes dos tablas y que son con las que quieres hacer todo esto, pues bien es, vamos a empezar>
En la tabla CLIENTES me imagino que ya tienes un Campo para relacionar las teminales es decir
IdCliente Cliente Terminal
23 Paco de alba 1
34 Luis de garza 1
54 Pedro paramo 2
Bueno si ya tienes lo anterior mencionado entonces manos a la obra
mira la verdad no quisiera hacerte el codigo completo pero la verdad no me gustaria que cuando yo estuviera en apuros solamente me dieran las bases para hacerlo asi es que te lo voy a hacer de una forma y tu me dices si es asi o.k y claroq ue te lo voy a explicar
lo vamos ha hacer en dos dropdownList
en el primero que se llamara Idterminal y el segundo dropdownlist IdCliente
Solamente copia empezando desde la etiqueta <TABLE> y finaliza la copia en </TABLE>
cualquier duda aqui estoy
[email protected]
Código:
<table border="0" cellpadding="0" cellspacing="0" width="100%">
<form name="forma" method="post" action="esta-misma-pagina.asp">
<tr>
<td><select name="IdTerminal" onchange="document.forma.submit();">
<%sSql="SELECT IdTerminal, NombreTerminal FROM Terminales"
SET oTerminales = oConn.execute(sSql)
if oTerminales.EOF then
'Esto pasa en remotos casos cuando tengas problemas con la tabla TERMINALES,
'esto es para protegerte de que no funcione la pagina%>
<option value="">Por el momento no existen terminales</option>
<%else
While NOt oTerminales.EOF
iIdTerminal = oTerminales("IdTerminal")
sTerminal = oTerminales("NombreTerminal")%>
<option value="<%=iIdTerminal%>"><%=sTerminal%></option>
<%oTerminales.MoveNext
wend
end if%>
</select></td>
<td>
<%if iIdTerminal <> 0 then
sSql="SELECT IdCliente,NombreCliente FROM Clientes WHERE IdTerminal ="& iIdTerminal
SET oClientes = oConn.execute(sSql)
if oClientes.EOF then
'Esto pasa en remotos casos cuando tengas problemas con la tabla Clientes,
'esto es para protegerte de que no funcione la pagina
%>
<option value="">Por el momento no existen clientes para esta terminal</option>
<%else
While NOt oClientes.EOF
iIdCliente = oClientes("IdCliente")
sCliente = oClientes("NombreCliente")%>
<option value="<%=iIdCliente%>"><%=sCliente%></option>
<%
oClientes.MoveNext
wend
end if%>
</td>
</tr>
</form>
</table>