Listar colunas da tabela

[ViaPocket]

Este é um select que costumo usar:

sql="SELECT EventosCod, EventosTitulo, EventosTipo, EventosPrioridade, EventosQtdeVagas, EventosSt FROM EVENTOS"
Set rs= MM_conexao_STRING.Execute(sql)
Set rs= Server.CreateObject("ADODB.Recordset")
rs.open sql,MM_conexao_STRING, 3, 3

Preciso de um help para listar o nome das colunas para ficar assim.

EventosCod

EventosTitulo

EventosTipo

EventosPrioridade

EventosQtdeVagas

EventosSt

Como se fossem os registro de uma tabela do SQL.

Obrigado.

[bareta]

você pode dar um response.write "nome" ou usar no rs...

aqui tem um artigo que deve te ajudar:

http://www.criarweb.com/artigos/822.php

[ViaPocket]

você pode dar um response.write "nome" ou usar no rs...

aqui tem um artigo que deve te ajudar:

http://www.criarweb.com/artigos/822.php

Ok Bareta. Vou olhar com calma.

Muito obrigado!

Abs.

[ViaPocket]

você pode dar um response.write "nome" ou usar no rs...

aqui tem um artigo que deve te ajudar:

http://www.criarweb.com/artigos/822.php

Bareta, dei uma olhada no link. Ajudou bastante.

Agora quero poder escolher quais campos, entre os do recordset, vou exibir.

Por exemplo. Se meu recordset tem os campos A, B e C eu gostaria de exibir apenas os campos A e B.

Como consigo fazer isso?

Imaginei a seguinte alternativa. Criar um array com os campos que quero (A e B ) e fazer com que o loop exiba o campo (armazenado no recordset) somente se ele for igual ao que existe no array.

Pode me dar uma ajuda?

Meu array

Dim myFixedArray(3) 'Fixed size array
myFixedArray(0) = "Campo A"
myFixedArray(1) = "Campo B"
myFixedArray(2) = "Campo C"
myFixedArray(3) = "Campo D"

Recordset

For i = 0 to rs.fields.Count - 1
    response.write "<tr>" 
    response.write "<td align='left' bgcolor='#eeeeee'>" 
    response.write rs.fields(i).name
    response.write "</td>"
    response.write "<td align='left' bgcolor='#eeeeee'>"      
   response.write "</td>"
next
response.write "</tr>"

Obrigado.

[bareta]

um if tambem resolve

if i=2 then
"Campo x"
else
rs.fiels(i).name
end if

no caso do array também funciona seria so usar o myfixedarray(i) no lugar do rs.fields(i).name, mais como so vai ser usado uma vez... o if é melhor.