Select do random não traz valores no ASP

[Cable 0]

Galera, é assim:

Fiz um random lá que pega aletoriamente 3 noticias diferentes.

Eu tenho uma condição no Select disso ai. Ele pega só as q o "flag" for 1, no campo destaque_tb_noticia. Segue o SELECT:

SQL = "SELECT * FROM tb_noticia WHERE destaque_tb_noticia = 1 ORDER BY id_tb_noticia"

No Access ele mostra os valores em que o campo destaque_tb_noticia é 1. Mas no ASP, la no browser onde ele tem que mostra, não mostra nada.

 

Peço a ajuda de vcs.

 

C'ya ! :blink:

[diego_sl 0]

põe o resto do código filhote,hehe :blink:

[Cable 0]

Esse ai é o codigo do random:

<%SQL = "SELECT COUNT(*) AS total_noticia FROM tb_noticia"Set tb_noticia = conn.Execute(SQL)total_noticias = tb_noticia("total_noticia")Set tb_noticias = Nothingrandomize() noticia_sorteada = Int(total_noticias *Rnd) + 1SQL = "SELECT * FROM tb_noticia WHERE destaque_tb_noticia =1 ORDER BY id_tb_noticia"Set tb_noticias = conn.Execute(SQL)If noticia_sorteada > 1 Then  tb_noticias.Move noticia_sorteadaEnd If%>

A Unica coisa q eu faço la embaixo agora é printa a noticia. Mas ela nao vem. :blink:

[diego_sl 0]

qual a resposta q ta vindo no browser?

[Cable 0]

Na verdade não vem nada. Não sei pq.

Eu fiz uma verificação e ele me trouxe o ID de uma noticia.

Esqueci de falar, logo abaixo, eu faço um for pra vim somente 3 noticias. Ta ai:

<%if tb_noticias.eof = false thenfor x = 1 to 3%><IMG SRC="images/home_31.jpg" WIDTH=9 HEIGHT=9 ALT=""><font color="#333333" size="-3"><a href="noticias_busca.asp?id_tb_noticia=<%=tb_noticias("id_tb_noticia")%>&id_tb_boletim=<%=tb_noticias("id_tb_boletim")%>&page=<%=x%>&id_grupo=<%=tb_noticias("id_tb_grupo")%>&id_subgrupo=<%=tb_noticias("id_tb_subgrupo")%>"><%=tb_noticias("titulo_tb_noticia")%></a></font><br><br><%tb_noticias.movenextnextend if%>

;)

[diego_sl 0]

tenta ai desse jeito<%x = 1while not tb_noticias.eof and x<4%><IMG SRC="images/home_31.jpg" WIDTH=9 HEIGHT=9 ALT=""><font color="#333333" size="-3"><a href="noticias_busca.asp?id_tb_noticia=<%=tb_noticias("id_tb_noticia")%>&id_tb_boletim=<%=tb_noticias("id_tb_boletim")%>&page=<%=x%>&id_grupo=<%=tb_noticias("id_tb_grupo")%>&id_subgrupo=<%=tb_noticias("id_tb_subgrupo")%>"><%=tb_noticias("titulo_tb_noticia")%></a></font><br><br><%tb_noticias.movenextx= x + 1wend%> ;)

[Salgado 4]

Do geito que você está fezendo só vai sair 1 mesmo.

você tem MSN?

[diego_sl 0]

geito é com J,hehe

[Salgado 4]

geito é com J,hehe

Esclarecedor ;)

Acabas de mudar meu modo de ver o mundo!

[Cable 0]

Hahahaha...falo nada... ;) :D :) Ta ai meu mail do MSN: vinicius_skt@hotmail.com

[diego_sl 0]

da bola não....axo q o salgado não vai mto com a minha cara mesmo,hehe ;)

[Salgado 4]

da bola não....axo q o salgado não vai mto com a minha cara mesmo,hehe ;)

Eu não tenho nada contra ninguém, muito pelo contrário, veio para ajudar é sempre bem-vindo!

[diego_sl 0]

beleza então ! pra frente e avante! :)

[Cable 0]

Ae gente, consegui pega os de valor 1. Mas surgiu outra coisa:

 

<%         SQL = "SELECT COUNT(*) AS total_noticia FROM tb_noticia WHERE destaque_tb_noticia <> 0"Set tb_noticia = conn.Execute(SQL)total_noticias = tb_noticia("total_noticia")Set tb_noticias = Nothingrandomize() noticia_sorteada = Int(total_noticias *Rnd) + 1SQL = "SELECT * FROM tb_noticia WHERE destaque_tb_noticia=1 ORDER BY id_tb_noticia"Set tb_noticias = conn.Execute(SQL)If noticia_sorteada > 1 Then  tb_noticias.Move noticia_sorteadaEnd If%>

Acontece o seguinte: Eu tenho q pega 3 noticias na pagina. Ai ele de vez em quando não tras nenhuma, as vezes tras duas, e as vezes tres.

 

Eu preciso que sempre venhas 3 noticias. Oqq acontece ? Como resolve ? :) :(

[Salgado 4]

Ele pode estar "sorteando" o Ultimo ID!

Faz essa operação 3 vezes num for!

[Cable 0]

Não entendi Salgado....eu vo joga o Select dentro de um for ???Me explica se nao for isso....q eu to meio desesperado...hehehe :)

[Salgado 4]

Tente esse código:

<%SQL = "SELECT COUNT(*) AS total_noticia FROM tb_noticia"

Set tb_noticia = conn.Execute(SQL)

total_noticias = tb_noticia("total_noticia")

Set tb_noticias = Nothing

 

SQL = "SELECT * FROM tb_noticia WHERE destaque_tb_noticia =1 ORDER BY id_tb_noticia"

Set tb_noticias = conn.Execute(SQL)

 

For x= 1 to 3

randomize()

noticia_sorteada = Int(total_noticias *Rnd) + 1

tb_noticias.Move noticia_sorteada

'aqui você manda escrever

Next%>

[Cable 0]

Caramba nao deu....deu aquele "Either BOF or EOF bla bla bla"....fiz uma verificação mas n deu.....Ooooo pé no saco... :)

[Salgado 4]

Então coloca o Select ai dentro, e só seleciona o ID "sorteado"

[Cable 0]

Putz Salgado....ainda nao deu meu...

Essa modificação que você coloco ai pra mim, tem aquela parte que você coloco comentado "Aqui você manda escrever".

 

Eu preciso escrever a noticia, mas é la mais pra baixo.....e nisso onde eu escrevo a noticia, eu do um while pra ele escreve 3 registros.

Tá assim:

 

<%         x = 1         if tb_noticias.eof = false then         while not tb_noticias.eof AND x<4         %>         <IMG SRC="images/home_31.jpg" WIDTH=9 HEIGHT=9 ALT=""><font color="#333333" size="-3"><a href="noticias_busca.asp?id_tb_noticia=<%=tb_noticias("id_tb_noticia")%>&id_tb_boletim=<%=tb_noticias("id_tb_boletim")%>&page=<%=x%>&id_grupo=<%=tb_noticias("id_tb_grupo")%>&id_subgrupo=<%=tb_noticias("id_tb_subgrupo")%>"><%=tb_noticias("titulo_tb_noticia")%></a></font><br><br>                        <%      tb_noticias.movenext      x = x + 1      wend      end if      %>

Ta me estressando isso....hehehehe....ve se tem algo a ver com esse while q eu fiz...pq eu peguei esse codigo feito já. Outro programador q trampava aqui q fez ele. Então eu to meio boiando... :)