Exibir dados do banco direto numa tabela padronizada

Este código ler a tabela do banco de dados e exibe o conteúdo numa tabela criada automaticamente com formatação dos campos numéricos, vazios e tipo texto.

O usuário não precisa se preocupar com a quantidade de colunas. Ainda destaca as linhas intercalando com cores distintas.

Excelente dica e perfeitamente aplicável às suas aplicações…

Total de registros " & total & "
"
	response.write	"

" FOR i=0 to campos response.write "" NEXT DO UNTIL rstemp.eof if (x mod 2 = 0) then response.write "" else response.write "" end if FOR i = 0 to campos fieldvalue=rstemp(i) If trim(fieldvalue)="" THEN fieldvalue=" " else If IsNumeric(fieldvalue) Then response.write "" next response.write "" x=x+1 rstemp.movenext LOOP response.write "

" & rstemp(i).name & "
" & FormatNumber(fieldvalue,0) else response.write "	" & fieldvalue End if end if response.write "

" Else response.write "Tabela sem dados" End if rstemp.close cnn.close Set cnn=nothing %>

Arquivos para Download:

bco_tab.zip

Tags:

• Access,
• ADO,
• ASP,
• Banco de Dados