Ir para conteúdo

POWERED BY:

Arquivado

Este tópico foi arquivado e está fechado para novas respostas.

Pevides

Resultados Randomicos

Recommended Posts

Pessoal ainda estou com aquele problema.

 

Estou fazendo essa busca aqui:

 

<%randomizevlConsulta = "SELECT TOP 6 * FROM CLIENTES ORDER BY rnd(Id_cliente)"Set vResultado = vConexao.execute(vlConsulta)while not vResultado.eof%>

e o resultado não esta vindo randomico. Oque esta de errado ?

 

Abraço ?

Compartilhar este post


Link para o post
Compartilhar em outros sites

Ja procurei e não achei nada parecido.Como eu faço esse LOOP me de um exemplo.Valew

Compartilhar este post


Link para o post
Compartilhar em outros sites

Olaisso é só um teste pra ver se os dados estao okex:conecta ao banco, cria um select, e depoisdo while not rs.eofresponse.write rs("campo") + "<"br">"rs.moveNextloopEle deveria mostrar 6 linhas de dados.. pelo certoSe nao for isso, tem problema com seus dados no banco..

Compartilhar este post


Link para o post
Compartilhar em outros sites

Ainda naum deu certo...olhe meu código e ache o erro por favor:

 

<%vlConsulta = "SELECT * FROM CLIENTES ORDER BY id_cliente"Set vResultado = vConexao.execute(vlConsulta)do while not vResultado.eofresponse.write vResultado("id_cliente") + "<"br">"vResultado.movenext%>

e o ERRO é esse:

 

Microsoft VBScript compilation  error '800a0401'Expected end of statement/centro.asp, line 7response.write vResultado("id_cliente") + "<"br">"---------------------------------------------^

 

Valew Grande Abraço

Compartilhar este post


Link para o post
Compartilhar em outros sites

"<"br">"tira as aspas de dentro"<br>"

Compartilhar este post


Link para o post
Compartilhar em outros sites

amigo, me equivoquei.. Imagem Postada

 

o certo é como o mario falou..

eu postei na corrida do dia aquele codigo :rolleyes:

 

bom é isso..

Compartilhar este post


Link para o post
Compartilhar em outros sites

Pessoal ainda continua dando erro Vejam o erro:

 

Microsoft VBScript compilation  error '800a03fb'Expected 'Loop'/centro.asp, line 27

o codigo completo seria esse:

 

<!--#include file = conexao.asp--><link href="images/myfreetemplates.css" rel="stylesheet" type="text/css"><%vlConsulta = "SELECT * FROM CLIENTES ORDER BY id_cliente"Set vResultado = vConexao.execute(vlConsulta)do while not vResultado.eofresponse.write vResultado("id_cliente") + "<br>"vResultado.movenext%><body bgcolor="#E4E4E4"><div align="center">   <table width="97%" border="0" cellpadding="2" cellspacing="0">    <!--DWLayoutTable-->    <tr>       <td height="25" colspan="2" align="center" valign="top"> <hr size="1" noshade color="#db007c">       </td>      </tr>    <tr>       <td width="139" height="85" align="center" valign="middle" bgcolor="#FFFFFF">         <img src="img_clientes/<%=vResultado("imagem")%>" width="104" height="77">       </td>      <td width="615" valign="top" bgcolor="#FFFFFF"> <div align="left"><font size="2" face="Verdana">           <b><font color="db007c"><img src="images/ponto.gif" width="7" height="10"></font>           <%=vResultado ("clientes")%></b><br>          <%=vResultado ("descricao_cliente")%></font></div>        <div align="left">            <p><font size="1" face="Verdana"><a href="detalhes.asp?id_cliente=<%=vResultado ("id_cliente")%>"><img src="images/lupinha.gif" width="80" height="20" border="0"></a></font></p>        </div></td>    </tr>    <tr>       <td height="0"></td>      <td></td>    </tr>  </table></div><div align="right">  </div></div></body></html>

 

Valew Abraço

Compartilhar este post


Link para o post
Compartilhar em outros sites

falta fechar o loop do while not vResultado.eofveja onde deve ser feito isso

Compartilhar este post


Link para o post
Compartilhar em outros sites

Onde fechar eu sei........não sei como fechar o LOOP..........que vergonha......

Compartilhar este post


Link para o post
Compartilhar em outros sites

só por a palavra loop mesmo

Compartilhar este post


Link para o post
Compartilhar em outros sites

IIII hhhhhhhh caramba.......agora deu outro erro:

 

Microsoft VBScript runtime  error '800a000d'Type mismatch: 'vResultado(...)'/centro.asp, line 7

 

to quase desistindo.......

Compartilhar este post


Link para o post
Compartilhar em outros sites

posta esta linha ai...

Compartilhar este post


Link para o post
Compartilhar em outros sites

response.write vResultado("id_cliente") + "<br>"

O loop deve estar assim:

 

<%loop%>

 

Assim que deve ser o LOOP ?

Compartilhar este post


Link para o post
Compartilhar em outros sites

se estiver fora de um codigo ASP sim...o nome de seu campo é id_cliente??

Compartilhar este post


Link para o post
Compartilhar em outros sites

cara aparentemente tá certo...

Compartilhar este post


Link para o post
Compartilhar em outros sites

×

Informação importante

Ao usar o fórum, você concorda com nossos Termos e condições.