mostrar filas y columnas de la BD personalizadas

[carolina]

Necesito de alguna forma si se pudiera mostrar a traves de una seleccion previa de select o radiobuton poder visualizar SOLO los campos de una bd acces 2000 que estan tickeados. hasta hahora solo tengo el codido de los select pero no se como validar o crear una funcion que me permita visualizar solo los campos seleccionados de una misma tabla o de varias
<table width="75%" border="1">
<tr>
<td><input type="checkbox" name="checkbox" value="checkbox">
Primer Nombre</td>
<td><input type="checkbox" name="checkbox8" value="checkbox">
Celular</td>
</tr>
<tr>
<td><input type="checkbox" name="checkbox3" value="checkbox">
Primer Apellido</td>
<td><input type="checkbox" name="checkbox10" value="checkbox">
Area</td>
</tr>
<tr>
<td><input type="checkbox" name="checkbox5" value="checkbox">
Rut </td>
<td><input type="checkbox" name="checkbox12" value="checkbox">
N&ordm; Horas contratadas</td>
</tr>
.....
</table>

[cala932]

Coloca un if en cada celda validando si los checkbox han sido tildados de esa manera unicamente se veran los que quieres por ejemplo: if(checkbox8)
<td>Celular</td>
y mas abajo haces lo mismo para mostrar la variable donde corresponde.

[carolina]

Y Como Coloco La Consulta A La Bd?, Como Cualquier Otra?

[cala932]

Si, con respecto a la consulta a la base de datos puedes traes todas las columnas del registro pero unicamente se mostraran aquellas celdas que cumplan con la condicion del checkbox que evaluas despues de la consulta. Suerte.

[carolina]

el if debe ir tal cual:
if(checkbox8)

o se debe colocar:
if(checkbox8=checked)
else nombre=disabled

....o algo asi

Es que nunaca habia hecho esto...


otra pregunta...
el informe me gustaria en lo posible que se mostrase en una pagina diferente... como puedo enviarle los parametros de que checkbox esta seleccionado y cual no?

[cala932]

Pasa los checkbox en un formulario utilizando el metodo post, por el mismo recoges las variable, osea los nombres de los checkbox y si debes colocar el if(checkbox8). Suerte

[carolina]

no me funciona solo me aparece la parte en blanco pero aunque seleccione o no.

En la pagina en donde se realiza la seleccion:
<form name="nuevo" method="post" action="lista_trabajador_seleccio.asp">
<input type="submit" name="Aceptar" value="Aceptar">


En la pagina para visualizar los datos(lista_trabajador_seleccio):
<% if(c1)Then Nombres%> : Es el titulo de la columna
<% if(c3)Then Consulta("rut")%> : Es para visualizar los datos
(las columnas me salen vacias las seleccione o no)


lista_trabajador_seleccio=Es la pagina en donde se van a visualizar los datos
En la consulta a la Bd estoy extrayendo todos los datos en forma normal, eso si me funciona

[carolina]

tambien intente de otra forma:

<% if(document.nuevo.c3.checked)Then%> <th width="98" scope="col"> Rut </th><%end if%>

pero me dice:
Error de Microsoft VBScript en tiempo de ejecución (0x800A01A8)
Se requiere un objeto: ''

[carolina]

Despues de una semana por fin lo pude hacer :

Ejemplo de los checkbox: <input name="no" type="checkbox" value="3">

(Si se seleccionan los checkbox se mustra la columna correspondiente)

<table width="891" border="1">
<caption align="left">
DATOS PERSONALES
<% SQLtxt = "Select nombre, nombre2, apellido1, apellido2, rut, f_nacimiento, direccion, telefono, celular FROM trabajador"
Set Consulta = oConn.Execute(SQLtxt)%>

</caption>
<tr>
<% if(1=Request.Form("ru"))Then%> <th width="98" scope="col"> Rut </th><%end if%>
<% if(3=Request.Form("no"))Then%><th width="111" scope="col">Apellido </th><%end if%>
<% if(2=Request.Form("ap"))Then%><th width="139" scope="col">nombres</th><%end if%>
<% if(4=Request.Form("na"))Then%><th width="80" scope="col">Fecha Nacimiento </th><%end if%>
<% if(5=Request.Form("di"))Then%><th width="234" scope="col">Direccion</th><%end if%>
<% if(7=Request.Form("te"))Then%><th width="87" scope="col">Telefono</th><%end if%>
<% if(6=Request.Form("ce"))Then%><th width="96" scope="col">Celular</th><%end if%>
</tr>
<% Do While NOT Consulta.EOF%>
<tr>
<% if(1=Request.Form("ru"))Then%><td> <%=Consulta("rut")%></td><%end if%>
<% if(3=Request.Form("no"))Then%><td> <%=Consulta("nombre")%>&nbsp;<% =Consulta("nombre2")%></td><%end if%>
<% if(2=Request.Form("ap"))Then%><td> <%=Consulta("apellido1")%>&nbsp;<% =Consulta("apellido2")%></td><%end if%>
<% if(4=Request.Form("na"))Then%><td> <% = Consulta("f_nacimiento")%></td><%end if%>
<% if(5=Request.Form("di"))Then%><td> <% = Consulta("direccion")%></td><%end if%>
<% if(7=Request.Form("te"))Then%><td> <% = Consulta("telefono")%></td><%end if%>
<% if(6=Request.Form("ce"))Then%><td> <% = Consulta("celular")%></td><%end if%>
</tr>
<% Consulta.MoveNext
Loop
Consulta.Close%>
</table>

[cala932]

Jaja caro me algra que te halla salido. Saludos