11/11/2008, 09:38
|
| | Fecha de Ingreso: noviembre-2008
Mensajes: 6
Antigüedad: 16 años, 2 meses Puntos: 0 | |
Respuesta: Ayuda para ocultar/ver un campo de una tabla dinamica Asi es va dentro del bucle aqui te pongo el codigo donde hago el bucle (trate de acomodarlo lo mas que pude al darle paste se desalineo espero le entiendas )
<%
Dim Repeat1__numRows
Dim Repeat1__index
Repeat1__numRows = 10
Repeat1__index = 0
rsTarifas_numRows = rsTarifas_numRows + Repeat1__numRows
%>
<%While (NOT cajageneral.EOF)%>
<option value="<%=(cajageneral.Fields.Item("id_unidadop"). Value)%>"<%if trim(rec)=trim(cajageneral.Fields.Item("id_unidado p").Value) then response.Write ("SELECTED") %>><%=(cajageneral.Fields.Item("descripcion").Valu e)%></option>
<%cajageneral.MoveNext()
Wend%>
</select>
<input type="hidden" name="cajatxt" value="<%response.Write(rec)%>"/>
<input type="hidden" name="CR">
</td>
</tr>
<tr>
<td height="34" class="txtTablaTitulo"> </td>
<td height="34" class="txtTablaTitulo">Proveedor:</td>
<td class="txtTablaInfo"><select name="proveedor" onChange="valorr()" class="txtcontenido"style="width:280px"
<option selected value="1">- Todos -</option>
<% While (NOT rsProvee.EOF) %>
<option value="<%=(rsProvee.Fields.Item("id_Proveedor").Va lue)%>"<%if trim(cmdTarifas__proveedor)=trim(rsProvee.Fields.I tem("id_Proveedor").Value) then response.Write ("SELECTED") %>><%=(rsProvee.Fields.Item("Descripcion").Value)% ></option>
<%rsProvee.MoveNext() Wend%>
</select>
<input type="hidden" name="prov1">
<input name="prov2" type="hidden" id="prov2"></td>
</tr>
<tr>
<td height="41" class="txtTablaTitulo"> </td>
<td height="41" class="txtTablaTitulo">Servicio:</td>
<td class="txtTablaInfo"><select name="servicio"
class="txtcontenido" style="width:280px ">
<option value="0"></option>
<option selected value="-1">- Todos -</option>
<%While (NOT Recordset1.EOF)%>
<option value=" <%=(Recordset1.Fields.Item("id_servicio").Value)%> "<%if trim(cmdTarifas__servicio)=trim(Recordset1.Fields. Item("id_servicio").Value) then response.Write ("SELECTED") %>><%(Recordset1.Fields.Item("Descripcion").Value) %>
</option><%Recordset1.MoveNext() Wend%> |