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

Tablas Dinamicas ASP y sql server 2000

Estas en el tema de Tablas Dinamicas ASP y sql server 2000 en el foro de ASP Clásico en Foros del Web. Hola saludos a todos soy nuevo en el foro como usuario pero no como visitante ya que e visto muchas cosas aca que me han ...
  #1 (permalink)  
Antiguo 22/03/2009, 20:05
Avatar de TonyChile  
Fecha de Ingreso: marzo-2009
Ubicación: Maipú, Santiago
Mensajes: 422
Antigüedad: 16 años, 1 mes
Puntos: 7
Tablas Dinamicas ASP y sql server 2000

Hola saludos a todos soy nuevo en el foro como usuario pero no como visitante ya que e visto muchas cosas aca que me han servido en anteriores ocaciones.
Pero ahora estoy en un problema y necesito ayuda urgente para sacar un trabajo adelante. Les cuento lo que necesito es poder hacer una seleccion de unas combobox en este caso 3 las cuales son de la misma tabla de sql server 2000, necesito que si se selecciona una de ellas las siguientes tomen la informacion de la primera y muestren los datos correlativos de esta.
Despues al haber realizado la seleccion en las combobox poder apretar un boton buscar el cual muestre en una tabla de la misma pagina lo seleccionado.
Si no se selecciona nada que muestre la tabla todos los datos sin filtrar (eso ya lo hace), los datos de las combobox (tambien estan visibles para su seleccion) el problema es que no se como poder hacer que al presionar el boton buscar se pueda mostrar la seleccion y mostrar los datos en la tabla, tampoco me a funcionado poder limpiar las combobox y que se muestre SELECCIONAR esos son mis 2 problemas . Ya llevo un tiempo viendo y no se me ocurre nada talvez no sea la gran cosa pero no se me ocurre como hacerlo.

De ante mano muchas gracias. y disculpen las molestias

este es el codigo de las combobox, el boton buscar y limpiar

Código:
<table name="tabla" width="250px" class="fondo_table3">
	<tr><td colspan=6 class="titulo"></td></tr>
	<tr><td colspan="6" height=4></td></tr>
   
   <tr>
			<td width="20%" nowrap class="text_black_bold_12">&nbsp;<strong>N&uacute;mero De Serie&nbsp;</strong></td>
			<td colspan="3"> 
			  <select name="CCserie" id="NUM_SERIE" class="combo">
              <option value = "0" selected>Seleccionar&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;</option>
              <%
			  While (not reg4.EOF) 
			  %>
              <option value="<%=(reg4.Fields.Item("NUM_SERIE").Value)%>"><%=(reg4.Fields.Item("NUM_SERIE").Value)%></option>
              <% 
              reg4.MoveNext 
              wend
			  %> 
			  </select>		  
		  </td>			  
  </tr>
  
  <tr>
			<td class="text_black_bold_12" width="20%" nowrap>&nbsp;<strong>Tel&eacute;fono</strong>&nbsp;</td>
			<td colspan="3"> 
			  <select name="CCequipo" id="EQUIPO" class="combo">
              <option value="0" selected>Seleccionar&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;</option>
              <%
			  While (not reg5.EOF)
			  %>
              <option value="<%=(reg5.Fields.Item("EQUIPO").Value)%>"><%=(reg5.Fields.Item("EQUIPO").Value)%></option>
              <%
			  reg5.Movenext
			  wend
			  %>             
              </select>		  
		  </td>			  
  </tr>
     
  <tr> 
			<td class="text_black_bold_12" width="20%" nowrap>&nbsp;<strong>Modelo</strong>&nbsp;</td>
			<td colspan="3"> 
			  <select name="CCmodelo" id="MODELO" class="combo">
			  <option value="0" selected>Seleccionar&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;</option>
              <%
			  While (not reg6.EOF)
			  %>
              <option value="<%=(reg6.Fields.Item("MODELO").Value)%>"><%=(reg6.Fields.Item("MODELO").Value)%></option>
              <%
			  reg6.Movenext
			  wend
			  %> 
              </select>		  
		  </td>			  
  </tr>
  
  <tr><td colspan="6" width="100%">&nbsp;</td></tr>
	<tr>
		<td colspan="6" align="center">
			<input type=button name="CCbuscar" value="Buscar" class="botton80x23" onClick="buscar()">&nbsp;&nbsp;&nbsp;
			<input type=button name="CClimpiar" value="Limpiar" class="botton80x23" onClick="limpiar()">	
		</td>
	</tr>
	<tr><td colspan="6">&nbsp;</td></tr>
  
</table>
y aca el del llenado de la tabla

Código:
SQL4= "SELECT  MAC, PIN, ACCESORIOS, FECHA_ENTREGA_CELULAR, FECHA_RETIRO_CELULAR, ASIGNADO, NO_ASIGNADO, NOTAS from CELULAR"

  if MAC ="" then
      var1=""
  end if
  
  if PIN ="" then
      var2=""
  end if
  
  if ACCESORIOS="" then
      var3=""
  end if
  
  if FECHA_ENTREGA_CELULAR="" then
      var4=""
  end if
  
  if FECHA_RETIRO_CELULAR="" then
      var5=""
  end if
  
  if ASIGNADO="" then
      var6=""
  end if
  
  if NO_ASIGNADO="" then
      var7=""
  end if
  
  if NOTAS="" then
      var8=""
  end if	  	  	  	  	  	  	  

set rs3 = Server.CreateObject("ADODB.Recordset")   
				 rs3.CursorType = adOpenStatic
	             rs3.CursorLocation = 3
				 rs3.open sql4,conecta
				 rs3.pagesize=1000000
				 tamPagina = rs3.pagesize
				 PaginasTotales=rs3.PageCount
                 'If rs3.EOF = True Then 
%>
                 
<table align="center" width="250" border="0">
  <tr>
   <td width="240" align="center" class="texto_negro Estilo1"><span class="Estilo2">Cantidad de Registros:</span> <%=RS3.RecordCount%>  </td>
  </tr>
</table>
                   <% 'response.End
				   'end if 
				   %>

<p>&nbsp;</p>
<table width="980" height="35" border="2" align="center" cellpadding = 3 cellspacing = 0 bordercolor="#000000" class="dropmenusimple"  style="BORDER-COLLAPSE: collapse">
  <tr bordercolor="#000000">
    <td width="90"  height="35" nowrap class="titulo_table4"><div align="center"><strong>Mac</strong></div></td>
    <td width="50"  height="35" nowrap class="titulo_table4"><div align="center"><strong>Pin</strong></div></td>
    <td width="200" height="35" nowrap class="titulo_table4"><div align="center"><strong>Accesorios</strong></div></td>
    <td width="90"  height="35" nowrap class="titulo_table4"><div align="center"><strong>Fecha Entrega Celular</strong></div></td>
    <td width="90"  height="35" nowrap class="titulo_table4"><div align="center"><strong>Fecha Retiro Celular</strong></div></td>
    <td width="150" height="35" nowrap class="titulo_table4"><div align="center"><strong>Asignado</strong></div></td>
    <td width="150" height="35" nowrap class="titulo_table4"><div align="center"><strong>No Asignado</strong></div></td>
    <td width="300" height="35" nowrap class="titulo_table4"><div align="center"><strong>Notas</strong></div></td>
  </tr>
  
<%
   Do While Not rs3.EOF 
      var1 = rs3(0)
	  var2 = rs3(1)
	  var3 = rs3(2)
	  var4 = rs3(3)
	  var5 = rs3(4)
	  var6 = rs3(5)
	  var7 = rs3(6)
	  var8 = rs3(7)
      
%>  
    
  <tr align=right valign="middle">
	  <td width="10%" height="35"  align=left nowrap bordercolor="#000000" class="texto_negro"><%=var1%></td>
	  <td width="6%"  height="35"  align=left nowrap bordercolor="#000000" class="texto_negro"><%=var2%></td>
	  <td width="20%" height="35"  align=left nowrap bordercolor="#000000" class="texto_negro"><%=var3%></td>
	  <td width="8%"  height="35"  align=left nowrap bordercolor="#000000" class="texto_negro"><%=var4%></td>
      <td width="8%"  height="35"  align=left nowrap bordercolor="#000000" class="texto_negro"><%=var5%></td>
	  <td width="14%" height="35"  align=left nowrap bordercolor="#000000" class="texto_negro"><%=var6%></td>
	  <td width="14%" height="35"  align=left nowrap bordercolor="#000000" class="texto_negro"><%=var7%></td>
      <td width="25%" height="35"  align=left nowrap bordercolor="#000000" class="texto_negro"><%=var8%></td>
 </tr>
  
<%
							
  		   rs3.movenext
           Loop 
 
           rs3.Close    
           Conecta.Close	
%>
</table>
  #2 (permalink)  
Antiguo 22/03/2009, 20:11
Avatar de TonyChile  
Fecha de Ingreso: marzo-2009
Ubicación: Maipú, Santiago
Mensajes: 422
Antigüedad: 16 años, 1 mes
Puntos: 7
Respuesta: Tablas Dinamicas ASP y sql server 2000

Se me olvido indicar que para programar estoy usando dreamweaver cs3, bueno ASP y sql server 2000.
Que esten bien
  #3 (permalink)  
Antiguo 06/04/2009, 09:04
Avatar de TonyChile  
Fecha de Ingreso: marzo-2009
Ubicación: Maipú, Santiago
Mensajes: 422
Antigüedad: 16 años, 1 mes
Puntos: 7
Respuesta: Tablas Dinamicas ASP y sql server 2000

Ahora lo he intentado de la siguiente forma sin obtener aun resultados.

Código asp:
Ver original
  1. <table name="tabla" width="352" class="fondo_table3">
  2. <tr><td colspan=6 class="titulo"></td></tr>
  3.     <tr><td colspan="6" height=4></td></tr>
  4.    
  5.   <tr>
  6.             <td class="text_black_bold_12" width="30%" nowrap>&nbsp;<strong>Tel&eacute;fono</strong>&nbsp;</td>
  7.             <td colspan="3">
  8.             <%
  9.            
  10.             SQL3 = "SELECT distinct EQUIPO"
  11.             SQL3 = SQL3 & " FROM CELULAR "
  12.             Set reg4 = conecta.Execute(SQL3)                   
  13.             %>
  14.                        
  15.               <select name="CCequipo" id="EQUIPO" class="combo" OnChange="ComponerLista (document.forms.CC.CCequipo.value);">
  16.               <option value="0" selected>Seleccionar</option>
  17.               <%
  18.               if Not reg4.Eof then
  19.                     noRecord = 1
  20.                     While (not reg4.EOF)
  21.                       %>
  22.                       <option value="<%=(reg4.Fields.Item("EQUIPO").Value)%>"><%=(reg4.Fields.Item("EQUIPO").Value)%></option>
  23.                       <%
  24.                     reg4.Movenext
  25.                     wend
  26.               else
  27.                     noRecord = 0   
  28.                      %>    
  29.               <%end if
  30.                 reg4.Close
  31.               %>                
  32.               </select>      
  33.           </td>          
  34.   </tr>
  35.  
  36.   <tr>
  37.       <td width="30%">
  38.         <strong>Modelo:</strong></td>
  39.        
  40.     <td width="71%">           
  41.             <Select Name="CCmodelo" style="display:none">              
  42.             </Select>  
  43.             <INPUT
  44.             TYPE="TEXT"
  45.             NAME="modelo"
  46.             SIZE="1"
  47.             maxlength="10"
  48.             value="ninguno"
  49.             style="display:none"
  50.             >          
  51.     </td>
  52.     </tr>
  53.  
  54.   <tr>
  55.         <td width="30%">
  56.           <strong>N&uacute;mero De Serie:</strong></td>
  57.        
  58.         <td width="71%">           
  59.             <Select Name="CCserie" style="display:none">               
  60.             </Select>  
  61.             <INPUT
  62.             TYPE="TEXT"
  63.             NAME="serie"
  64.             SIZE="1"
  65.             maxlength="15"
  66.             value="ninguno"
  67.             style="display:none"
  68.             >      
  69.     </td>
  70.   </tr>
  71.   <tr><td colspan="6" width="100%">&nbsp;</td></tr>
  72.     <tr>
  73.         <td colspan="6" align="center"><input type="button" name="CCbuscar" value="Buscar" class="botton80x23" onClick="sql3">&nbsp;&nbsp;&nbsp;
  74.             <input type="button" name="CClimpiar" value="Limpiar" class="botton80x23" onClick="BorrarLista()"> 
  75.         </td>
  76.     </tr>
  77.     <tr><td colspan="6">&nbsp;</td></tr>
  78.  
  79. </table>

La idea es que se muestre la primera combobox y al seleccionar una de opcion de esta se despliege la 2 combobox en consecuencia de las opcion antes seleccionada y asi sucesivamente.

Espero que me puedan ayudar
  #4 (permalink)  
Antiguo 06/04/2009, 11:43
Avatar de Adler
Colaborador
 
Fecha de Ingreso: diciembre-2006
Mensajes: 4.671
Antigüedad: 18 años, 4 meses
Puntos: 126
Respuesta: Tablas Dinamicas ASP y sql server 2000

Hola

Cita:
Iniciado por TonyChile Ver Mensaje
La idea es que se muestre la primera combobox y al seleccionar una de opcion de esta se despliege la 2 combobox en consecuencia de las opcion antes seleccionada y asi sucesivamente.

Espero que me puedan ayudar
Estás hablando de select dependientes

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 06/04/2009, 12:22
Avatar de TonyChile  
Fecha de Ingreso: marzo-2009
Ubicación: Maipú, Santiago
Mensajes: 422
Antigüedad: 16 años, 1 mes
Puntos: 7
Respuesta: Tablas Dinamicas ASP y sql server 2000

Creo que me sera de utilidad gracias Adler
lo voy a ver lo malo es que no manejo nada de ajax pero lo voy a tratar de acomodar
para que me resulte

si me resulta lo publico aca

Última edición por TonyChile; 06/04/2009 a las 13:01
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 12:46.