Select radom

[lulukynha 0]

Entao.. é assim eu preciso fazer um selct ramdom ... seleciona as 10 primeiras imagens q tenho salvo em meu banco de dados eu uso o SQL.

 

O codigo q eu uso é o de baixo só que ele nao tem esse ramdom... e preciso urgente disso...

Alguem pode me ajudar ???

 

 

 

<!--#include file="..\site\conexao.asp"-->
<%

dim ofertas2,maximo_ofertas2,random1b,random2b,random3b,pagamentoavistalateral,sql,n
umprod,prodlancamento
maximo_ofertas2 = 14
dim nim,parcelcartao
nim = 0
numprod = 1
%>
<table border="0" cellpadding="0" cellspacing="0" style="border-collapse: collapse" bordercolor="#E8E8E8" width="82%" id="AutoNumber3" height="76">
<tr>
<td width="100%" height="64">
	<table border="1" cellpadding="3" cellspacing="0" style="border-collapse: collapse" bordercolor="#E8E8E8" width="182" id="AutoNumber4" bgcolor="#FFFFFF">
	<tr>
	<td width="172" colspan="2"> 
	<img border="0" src="images/lanca.gif" width="227" height="21"><br>
		<table border="1" cellpadding="3" cellspacing="0" style="border-collapse: collapse" bordercolor="#E8E8E8" width="227" id="AutoNumber5">
<%	 
dim produltimos,idsultimos
set produltimos = lojadb.execute("select top 5 id from produtos where disp='s' and nimagem <> '' and convert(float,replace(replace(preco1,'.',''),',','.')) > 50 order by id desc")

idsultimos = ""

while not produltimos.eof
	idsultimos = Cstr(idsultimos) & produltimos("id") & ","
	produltimos.movenext
wend

produltimos.close
set produltimos = nothing

idsultimos = left(idsultimos,len(idsultimos)-1)

set prodlancamento = lojadb.execute("select top 5 id,codigo,nome,descricao,preco1,preco2,preco3,imagem from produtos where disp='s' and nimagem <> '' and (preco1 > 50 or preco2 > 50 or preco3 > 50) and id in (" & idsultimos & ") order by NEWID()")
dim prc1,prc2,prc3
	while not prodlancamento.eof
	prc1=prodlancamento("preco1")
	prc2=prodlancamento("preco2")
	prc3=prodlancamento("preco3")
%>
		<tr>
		<td width="24">
		<p align="center">
		<a href="./detalheprod.asp?prod_id=<%=prodlancamento("id")%>&url_comp=<%=Server.UrlEncode(Request.ServerVariables("QUERY_STRING"))%>" target="_parent">
		<img src="images/produtos/imagem2/<%=prodlancamento("imagem")%>.jpg" border="0"></a>
		</td>
		<td width="140"><b><font face="Arial" color="black" size="1"><%= lcase(prodlancamento("nome"))%></font><br><font face="Arial" color="#666666" size="1"><%= left(prodlancamento("descricao"),100)%><font face="Arial" color="#666666" size="1"><br>
		</font><font face="Arial" color="#ff6600" size="1">
<% if session("pessoa") = "juridica" then%>
		Preço Empresa<br>c/ Desconto <%=formatcurrency(prc2)%>
<% end if %>
<% if session("pessoa") = "revenda" then%> 
		Preço Revenda<br>c/ Desconto <%=formatcurrency(prc3)%>
<%end if%>
<% if session("pessoa") = "" then %>	   
<% pagamentoavistalateral = Csng(prc1) - (((Csng(prc1) * 115)/100) - Csng(prc1)) %>
		C/ desconto:<%= formatcurrency(pagamentoavistalateral)%>
<%end if%>
		<br>
		<a href="./detalheprod.asp?prod_id=<%= prodlancamento("id")%>&url_comp=<%=Server.UrlEncode(Request.ServerVariables("QUERY_STRING"))%>" target="_parent">
		<img src="images/detalhescomprar.gif" border="0" width="129" height="18"></a>
		</td>
		</tr>
<%	 	
  prodlancamento.movenext
  wend
  prodlancamento.close
  set prodlancamento = nothing%>
		</table>
	<img border="0" src="images/liquidacoes.gif" width="227" height="21"><br>
		<table border="1" cellpadding="3" cellspacing="0" style="border-collapse: collapse" bordercolor="#E8E8E8" width="227" id="AutoNumber5">
<%	 
set prodlancamento = lojadb.execute("select top 5 id,codigo,nome,descricao,preco1,preco2,preco3,imagem from produtos where disp='s' and nimagem <> '' and convert(float,replace(replace(preco1,'.',''),',','.')) > 0 and lancamento = 'N' order by NEWID()")
	while not prodlancamento.eof
	prc1=prodlancamento("preco1")
	prc2=prodlancamento("preco2")
	prc3=prodlancamento("preco3")%>
		<tr>
		<td width="24">
		<p align="center">
		<a href="./detalheprod.asp?prod_id=<%=prodlancamento("id")%>&url_comp=<%=Server.UrlEncode(Request.ServerVariables("QUERY_STRING"))%>" target="_parent">
		<img src="images/produtos/imagem2/<%=prodlancamento("imagem")%>.jpg" border="0"></a>
		</td>
		<td width="140"><b><font face="Arial" color="black" size="1"><%=lcase(prodlancamento("nome"))%></font><br><font face="Arial" color="#666666" size="1"><%= left(prodlancamento("descricao"),100)%><font face="Arial" color="#666666" size="1"><br>
		</font><font face="Arial" color="#ff6600" size="1">
<% if session("pessoa") = "juridica" then%>
		Preço Empresa<br>c/ Desconto <%=formatcurrency(prc2)%>
<% end if %>
<% if session("pessoa") = "revenda" then%> 
		Preço Revenda<br>c/ Desconto <%=formatcurrency(prc3)%>
<%end if%>
<% if session("pessoa") = "" then %>	   
<% pagamentoavistalateral = Csng(prc1) - (((Csng(prc1) * 115)/100) - Csng(prc1)) %>
		C/ desconto: <%= formatcurrency(pagamentoavistalateral)%>
<%end if%>
		<br>
		<a href="./detalheprod.asp?prod_id=<%= prodlancamento("id")%>&url_comp=<%=Server.UrlEncode(Request.ServerVariables("QUERY_STRING"))%>" target="_parent">
		<img src="images/detalhescomprar.gif" border="0" width="129" height="18"></a>
		</td>
		</tr>
<%
prodlancamento.movenext
wend
prodlancamento.close
set prodlancamento = nothing%>
		</table>
	</table>
</table>
<br>
<%
lojadb.close
set lojadb = nothing
%>

[jrcardozo 4]

pelo visto o banco de dados é sql server, se for isso é só colocar no ORDER BY o seguinte

 

ORDER BY NEWID()

[lulukynha 0]

pelo visto o banco de dados é sql server, se for isso é só colocar no ORDER BY o seguinte

 

ORDER BY NEWID()

intao... mas eu ja tinha colocado ORDER BY NEWID() ....

E nao foi...

[jrcardozo 4]

porque você faz isso (" & idsultimos & ")

 

possivelmente não esteja funcionando pois a condição do where que limita os registros, ele vai soretear, mas dentro daqueles que a condição devolver

[lulukynha 0]

porque você faz isso (" & idsultimos & ")

 

possivelmente não esteja funcionando pois a condição do where que limita os registros, ele vai soretear, mas dentro daqueles que a condição devolver

 

entao.. rsrs

 

mais é isso que eu quero...

que dentro das minhas condições ele sorteie as imagens do banco...

 

tendeu ?

[Luiz Crivelli 0]

essa é facil . cria uma temp e dá um new id nela.

tá aí o código que ve tem que fazer no sql

 

--Crio a temporária e insiro os registros

SELECT id
	 , codigo
	 , nome
	 , descricao
	 , preco1
	 , preco2
	 , preco3
	 , imagem 
INTO #tprodutos
  FROM produtos 
 WHERE disp='s' 
   AND nimagem <> '' 
   AND convert(float,replace(replace(preco1,'.',''),',','.')) > 0 
   AND lancamento = 'N' 

--retorno os 5 primeiros registros com random
SELECT TOP 5 
  FROM #tprodutos
order by NEWID()

-- deleto a temporária
drop table #tprodutos

 

porque você faz isso (" & idsultimos & ")

 

possivelmente não esteja funcionando pois a condição do where que limita os registros, ele vai soretear, mas dentro daqueles que a condição devolver

 

entao.. rsrs

 

mais é isso que eu quero...

que dentro das minhas condições ele sorteie as imagens do banco...

 

tendeu ?