Observação

[avontzdnb]

Veio..

gostaria de saber como eu faço para colocar uma observação no primeiro campo a ser exibido

tipo

eu tenho um relatorio que exibe os campos da base de dados.e filtrar do maior para o menor

eu gostaria que no primeiro da lista ( o maior numero ), mostra-se uma observaçãoi.. sera que isso é possivel?

esta ai

[Deividy]

não entendi muito bem sua pergunta!

se quer mostrar um resultado numerico e quer que o campo 10 tenha um testo?

se for isso você sabe qual é o campo maior?

[avontzdnb]

tipo....

eu não sei o maior valor...

os usuarios vao enviar valores..

e eu quero que sempre o maior valor esteja em destaque..

[.Andreia.]

usa o order by nesse valor q você quer, nunca fiz isso q você tá querendo... acredito q tenha uma forma melhor. Mas pode-se usar um IF e contador, se ele for o primeiro então você aplica alguma formataçao no texto

[bareta]

tipo

[avontzdnb]

tipo, mas seguinte...eu já tenho a classificação

tudu certinho

uso a validação do if mudando a variavel "x" para variavel que eu quero comparar?

if not rs.eof then

x=0

while not rs.eof

if x=0 then

response.write "<font color=red>"&rs("valor")&"</font><br>"

x=1

end if

wend

end if

coloquei isso.. e não deu certo

obs: eu já faço uma consulta nessa tabela para mostrar os valores

[.Andreia.]

o X ae é só pra verificar, a sua variavel é o que ele colocou como rs("valor")

O X será 0 somente no primeiro registro, e depois ele assume o valor de 1, então você terá a observação só no primeiro.

[avontzdnb]

eu não coloquei a conexao porque já tinha

if not rs.eof then

x=0

while not rs.eof

if x=0 then

response.write "<font color=red>Maior lance!</font><br>"

x=1

end if

rs.movenext

wend

end if

rs.close

set rs=nothing

e trava pagina...

[.Andreia.]

você não esqueceu de colocar o ELSE ?

só acrescentando um detalhe no codigo que o bareta passou:

sql="select * from tabela order by valor desc"

set rs=conn.execute(sql)

if not rs.eof then

x=0

while not rs.eof

if x=0 then

response.write rs("valor") & " <font color=red>"&rs("valor")&"</font><br>"

x=1

else

response.write rs("valor")&"<br>"

end if

rs.movenext

wend

end if

rs.close

set rs=nothing

testei aqui e funcionou

[avontzdnb]

tipo.. essa é minha busca

<%

        codigo=request.querystring("msg")

    sql = "SELECT * FROM [respostas] WHERE  order by lance desc"

        Set res = Server.CreateObject("ADODB.Recordset")

        res.Open sql, conexao, 3, 3

    do while Not res.eof

    if res.fields("codigo") <> codigo then

    %>

pagina

<%

      end if

      res.MoveNext

      loop

      res.close

      set res = Nothing

      conexao.close

      Set Conn=Nothing

      %>

dai... ele mostra os dados da consulta.. e na ponta.. eu ponho somente a validação com IF, mas não funciona..

entendeu?

[avontzdnb]

tinha um pequeno erro...

no where

arrumei

tentei o seguinte para não fechar conexao tb

if not rs.eof then

x=0

while not rs.eof

if x=0 then

response.write " <font color=red> maior valor</font><br>"

x=1

else

response.write ""

end if

rs.movenext

wend

end if

e tb não vai

[.Andreia.]

Tenta assim:

<%

codigo=request.querystring("msg")

Set Conexao = Server.CreateObject("ADODB.Connection")

Conexao.Open "DBQ=CAMINHODAPASTA\NOMEBANCODEDADOS.mdb;Driver={Microsoft Access Driver (*.mdb)}"

sql = "SELECT * FROM [respostas] WHERE codigo = "& codigo &" order by lance desc"

set rs = conexao.execute(sql)

if not rs.eof then

x=0

while not rs.eof

if x=0 then

response.write rs("codigo") & " <font color=red> maior valor</font><br>"

x=1

else

response.write rs("codigo") & "<br>"

end if

rs.movenext

wend

end if

rs.close

set rs = Nothing

conexao.close

Set Conexao=Nothing

%>

não esqueça de mudar lá o caminho e o nome do BD