Ver Mensaje Individual
  #1 (permalink)  
Antiguo 22/03/2009, 20:05
Avatar de TonyChile
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>