Con permiso Maykire
Código asp:
Ver originalSet rsUser = Server.CreateObject("ADODB.Recordset")
rsuser.Open sql, dbconn, 3, 3
if Not rsuser.Eof then
......
<td width="30%" height="0" align=bgcolor="#F78009" bgcolor="#F78009">
<%
For i=0 To rs.Fields.Count-1
if (not IsNull(rs.Fields(i))) and (LEN(Trim(rs.Fields(i).value))>0) Then%>
<p><font size="2"><b><%=rs.Fields(i).name & " = " & rs.Fields(i) & " (" & LEN(Trim(rs.Fields(i).value)) & ")"%></b></font><br>
<% End if
Next
Suerte