Ver Mensaje Individual
  #1 (permalink)  
Antiguo 07/05/2013, 22:48
Avatar de freesoftwarrior
freesoftwarrior
 
Fecha de Ingreso: marzo-2006
Mensajes: 362
Antigüedad: 18 años, 2 meses
Puntos: 10
Hacer que el contenido de cada celda sea en una línea

Buenas noches:
Tengo un problema. Yo se que si no indico el width de un tabla, esta se ajustará al contenido de manera ceñida y justa. Sin embargo, tengo un código que lista el contenido de una tabla y sin embargo varios campos aparecen "comprimidos" en vez de estar "expandidos" y mostrarse todos en una línea (aún cuando se muestre la barra de scroll horizontal).

Utilizo este código

Cita:
<%
Temp="Select * From " & varTabla
Tabla1.Open Temp, Conexion
arrDBData=Tabla1.GetRows()
varNumReg=Tabla1.Fields.Count - 1
%>

<table border="0" cellspacing="0" cellpadding="0">
<tr>
<%
For J = 0 To Tabla1.Fields.Count - 1
Response.Write("<td class='encabezadoTextoNormal_bordesSupInf'><b>" & UCase(Tabla1.Fields(J).Name) & "</b></td>")
Next
Tabla1.Close
%>
</tr>
<%
varColor=""
For J = 0 To UBound(arrDBData, 2)
%>
<tr>
<%
For K = 0 To varNumReg
If Len(arrDBData(K,J)) > 0 Then
Response.Write("<td bgcolor='" & varColor & "' class='texto_normal'>" & arrDBData(K,J) & "</td>")
Else
Response.Write("<td bgcolor='" & varColor & "'>&nbsp;</td>")
End If
Next

If varColor="" Then
varColor="#445682"
Else
varColor=""
End If
%>
</tr>
<%
Next
%>
</table>

y el resultado es como ven en la captura (edite algunos datos por seguridad)



Como pueden ver hay algunos campos como nombre, apellido, domicilio, en que los datos aparecen en varias líneas cuando, según tengo entendido, si no indico el width de la tabla, entonces la tabla se adaptará al contenido.

¿Alguien sabe como solucionar esto para que todo se muestra siempre en una línea?

Un saludo desde Lima, Perú