Hola
yo aun sin poder hacer esto.
Paso a mostrar lo que tengo y explicar lo que necesito por si aun no se entiende.
Este la conexion con la base de datos sql server 2000
Código asp:
Ver original<script language="vbscript" runat="server">
dim conecta, rs4, reg7, reg8, reg9, sql5, sql6
set conecta=server.createobject("ADODB.connection")
cadenaconeccion="Provider=MSDASQL;Data Source=prueba"
conecta.connectionstring=cadenaconeccion
conecta.open
set reg7=server.createobject("ADODB.recordset")
sql5="select distinct EMPRESA from ID_USUARIO ORDER BY EMPRESA ASC "
reg7.activeconnection=conecta
reg7.open sql5
set reg8=server.createobject("ADODB.recordset")
sql5="select distinct PERFIL from ID_USUARIO ORDER BY PERFIL ASC"
reg8.activeconnection=conecta
reg8.open sql5
set reg9=server.createobject("ADODB.recordset")
sql5="select distinct USUARIO from ID_USUARIO ORDER BY USUARIO ASC"
reg9.activeconnection=conecta
reg9.open sql5
</script>
el Body
Código asp:
Ver original<body>
<form name="DD" method="post" action="">
<table name="tabla" width="250px" class="fondo_table5">
<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 Estilo3"> <strong>Empresa</strong></td>
<td colspan="3">
<select name="DDempresa" id="EMPRESA" class="combo">
<option value="0"selected>Seleccionar</option>
<%
While (not reg7.EOF)
%>
<option value="<%=(reg7.Fields.Item("EMPRESA").Value)%>"><%=(reg7.Fields.Item("EMPRESA").Value)%></option>
<%
reg7.Movenext
wend
%>
</select>
</td>
</tr>
<tr>
<td width="20%" nowrap class="text_black_bold_12 Estilo3"> <strong>Perfil</strong> </td>
<td colspan="3">
<select name="DDperfil" id="PERFIL" class="combo">
<option value="0"selected>Seleccionar</option>
<%
While (not reg8.EOF)
%>
<option value="<%=(reg8.Fields.Item("PERFIL").Value)%>"><%=(reg8.Fields.Item("PERFIL").Value)%></option>
<%
reg8.Movenext
wend
%>
</select>
</td>
</tr>
<tr>
<td width="20%" nowrap class="text_black_bold_12 Estilo3"> <strong>Usuario</strong> </td>
<td colspan="3">
<select name="DDusuario" id="USUARIO" class="combo">
<option value="0"selected>Seleccionar</option>
<%
While (not reg9.EOF)
%>
<option value="<%=(reg9.Fields.Item("USUARIO").Value)%>"><%=(reg9.Fields.Item("USUARIO").Value)%></option>
<%
reg9.Movenext
wend
%>
</select>
</td>
</tr>
<tr><td colspan="6" width="100%"> </td></tr>
<tr>
<td colspan="6" align="center">
<input type="button" name="DDbuscar" value="Buscar" class="botton80x23" onClick="buscar()">
<input type="button" name="DDlimpiar" value="Limpiar" class="botton80x23" onClick="(DDempresa.value = '0', DDperfil.value = '0', DDusuario.value = '0')">
</td>
</tr>
<tr><td colspan="6"> </td></tr>
</table>
<%
SQL6= "SELECT NUM_CHIP, NUM_SERIE, MOVIL, EQUIPO, APELLIDOP, NOMBRES, LIM_MINUTOS, LIM_SME, NOTAS from ID_USUARIO"
'esto es por si alguno de los datos es nulo o vacio no de problemas
if NUM_CHIP="" then
var1=""
end if
if NUM_SERIE="" then
var2=""
end if
if MOVIL="" then
var3=""
end if
if EQUIPO="" then
var4=""
end if
if APELLIDOP="" then
var5=""
end if
if NOMBRES="" then
var6=""
end if
if LIM_MINUTOS="" then
var7=""
end if
if LIM_SME="" then
var8=""
end if
if NOTAS="" then
var9=""
end if
set rs4= server.CreateObject("ADODB.Recordset")
rs4.Cursortype=adOpenStatic
rs4.CursorLocation=3
rs4.open sql6, conecta
rs4.pagesize =1000000
tampagina=rs4.pagesize
paginastotales=rs4.pagecount
%>
<table align="center" width="250" border="0">
<tr>
<td width="240" align="center" class="texto_negro Estilo1 Estilo3"><span class="Estilo2">Cantidad de Registros:</span> <%=RS4.RecordCount%></td>
</tr>
</table>
<p> </p>
<table width="1056" height="35" border="1" align="center" cellpadding = 2 cellspacing = 0 bordercolor="#000000" class="dropmenusimple" style="BORDER-COLLAPSE: collapse">
<tr bordercolor="#000000">
<td width="126" height="35" nowrap class="titulo_table6"><div align="center"><strong>Número De Chip</strong></div></td>
<td width="126" height="35" nowrap class="titulo_table6"><div align="center"><strong>Número De Serie</strong></div></td>
<td width="80" height="35" nowrap class="titulo_table6"><div align="center"><strong>Número Celular</strong></div></td>
<td width="97" height="35" nowrap class="titulo_table6"><div align="center"><strong>Equipo</strong></div></td>
<td width="100" height="35" nowrap class="titulo_table6"><div align="center"><strong>Apellido</strong></div></td>
<td width="150" height="35" nowrap class="titulo_table6"><div align="center"><strong>Nombres</strong></div></td>
<td width="64" height="35" nowrap class="titulo_table6"><div align="center"><strong>Lim-Minutos</strong></div></td>
<td width="64" height="35" nowrap class="titulo_table6"><div align="center"><strong>Lim-Sme</strong></div></td>
<td width="300" height="35" nowrap class="titulo_table6"><div align="center"><strong>Notas</strong></div></td>
</tr>
<%
Do While Not rs4.EOF
var1 = rs4(0)
var2 = rs4(1)
var3 = rs4(2)
var4 = rs4(3)
var5 = rs4(4)
var6 = rs4(5)
var7 = rs4(6)
var8 = rs4(7)
var9 = rs4(8)
%>
<tr align=right valign="middle">
<td width="10%" height="35" align="center" nowrap bordercolor="#000000" class="texto_negro"><%=var1%></td>
<td width="10%" height="35" align="center" nowrap bordercolor="#000000" class="texto_negro"><%=var2%></td>
<td width="9%" height="35" align="center" nowrap bordercolor="#000000" class="texto_negro"><%=var3%></td>
<td width="10%" height="35" align="center" nowrap bordercolor="#000000" class="texto_negro"><%=var4%></td>
<td width="10%" height="35" align="center" nowrap bordercolor="#000000" class="texto_negro"><%=var5%></td>
<td width="15%" height="35" align="center" nowrap bordercolor="#000000" class="texto_negro"><%=var6%></td>
<td width="8%" height="35" align="center" nowrap bordercolor="#000000" class="texto_negro"><%=var7%></td>
<td width="8%" height="35" align="center" nowrap bordercolor="#000000" class="texto_negro"><%=var8%></td>
<td width="25%" height="35" align="left" nowrap bordercolor="#000000" class="texto_negro"><%=var9%></td>
</tr>
<%
rs4.movenext
Loop
rs4.Close
Conecta.Close
%>
</table>
Entonces como puedo al hacer clic en boton buscar si ya se seleccionaron los datos de las combo aunque sea 1, 2 o los 3 de ellos se muestre el resultado en la tabla que se encuentra abajo en la misma pagina
En un principio la tabla ya se carga con todos los datos al entrar en la pagina la seleccion es para poder acceder a una informacion de forma mas personalizada
Espero que me puedan ayudar ya que esto me a dado un gran dolor de cabeza
