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

Consulta desde Lista/Menu

Estas en el tema de Consulta desde Lista/Menu en el foro de ASP Clásico en Foros del Web. Saludos amigos, Quisiera hacer una Lista desplegable donde me muestra los registros de una Columna. y Además que al seleccionarla me refleje en un Campo ...
  #1 (permalink)  
Antiguo 14/03/2008, 11:37
Avatar de PedroJTR  
Fecha de Ingreso: febrero-2008
Ubicación: Guarenas, Venezuela
Mensajes: 116
Antigüedad: 16 años, 4 meses
Puntos: 1
Pregunta Consulta desde Lista/Menu

Saludos amigos,
Quisiera hacer una Lista desplegable donde me muestra los registros de una Columna. y Además que al seleccionarla me refleje en un Campo de Texto el registro de otra columna.
Como podría hacer eso?
  #2 (permalink)  
Antiguo 14/03/2008, 12:50
Avatar de Adler
Colaborador
 
Fecha de Ingreso: diciembre-2006
Mensajes: 4.671
Antigüedad: 17 años, 5 meses
Puntos: 126
Re: Consulta desde Lista/Menu

Hola

En cuanto al desplegable prueba esto
Código PHP:
<%
Dim Arr
SQL
="Select ...."
rs.Open SQLConn,3,3

   i
rs.Recordcount 
   
if Not(rs.eof) = True then    
      i
=
      rs
.MoveFirst 
          
Do while not rs.EOF 
               Arr
(i)= campo
         i
=i+1                
               rs
.MoveNext 
      Loop    
      rs
.movefirst 
   
else 
      
Arr(0) = "" 
   
end if 
%> 


   <
select name="cmbDes" id="cmbDes" 
                   <%for 
x=0 to Ubound(Arr) -%> 
                                <
option value="<%=Arr(x)%>"> <%=(Arr(x) & " - " Arr(x) & " - " Arr(x))%> </option
                          <%
next%> 
   </
select

Cita:
Iniciado por PedroJTR Ver Mensaje
Además que al seleccionarla me refleje en un Campo de Texto el registro de otra columna.
Como podría hacer eso?
¿Al seleccionar qué?

Suerte
__________________
Los formularios se envían/validan con un botón Submit
<input type="submit" value="Enviar" style="background-color:#0B5795; font:bold 10px verdana; color:#FFF;" />
  #3 (permalink)  
Antiguo 24/03/2008, 09:49
Avatar de PedroJTR  
Fecha de Ingreso: febrero-2008
Ubicación: Guarenas, Venezuela
Mensajes: 116
Antigüedad: 16 años, 4 meses
Puntos: 1
Pregunta Re: Consulta desde Lista/Menu

Cita:
Iniciado por Adler Ver Mensaje
Hola

En cuanto al desplegable prueba esto
Código PHP:
<%
Dim Arr
SQL
="Select ...."
rs.Open SQLConn,3,3

   i
rs.Recordcount 
   
if Not(rs.eof) = True then    
      i
=
      rs
.MoveFirst 
          
Do while not rs.EOF 
               Arr
(i)= campo
         i
=i+1                
               rs
.MoveNext 
      Loop    
      rs
.movefirst 
   
else 
      
Arr(0) = "" 
   
end if 
%> 


   <
select name="cmbDes" id="cmbDes" 
                   <%for 
x=0 to Ubound(Arr) -%> 
                                <
option value="<%=Arr(x)%>"> <%=(Arr(x) & " - " Arr(x) & " - " Arr(x))%> </option
                          <%
next%> 
   </
select

¿Al seleccionar qué?

Suerte
Al seleccionar una opcion de mi lista, la cual es un registro, que me muestre en un campo de texto el registro de otra columna.
  #4 (permalink)  
Antiguo 25/03/2008, 05:52
Avatar de Adler
Colaborador
 
Fecha de Ingreso: diciembre-2006
Mensajes: 4.671
Antigüedad: 17 años, 5 meses
Puntos: 126
Re: Consulta desde Lista/Menu

Hola, prueba así

Código PHP:
<form action="./resultado.asp" method="get">
<
select name="cmbDes" id="cmbDes" onchange="this.form.submit();"
<%for 
x=0 to Ubound(Arr) -%> 
                                <
option value="<%=Arr(x)%>"> <%=Arr(x)%> </option
                          <%
next%> 
   </
select>  
<
input type="submit" value="mostrar">
</
form
resultado.asp

Código PHP:
valor Request.QueryString("cmbDes")

SQL="SELECT * FROM tabla WHERE campo="&valor&"" 
Suerte
__________________
Los formularios se envían/validan con un botón Submit
<input type="submit" value="Enviar" style="background-color:#0B5795; font:bold 10px verdana; color:#FFF;" />
  #5 (permalink)  
Antiguo 25/03/2008, 08:53
Avatar de PedroJTR  
Fecha de Ingreso: febrero-2008
Ubicación: Guarenas, Venezuela
Mensajes: 116
Antigüedad: 16 años, 4 meses
Puntos: 1
Re: Consulta desde Lista/Menu

Cita:
Iniciado por Adler Ver Mensaje
Hola, prueba así

Código PHP:
<form action="./resultado.asp" method="get">
<
select name="cmbDes" id="cmbDes" onchange="this.form.submit();"
<%for 
x=0 to Ubound(Arr) -%> 
                                <
option value="<%=Arr(x)%>"> <%=Arr(x)%> </option
                          <%
next%> 
   </
select>  
<
input type="submit" value="mostrar">
</
form
resultado.asp

Código PHP:
valor Request.QueryString("cmbDes")

SQL="SELECT * FROM tabla WHERE campo="&valor&"" 
Suerte
No entiendo Adler,
Creo que no me supe explicar, sabes como en los formularios cuando te ponen a elegir tu ciudad, sabes que te colocan primero una lista con el pais, luego cuando la seleccionas, la otra cambia pero mostrandote los estados de ese pais, y luego otra se abre mostrandote las ciudades del estado que selecionaste en la lista anterior.

Bueno, quiero algo asi, pero con un campo de texto, que al seleccionar mi opcion de la lista en el campo de texto se refleje otro campo de la tabla.
Es algo asi, en la lista/menu tengo los nombres de los clientes y en el campo de texto se refleja el codigo, al seleccionar un cliente se refleje el codigo en el campo de texto, los cuales estan en una misma tabla.

Saludos,
Espero me puedas ayudar en esto amigo!
  #6 (permalink)  
Antiguo 25/03/2008, 08:58
Avatar de PedroJTR  
Fecha de Ingreso: febrero-2008
Ubicación: Guarenas, Venezuela
Mensajes: 116
Antigüedad: 16 años, 4 meses
Puntos: 1
Re: Consulta desde Lista/Menu

Código:
<form id="form1" name="form1" method="post" action="">
                <table width="507" border="0" cellpadding="1" cellspacing="2">
                  <tr>
                    <td colspan="8"><table width="100%" border="0" cellspacing="2" cellpadding="0">
                      <tr>
<td width="95%"><div align="right"><strong>CÓDIGO ORDEN</strong></div></td>
                        <td width="5%">
 
                            <div align="left"><strong>
<input name="id_orden" type="text" class="TEXT_AREA" id="id_orden" onkeyup="this.value=this.value.toUpperCase()" size="8" maxlength="15" readonly />
                            </strong></div></td>
                      </tr>
                    </table></td>
                    </tr>
                  <tr>
<td width="54" valign="top"><p align="left"><strong>CLIENTE </strong></p> </td>
                    <td width="419" colspan="7"><div align="left">
                      <table width="100%" border="0" cellspacing="2" cellpadding="0">
                        <tr>
                          <td><div align="left"><strong>
                                                        <select class="TEXT_AREA" name="nom_cte" id="id_serv">
                                                          <option>--Seleccione Cliente--</option>
                                                                                                                </select>
                                                        <br />
                            <br />
<input name="id_cte" type="text" class="TEXT_AREA" id="id_cte" onkeyup="this.value=this.value.toUpperCase()" size="21" maxlength="8" style="color:gray" onfocus="color(this,0,'COD. CLIENTE')" onblur="color(this,1,'COD. CLIENTE')" value="COD. CLIENTE"/>
                          </strong></div>                            <div align="left"></div></td>
                          </tr>
                      </table>
                      </div></td>
                  </tr><tr>
                      <td height="30" colspan="8">                                        <div align="center">
                        <label>                        </label>
                        <table width="100%" border="0" cellspacing="2" cellpadding="0">
                          <tr>
                            <td height="23" colspan="2" valign="top"><div align="center">
                              <table width="100%" border="0" align="center" id="base">
                                <tr class="celda">
<td width="18%" class="Estilo1" style="padding:3px;"><div align="center"><strong>CANTIDAD</strong></div></td>
<td width="24%" class="Estilo1" style="padding:3px;"><div align="center"><strong>SERVICIO</strong></div></td>
<td width="16%" class="Estilo1" style="padding:3px;"><div align="center" class="Estilo2">
                                      <p>GASTO</p>
                                  </div></td>
<td width="21%" class="Estilo1" style="padding:3px;"><div align="center"><strong>COSTO</strong></div></td>
<td width="19%" class="Estilo1" style="padding:3px;"><div align="center"><strong>TOTAL</strong></div></td>
                                </tr>
                                <tr id="example" class="celda">
                                  <td align="center" valign="middle">
                                    
                                        <div align="center">
<input name='cantidad' type='text' class="TEXT_AREA" id='cantidad' value="00" size="2" maxlength="2" style="color:gray" onfocus="color(this,0,'00')" onblur="color(this,1,00')"/>
                                          </div></td>
                                  <td align="center" valign="middle" style='padding:3px;'><div align="center">
                                      <select class="TEXT_AREA" name="id_serv" id="opera">
                                        <option>--Seleccione Servicio--</option>
</select>
                                  </div></td>
                                  <td align="center" valign="middle"><div align="center">
<input name='gasto' type='text' class="TEXT_AREA" id='gasto' size="5" maxlength="5" readonly="readonly"/>
                                  </div></td>
                                  <td align="center" valign="middle"><div align="center">
<input name='costo' type='text' class="TEXT_AREA" id='costo' size="5" maxlength="5" readonly="readonly"/>
                                  </div></td>
                                  <td align="center" valign="middle"><div align="center">
<input name='total' type='text' class="TEXT_AREA" id='total' size="5" maxlength="5" readonly="readonly"/>
                                      <input type="hidden" name="btnAction" value="next" />
                                  </div></td>
                                </tr>
                              </table>
<img src="imagenes/but_agregar.jpg" width="66" height="24" onClick="addNewRow(event)"/><img src="imagenes/but_eliminar.jpg" width="66" height="24" onclick="removeLastRow(event)"/>
                            </div></td>
                            </tr>
                          <tr>
                            <td height="14" valign="top">&nbsp;</td>
                            <td valign="bottom">&nbsp;</td>
                          </tr>
                          <tr>
                            <td width="19%" height="14" valign="top"><strong>OBSERVACIONES</strong></td>
                            <td width="81%" valign="bottom"><div align="left">
<textarea name="ob_oservicio" cols="45" rows="5" class="TEXT_AREA" id="ob_oservicio" onkeyup="this.value=this.value.toUpperCase()" value="OBSERVACIONES">
</textarea>
                            </div></td>
                          </tr>
                          <tr>
                            <td height="35" colspan="2" valign="bottom"><div align="center">
<input type="image" value="submit" name="entrar" src="imagenes/but_ingresarorden.jpg" id="entrar"/>
                            </div>
                              <div align="left"></div></td>
                            </tr>
                        </table>
                        <label></label>
                      </div>
                    </table>
                            </form>
Este es mi formulario,
Esta la lista de cliente, donde al seleccionarla quiero que en el campo de texto que esta abajo muestre el codigo de ese cliente que he seleccionado.
Luego esta la lista de SERVICIO, que al seleccionarla se reflejen en los campos de COSTO y GASTO sus respectivos registros.

Espero me puedas ayudar amigo...
  #7 (permalink)  
Antiguo 26/03/2008, 07:54
Avatar de Adler
Colaborador
 
Fecha de Ingreso: diciembre-2006
Mensajes: 4.671
Antigüedad: 17 años, 5 meses
Puntos: 126
Re: Consulta desde Lista/Menu

¿Será esto lo que quieres ?

La pagina se llama datos.asp

Código:
 Lo primero que has de hacer es recoger los valores del form
id_cliente = Request.Form("nom_cte")
servicios = Request.Form("id_serv")

Dim registros
Dim cliente ' de aquí para abajo son nombres ficticios de los campos de tu tabla
Dim serivio
Dim valor_cliente
Dim tipo_servicio
cliente = 0
servicio = 1
valor_cliente = 2
tipo_servicio = 3


Verificas el estado de los campos
IF IsEmpty(id_cliente) or IsEmpty(servicios) then 

SQL="SELECT * FROM tabla"  
rs.Open SQL ....

registros=rs.getrows

limpias rs y conexion

ELSE

SQL="SELECT * FROM tabla WHERE cliente ="&id_cliente&" and servicio ="&servicios&""  
rs.Open SQL ....

registros=rs.getrows

limpias rs y conexion
%>

<form id="form1" name="form1" method="post" action="./datos.asp">
                <table width="507" border="0" cellpadding="1" cellspacing="2">
                  <tr>
                    <td colspan="8"><table width="100%" border="0" cellspacing="2" cellpadding="0">
                      <tr>
<td width="95%"><div align="right"><strong>CÓDIGO ORDEN</strong></div></td>
                        <td width="5%">
 
                            <div align="left"><strong>
<input name="id_orden" type="text" class="TEXT_AREA" id="id_orden" onkeyup="this.value=this.value.toUpperCase()" size="8" maxlength="15" readonly />
                            </strong></div></td>
                      </tr>
                    </table></td>
                    </tr>
                  <tr>
<td width="54" valign="top"><p align="left"><strong>CLIENTE </strong></p> </td>
                    <td width="419" colspan="7"><div align="left">
                      <table width="100%" border="0" cellspacing="2" cellpadding="0">
                        <tr>
                          <td><div align="left"><strong>
                                                        <select class="TEXT_AREA" name="nom_cte" id="id_serv">
                                                        <option>--Seleccione Cliente--</option>
For i=0 to UBound(registros,2)
<%=registros(cliente,i)%>
Next 'i                                                                                                                </select>
                                                        <br />
                            <br />
<%
IF IsEmpty(id_cliente) then 
%>
<input name="id_cte" type="text" class="TEXT_AREA" id="id_cte" onkeyup="this.value=this.value.toUpperCase()" size="21" maxlength="8" style="color:gray" onfocus="color(this,0,'COD. CLIENTE')" onblur="color(this,1,'COD. CLIENTE')" value=""/>
<%
ELSE
<input name="id_cte" type="text" class="TEXT_AREA" id="id_cte" onkeyup="this.value=this.value.toUpperCase()" size="21" maxlength="8" style="color:gray" onfocus="color(this,0,'COD. CLIENTE')" onblur="color(this,1,'COD. CLIENTE')" value="<%=registros(valor_cliente)%>"/>
<%
END IF
%>
                          </strong></div>                            <div align="left"></div></td>
                          </tr>
                      </table>
                      </div></td>
                  </tr><tr>
                      <td height="30" colspan="8">                                        <div align="center">
                        <label>                        </label>
                        <table width="100%" border="0" cellspacing="2" cellpadding="0">
                          <tr>
                            <td height="23" colspan="2" valign="top"><div align="center">
                              <table width="100%" border="0" align="center" id="base">
                                <tr class="celda">
<td width="18%" class="Estilo1" style="padding:3px;"><div align="center"><strong>CANTIDAD</strong></div></td>
<td width="24%" class="Estilo1" style="padding:3px;"><div align="center"><strong>SERVICIO</strong></div></td>
<td width="16%" class="Estilo1" style="padding:3px;"><div align="center" class="Estilo2">
                                      <p>GASTO</p>
                                  </div></td>
<td width="21%" class="Estilo1" style="padding:3px;"><div align="center"><strong>COSTO</strong></div></td>
<td width="19%" class="Estilo1" style="padding:3px;"><div align="center"><strong>TOTAL</strong></div></td>
                                </tr>
                                <tr id="example" class="celda">
                                  <td align="center" valign="middle">
                                    
                                        <div align="center">
<input name='cantidad' type='text' class="TEXT_AREA" id='cantidad' value="00" size="2" maxlength="2" style="color:gray" onfocus="color(this,0,'00')" onblur="color(this,1,00')"/>
                                          </div></td>
                                  <td align="center" valign="middle" style='padding:3px;'><div align="center">
                                      <select class="TEXT_AREA" name="id_serv" id="opera">
                                        <option>--Seleccione Servicio--</option>
For z=0 to UBound(registros,2)
<%=registros(servicio,z)%>
Next 'z   
</select>
                                  </div></td>
                                  <td align="center" valign="middle"><div align="center">
<%
IF IsEmpty(servicios) then 
%>
<input name='gasto' type='text' class="TEXT_AREA" id='gasto' size="5" maxlength="5" value="<%=registros(tipo_servicio)%>" readonly="readonly"/>
<%
ELSE
%>
<input name='gasto' type='text' class="TEXT_AREA" id='gasto' size="5" maxlength="5" value="<%=registros(tipo_servicio)%>" readonly="readonly"/>
<%
END IF
%>
                                  </div></td>
                                  <td align="center" valign="middle"><div align="center">
<input name='costo' type='text' class="TEXT_AREA" id='costo' size="5" maxlength="5" readonly="readonly"/>
                                  </div></td>
                                  <td align="center" valign="middle"><div align="center">
<input name='total' type='text' class="TEXT_AREA" id='total' size="5" maxlength="5" readonly="readonly"/>
                                      <input type="hidden" name="btnAction" value="next" />
                                  </div></td>
                                </tr>
                              </table>
<img src="imagenes/but_agregar.jpg" width="66" height="24" onClick="addNewRow(event)"/><img src="imagenes/but_eliminar.jpg" width="66" height="24" onclick="removeLastRow(event)"/>
                            </div></td>
                            </tr>
                          <tr>
                            <td height="14" valign="top">&nbsp;</td>
                            <td valign="bottom">&nbsp;</td>
                          </tr>
                          <tr>
                            <td width="19%" height="14" valign="top"><strong>OBSERVACIONES</strong></td>
                            <td width="81%" valign="bottom"><div align="left">
<textarea name="ob_oservicio" cols="45" rows="5" class="TEXT_AREA" id="ob_oservicio" onkeyup="this.value=this.value.toUpperCase()" value="OBSERVACIONES">
</textarea>
                            </div></td>
                          </tr>
                          <tr>
                            <td height="35" colspan="2" valign="bottom"><div align="center">
<input type="image" value="submit" name="entrar" src="imagenes/but_ingresarorden.jpg" id="entrar"/>
                            </div>
                              <div align="left"></div></td>
                            </tr>
                        </table>
                        <label></label>
                      </div>
                    </table>
                            </form>
Suerte
__________________
Los formularios se envían/validan con un botón Submit
<input type="submit" value="Enviar" style="background-color:#0B5795; font:bold 10px verdana; color:#FFF;" />
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 17:47.