Paginação Randomica com repetição de resultados

varela82 · Junho 25, 2012

Ola pessoal,

Estou com um probleminha tenho um sistema de busca que gera paginação dos resultados, coloquei em randomicos para não deixar o produto que foi cadastrado 3 meses atras aparecesse apenas na pagina 20 por exemplo, mudei algumas coisas com variaveis mais continua igual, e qd coloco em randomico o alguns produtos que aparecesse na 1 pagina, repeta na 2 ou 3 e assim por adiante nas outras paginas.

Como posso esta resolvendo isso ? infelizmente não sei quase nada em ASP apenas em PHP, abaixo segue o codigo:

	<script language="JavaScript">
function addFav(){
   var url      = "http://www.webbatidos.com.br";
   var title    = "Veiculos Batidos - Carros, Motos, Caminhões, Caminhonetes";
   if (window.sidebar) window.sidebar.addPanel(title, url,"");
   else if(window.opera && window.print){
       var mbm = document.createElement('a');
       mbm.setAttribute('rel','sidebar');
       mbm.setAttribute('href',url);
       mbm.setAttribute('title',title);
       mbm.click();
   }
   else if(document.all){window.external.AddFavorite(url, title);}
}
</script>
<script type='text/javascript'>
function iframeAutoHeight(quem){
   //by Micox - elmicox.blogspot.com - elmicox.com - webly.com.br  
   if(navigator.appName.indexOf("Internet Explorer")>-1){ //ie sucks
       var func_temp = function(){
           var val_temp = quem.contentWindow.document.body.scrollHeight + 10
           quem.style.height = val_temp + "px";
       }
       setTimeout(function() { func_temp() },100) //ie sucks
   }else{
       var val = quem.contentWindow.document.body.parentNode.offsetHeight + 10
       quem.style.height= val + "px";
   }    
}
</script>


<!--#include file="Connections/webacon_eagle.asp" -->
<%
dim VEICULO
VEICULO = request("VEICULO") & ""
VEICULO = replace(VEICULO,"'","")
VEICULO = replace(VEICULO,"*","")
VEICULO = replace(VEICULO,"&","")
Dim rs


VEICULO = REQUEST("VEICULO") & ""
MARCA = request("MARCA") & ""
MODELO = Request("MODELO") & ""

MARCA = REPLACE(MARCA,",","")

dim intpagina

if trim(VEICULO) <> "" AND trim(MARCA) <> "MARCA(TODAS)" then
	Set rs = Server.CreateObject("ADODB.Recordset")
	rs.ActiveConnection = MM_webacon_eagle_STRING
	rs.Source = "SELECT * FROM TBLVEICULOS where VEICULO='" & trim(VEICULO) & "' AND MARCA='" & TRIM(MARCA) & "' AND LIBERADO='SIM' AND ALTERADO='NAO' ORDER BY  Rnd(Int(Now()*[iDVEICULO])-Now()*[iDVEICULO])" 
	rs.CursorType = 1
	rs.CursorLocation = 2
	rs.LockType = 1
	rs.Open()


ELSE
	Set rs = Server.CreateObject("ADODB.Recordset")
	rs.ActiveConnection = MM_webacon_eagle_STRING
	rs.Source = "SELECT * FROM TBLVEICULOS where VEICULO='" & trim(VEICULO) & "' AND LIBERADO='SIM' ORDER BY  Rnd(Int(Now()*[iDVEICULO])-Now()*[iDVEICULO])" 
	rs.CursorType = 1
	rs.CursorLocation = 2
	rs.LockType = 1
	rs.Open()

       'Definimos o Numero de Paginas com a propriedade "PageSize" do objeto Recordset

end if
'Definimos o Numero de Paginas com a propriedade "PageSize" do objeto Recordset
rs.PageSize = 11

'Criamos as Validações
if rs.eof then
      response.Redirect("registro-nao-encontrado.asp?MARCA=" & TRIM(MARCA) & "&VEICULO=" & TRIM(VEICULO))
   Response.End 
else
   'Definimos em qual pagina o visitante está
   if Request.QueryString("pagina")="" then 
      intpagina = 1
   else
      if cint(Request.QueryString("pagina"))<1 then
	 intpagina = 1
      else
	 if cint(Request.QueryString("pagina"))>rs.PageCount then  
	    intpagina = rs.PageCount
         else
	    intpagina = Request.QueryString("pagina")
	 end if
      end if	  	
   end if	  
       end if
%>
<script type="text/javascript" src="js/jquery-1.3.1.js"></script>
<script type="text/javascript">
   $(function(){
       $('#tabelax tr')
           .mouseover(function(){
               $(this).addClass('over');
           })
           .mouseout(function(){
               $(this).removeClass('over');
           });
   });
</script>
<link href='http://www.webbatidos.com.br/favicon.gif' rel='shortcut icon' type='image/x-icon'/>
<link href='http://www.webbatidos.com.br/favicon.gif' rel='icon' type='image/x-icon'/>
</head>
<body>
<div id="header" >

<!--#include file="header.asp"-->    
<div id="menu_ext">
<!--#include file="menubnet.asp"--> 
</div>

    </div>



<div class="clear"></div>

<div id="tudo">


<div id="colesquerda">
<div>
<iframe src="busca_avancada.asp" width="158" height="180"  marginwidth="0" marginheight="0" frameborder="0" scrolling="no" > </iframe>
</div>
<div style="margin-top:5px;width:145px;background:#FFF url(images/coldireita.jpg) repeat-y;">
<iframe src="colesquerda.asp" width="155"  onload="iframeAutoHeight(this)"  marginwidth="0" marginheight="0" frameborder="0" scrolling="no" >
       </iframe>
     </div>
   </div>

 <div style="margin-right:5px;">
   <div style="margin-top:5px;"> <table width="820" border="0" align="right" cellpadding="0" cellspacing="0" id="tabelax">

                          <tbody>

<tr  >
  <td colspan="7"  align="left" bgcolor="#FFFFFF" style="font-family:Arial, Helvetica, sans-serif;font-size:12px;font-weight:bold;">VEÍCULOS ENCONTRADOS</td>
  </tr>
<tr >
             <td width="100"  align="center" bgcolor="#FFFFFF"><div class="style1" style="padding-top:10px;padding-bottom:10px;"><font face="Verdana" size="2">FOTO</font></div></td>
                           <td bgcolor="#FFFFFF" ><div align="left"><span class="style1"><font face="Verdana" size="2">MODELO</font></span></div></td>
                           <td bgcolor="#FFFFFF" ><div align="left"><span class="style1"><font face="Verdana" size="2">COMB.</font></span></div></td>
                           <td bgcolor="#FFFFFF" ><div align="left"><span class="style1"><font face="Verdana" size="2">ANO</font></span></div></td>
                           <td bgcolor="#FFFFFF" ><div align="left"><span class="style1"><font face="Verdana" size="2">COR</font></span></div></td>
                           <td bgcolor="#FFFFFF" ><div align="left"><span class="style1"><font face="Verdana" size="2">PREÇO</font></span></div></td>
                           <td bgcolor="#FFFFFF" ><div align="left"><span class="style1"><font face="Verdana" size="2">SITUAÇÃO</font></span></div></td>
                         </tr>

<% 
 'Iniciamos o Loop
   rs.AbsolutePage = intpagina 
   intrec = 0
   While intrec < rs.PageSize and not rs.eof  

%>

                         <tr  >

                         <td width="100"  align="center" class="celula1"><div style="padding-top:10px;padding-bottom:10px;"><a href="consultar_veiculo.asp?IDVEICULO=<%= rs("IDVEICULO") %>" target="_parent"><font face="Arial" size="2" color="#333333"><img src= <%= "banco_veiculos" & "/" & rs("IMAGES").Value %> border="0" width="99" height="85"></font></a></div></td>

                           <td  width="150" class="celula1" ><div align="left"><b></b><strong><font size="1" face="Arial" color="#000099" style="text-transform:uppercase"><a href="consultar_veiculo.asp?IDVEICULO=<%= rs("IDVEICULO") %>"><%= rs("MODELO") %></a></font></strong></div></td>
                           <td width="100" class="celula1"><div align="left"><font size="1" face="Arial" color="#000000"><%= rs("COMBUSTIVEL") %></font></div></td>
                           <td width="100" class="celula1"><div align="left"><font size="1" face="Arial" color="#000000"><%= rs("ANO") %></font></div></td>
                           <td width="80" class="celula1"><div align="left"><font size="1" face="Arial" color="#000000"><%= rs("COR") %></font></div></td>
                           <td width="115" class="celula1"><div align="left"><font size="1" face="Arial" color="#000000">R$ <%= rs("VALOR") %></font></div></td>
                           <td width="115" class="celula1"><div align="left"><strong><font size="1" face="Arial" color="#000000" style="text-transform:uppercase">
                             <%
						Set conn = Server.CreateObject("ADODB.Connection")
                           conn.Open MM_webacon_eagle_STRING
                           set rstemp = conn.execute("SELECT * FROM USERSDETAILS WHERE CHAVEEMAIL = '" & rs("CHAVEEMAIL") & "'") 

						if not rstemp.eof then
						      if rstemp("EMPRESA") = "" THEN
							          RESPONSE.Write(" ")
							  ELSE
							          response.Write(rstemp("EMPRESA")) 
							  END IF		   
						else
						      response.Write(" ") 
						end if	  

						set conn = nothing
						%>
                           </font></strong><strong><font size="1" face="Arial" color="#000000" style="text-transform:uppercase">
                           <%
						Set conn = Server.CreateObject("ADODB.Connection")
                           conn.Open MM_webacon_eagle_STRING
                           set rstemp = conn.execute("SELECT * FROM USERSDETAILS WHERE CHAVEEMAIL = '" & rs("CHAVEEMAIL") & "'") 

						if not rstemp.eof then
						      if rstemp("vendedor3") = "" THEN
							          RESPONSE.Write(" ")
							  ELSE
							          response.Write(rstemp("vendedor3")) 
							  END IF		   
						else
						      response.Write(" ") 
						end if	  

						set conn = nothing
						%>
                           </font></strong></div></td>
                         </tr>

                         <tr>
                           <td colspan="7" class="celula1"></td></tr>

                     <% 
  rs.MoveNext
   intrec = intrec + 1
   if rs.eof then 
      response.write " " 
   end if		
wend
%>    

         <tr ><td colspan="7" align="center" height="40">
<% 
   'Criamos as Validações para a navegação "Anterior" e "Próximo"  
   if intpagina>1 then 
   %> 
   <a href="result_busca2.asp?pagina=<%=intpagina-1%>&VEICULO=<%=VEICULO%>&MARCA=<%=MARCA%>"><< Anterior</a> || 
   <%  
   end if 
   if StrComp(intpagina,rs.PageCount)<>0 then    
   %> 
   <a href="result_busca2.asp?pagina=<%=intpagina + 1%>&VEICULO=<%=VEICULO%>&MARCA=<%=MARCA%>">Próximo >></a>    
   <% 
   end if 
   rs.close 
   Set rs = Nothing 
   %> 

</td></tr>
                         </tbody>
     </table> 
   </div>
 </div></div>
<div class="clear"></div>
<div style="bottom:0; width:100%;">
<iframe  src="rodape.asp" width=100% height=100  marginwidth=0 marginheight=0 hspace=0 vspace=0 frameborder=0 scrolling=no noresize ></iframe>
</div>

</div><!-- div#tudo -->
  <div class="clear"></div>
</body>
</html>
<%


set MM_webacon_eagle_STRING = nothing


%>

Vlw pela ajuda

xanburzum · Junho 26, 2012

olha este exemplo, RANDOM com registros de um banco de dados sem repetição.

<%


' Gravamos o Recordset em um Array Bidimensional

Set strRS = Server.CreateObject("ADODB.RecordSet")

strRS.Open "SELECT * FROM membros ", strConexao, 3, 3

arySub = strRS.getRows()



' Fechamos a conexão pois não usaremos mais

strRS.Close

Set strRS = Nothing

strConexao.Close

Set strConexao = Nothing



Dim TotalReg, TotalNum, vran, x, encontrou, arrGerados(0)

Dim Numreg, verGerado, var_arrGerados, xLoop



Function GeraRegistros(TotalNum)

TotalReg=Cint(uBound(arySub,2)) ' Encontramos o Maior Array Gerado

vran = 1



For x = 0 To TotalNum-1 ' LOOP de 1 p/ Total solicitado

encontrou = 1

Randomize() ' Geramos o primeiro Random

NumReg = Cint((rnd*TotalReg))

verGerado = Split(var_arrGerados,",") ' Verifica se nº gerado

For xLoop = LBound(verGerado) To UBound(verGerado)

IF Trim(verGerado(xLoop)) = Trim(NumReg) Then

'Este "response" comentado abaixo, indica qual número se repetiram

'E não armazena no Array único, fazendo gerando um novo Random

'response.write "<b>[ "& verGerado(xLoop) &","& NumReg &" ]</b><br> "

x = x - 1

encontrou = 2

Exit For

End IF

Next

IF encontrou = 1 Then ' NÃO ENCONTROU, gera o próximo número



IF vran = 1 Then ' primeiro (Verificar este trecho)

arrGerados(0) = NumReg

vran = 2

Else

arrGerados(0) = arrGerados(0) &","& NumReg

End IF

var_arrGerados = Join(arrGerados)

End IF

Next

GeraRegistros = var_arrGerados

End Function

' Array gerado, podemos iniciar a formatação de perguntas

number = GeraRegistros(3)



verNum = Split(number, ",")

For x = LBound(verNum) to UBound(verNum)

response.write arySub(0,verNum(x)) &"."

response.write arySub(1,verNum(x)) &"<br>"

Next

%>

varela82 · Junho 26, 2012

Vlw xanburzum,

Tentei adapta esse codigo no meu e nada certo, como eu faria esse random no meu codigo ? desculpe pois eu nao sei praticamente nada de asp.

Obrigado

xanburzum · Junho 26, 2012

use a Function GeraRegistros(TotalNum)

varela82 · Junho 26, 2012

aonde eu colocaria essa funcao no codigo ?

xanburzum · Junho 26, 2012

poste seu code para analisar

varela82 · Junho 26, 2012

<script language="JavaScript">
function addFav(){
   var url      = "http://www.webbatidos.com.br";
   var title    = "Veiculos Batidos - Carros, Motos, Caminhões, Caminhonetes";
   if (window.sidebar) window.sidebar.addPanel(title, url,"");
   else if(window.opera && window.print){
       var mbm = document.createElement('a');
       mbm.setAttribute('rel','sidebar');
       mbm.setAttribute('href',url);
       mbm.setAttribute('title',title);
       mbm.click();
   }
   else if(document.all){window.external.AddFavorite(url, title);}
}
</script>
<script type='text/javascript'>
function iframeAutoHeight(quem){
   //by Micox - elmicox.blogspot.com - elmicox.com - webly.com.br  
   if(navigator.appName.indexOf("Internet Explorer")>-1){ //ie sucks
       var func_temp = function(){
           var val_temp = quem.contentWindow.document.body.scrollHeight + 10
           quem.style.height = val_temp + "px";
       }
       setTimeout(function() { func_temp() },100) //ie sucks
   }else{
       var val = quem.contentWindow.document.body.parentNode.offsetHeight + 10
       quem.style.height= val + "px";
   }    
}
</script>


<!--#include file="Connections/webacon_eagle.asp" -->
<%
dim VEICULO
VEICULO = request("VEICULO") & ""
VEICULO = replace(VEICULO,"'","")
VEICULO = replace(VEICULO,"*","")
VEICULO = replace(VEICULO,"&","")
Dim rs


VEICULO = REQUEST("VEICULO") & ""
MARCA = request("MARCA") & ""
MODELO = Request("MODELO") & ""

MARCA = REPLACE(MARCA,",","")

dim intpagina

if trim(VEICULO) <> "" AND trim(MARCA) <> "MARCA(TODAS)" then
               Set rs = Server.CreateObject("ADODB.Recordset")
               rs.ActiveConnection = MM_webacon_eagle_STRING
               rs.Source = "SELECT * FROM TBLVEICULOS where VEICULO='" & trim(VEICULO) & "' AND MARCA='" & TRIM(MARCA) & "' AND LIBERADO='SIM' AND ALTERADO='NAO' ORDER BY  Rnd(Int(Now()*[iDVEICULO])-Now()*[iDVEICULO])" 
               rs.CursorType = 1
               rs.CursorLocation = 2
               rs.LockType = 1
               rs.Open()


ELSE
               Set rs = Server.CreateObject("ADODB.Recordset")
               rs.ActiveConnection = MM_webacon_eagle_STRING
               rs.Source = "SELECT * FROM TBLVEICULOS where VEICULO='" & trim(VEICULO) & "' AND LIBERADO='SIM' ORDER BY  Rnd(Int(Now()*[iDVEICULO])-Now()*[iDVEICULO])" 
               rs.CursorType = 1
               rs.CursorLocation = 2
               rs.LockType = 1
               rs.Open()

       'Definimos o Numero de Paginas com a propriedade "PageSize" do objeto Recordset

end if
       'Definimos o Numero de Paginas com a propriedade "PageSize" do objeto Recordset
       rs.PageSize = 11

       'Criamos as Validações
       if rs.eof then
      response.Redirect("registro-nao-encontrado.asp?MARCA=" & TRIM(MARCA) & "&VEICULO=" & TRIM(VEICULO))
          Response.End 
       else
          'Definimos em qual pagina o visitante está
          if Request.QueryString("pagina")="" then 
             intpagina = 1
          else
             if cint(Request.QueryString("pagina"))<1 then
                intpagina = 1
             else
                if cint(Request.QueryString("pagina"))>rs.PageCount then  
                   intpagina = rs.PageCount
                else
                   intpagina = Request.QueryString("pagina")
                end if
             end if            
          end if         
       end if
%>
<script type="text/javascript" src="js/jquery-1.3.1.js"></script>
<script type="text/javascript">
   $(function(){
       $('#tabelax tr')
           .mouseover(function(){
               $(this).addClass('over');
           })
           .mouseout(function(){
               $(this).removeClass('over');
           });
   });
</script>
<link href='http://www.webbatidos.com.br/favicon.gif' rel='shortcut icon' type='image/x-icon'/>
<link href='http://www.webbatidos.com.br/favicon.gif' rel='icon' type='image/x-icon'/>
</head>
<body>
<div id="header" >

<!--#include file="header.asp"-->    
<div id="menu_ext">
<!--#include file="menubnet.asp"--> 
</div>

    </div>



<div class="clear"></div>

<div id="tudo">


<div id="colesquerda">
<div>
<iframe src="busca_avancada.asp" width="158" height="180"  marginwidth="0" marginheight="0" frameborder="0" scrolling="no" > </iframe>
</div>
<div style="margin-top:5px;width:145px;background:#FFF url(images/coldireita.jpg) repeat-y;">
<iframe src="colesquerda.asp" width="155"  onload="iframeAutoHeight(this)"  marginwidth="0" marginheight="0" frameborder="0" scrolling="no" >
       </iframe>
     </div>
   </div>

 <div style="margin-right:5px;">
   <div style="margin-top:5px;"> <table width="820" border="0" align="right" cellpadding="0" cellspacing="0" id="tabelax">

                          <tbody>

<tr  >
  <td colspan="7"  align="left" bgcolor="#FFFFFF" style="font-family:Arial, Helvetica, sans-serif;font-size:12px;font-weight:bold;">VEÍCULOS ENCONTRADOS</td>
  </tr>
<tr >
             <td width="100"  align="center" bgcolor="#FFFFFF"><div class="style1" style="padding-top:10px;padding-bottom:10px;"><font face="Verdana" size="2">FOTO</font></div></td>
                           <td bgcolor="#FFFFFF" ><div align="left"><span class="style1"><font face="Verdana" size="2">MODELO</font></span></div></td>
                           <td bgcolor="#FFFFFF" ><div align="left"><span class="style1"><font face="Verdana" size="2">COMB.</font></span></div></td>
                           <td bgcolor="#FFFFFF" ><div align="left"><span class="style1"><font face="Verdana" size="2">ANO</font></span></div></td>
                           <td bgcolor="#FFFFFF" ><div align="left"><span class="style1"><font face="Verdana" size="2">COR</font></span></div></td>
                           <td bgcolor="#FFFFFF" ><div align="left"><span class="style1"><font face="Verdana" size="2">PREÇO</font></span></div></td>
                           <td bgcolor="#FFFFFF" ><div align="left"><span class="style1"><font face="Verdana" size="2">SITUAÇÃO</font></span></div></td>
                         </tr>

<% 
 'Iniciamos o Loop
   rs.AbsolutePage = intpagina 
   intrec = 0
   While intrec < rs.PageSize and not rs.eof  

%>

                         <tr  >

                         <td width="100"  align="center" class="celula1"><div style="padding-top:10px;padding-bottom:10px;"><a href="consultar_veiculo.asp?IDVEICULO=<%= rs("IDVEICULO") %>" target="_parent"><font face="Arial" size="2" color="#333333"><img src= <%= "banco_veiculos" & "/" & rs("IMAGES").Value %> border="0" width="99" height="85"></font></a></div></td>

                           <td  width="150" class="celula1" ><div align="left"><b></b><strong><font size="1" face="Arial" color="#000099" style="text-transform:uppercase"><a href="consultar_veiculo.asp?IDVEICULO=<%= rs("IDVEICULO") %>"><%= rs("MODELO") %></a></font></strong></div></td>
                           <td width="100" class="celula1"><div align="left"><font size="1" face="Arial" color="#000000"><%= rs("COMBUSTIVEL") %></font></div></td>
                           <td width="100" class="celula1"><div align="left"><font size="1" face="Arial" color="#000000"><%= rs("ANO") %></font></div></td>
                           <td width="80" class="celula1"><div align="left"><font size="1" face="Arial" color="#000000"><%= rs("COR") %></font></div></td>
                           <td width="115" class="celula1"><div align="left"><font size="1" face="Arial" color="#000000">R$ <%= rs("VALOR") %></font></div></td>
                           <td width="115" class="celula1"><div align="left"><strong><font size="1" face="Arial" color="#000000" style="text-transform:uppercase">
                             <%
                                                       Set conn = Server.CreateObject("ADODB.Connection")
                           conn.Open MM_webacon_eagle_STRING
                           set rstemp = conn.execute("SELECT * FROM USERSDETAILS WHERE CHAVEEMAIL = '" & rs("CHAVEEMAIL") & "'") 

                                                       if not rstemp.eof then
                                                             if rstemp("EMPRESA") = "" THEN
                                                                         RESPONSE.Write(" ")
                                                                 ELSE
                                                                         response.Write(rstemp("EMPRESA")) 
                                                                 END IF                   
                                                       else
                                                             response.Write(" ") 
                                                       end if    

                                                       set conn = nothing
                                                       %>
                           </font></strong><strong><font size="1" face="Arial" color="#000000" style="text-transform:uppercase">
                           <%
                                                       Set conn = Server.CreateObject("ADODB.Connection")
                           conn.Open MM_webacon_eagle_STRING
                           set rstemp = conn.execute("SELECT * FROM USERSDETAILS WHERE CHAVEEMAIL = '" & rs("CHAVEEMAIL") & "'") 

                                                       if not rstemp.eof then
                                                             if rstemp("vendedor3") = "" THEN
                                                                         RESPONSE.Write(" ")
                                                                 ELSE
                                                                         response.Write(rstemp("vendedor3")) 
                                                                 END IF                   
                                                       else
                                                             response.Write(" ") 
                                                       end if    

                                                       set conn = nothing
                                                       %>
                           </font></strong></div></td>
                         </tr>

                         <tr>
                           <td colspan="7" class="celula1"></td></tr>

                     <% 
  rs.MoveNext
   intrec = intrec + 1
   if rs.eof then 
      response.write " " 
   end if              
       wend
%>    

         <tr ><td colspan="7" align="center" height="40">
<% 
   'Criamos as Validações para a navegação "Anterior" e "Próximo"  
   if intpagina>1 then 
   %> 
   <a href="result_busca2.asp?pagina=<%=intpagina-1%>&VEICULO=<%=VEICULO%>&MARCA=<%=MARCA%>"><< Anterior</a> || 
   <%  
   end if 
   if StrComp(intpagina,rs.PageCount)<>0 then    
   %> 
   <a href="result_busca2.asp?pagina=<%=intpagina + 1%>&VEICULO=<%=VEICULO%>&MARCA=<%=MARCA%>">Próximo >></a>    
   <% 
   end if 
   rs.close 
   Set rs = Nothing 
   %> 

</td></tr>
                         </tbody>
     </table> 
   </div>
 </div></div>
<div class="clear"></div>
<div style="bottom:0; width:100%;">
<iframe  src="rodape.asp" width=100% height=100  marginwidth=0 marginheight=0 hspace=0 vspace=0 frameborder=0 scrolling=no noresize ></iframe>
</div>

</div><!-- div#tudo -->
  <div class="clear"></div>
</body>
</html>
<%


set MM_webacon_eagle_STRING = nothing


%>

xanburzum · Junho 27, 2012

coloque a função antes da exibição dos produtos.

Arquivado

Paginação Randomica com repetição de resultados

Recommended Posts

varela82 0

Compartilhar este post

Link para o post

Compartilhar em outros sites

xanburzum 169

Compartilhar este post

Link para o post

Compartilhar em outros sites

varela82 0

Compartilhar este post

Link para o post

Compartilhar em outros sites

xanburzum 169

Compartilhar este post

Link para o post

Compartilhar em outros sites

varela82 0

Compartilhar este post

Link para o post

Compartilhar em outros sites

xanburzum 169

Compartilhar este post

Link para o post

Compartilhar em outros sites

varela82 0

Compartilhar este post

Link para o post

Compartilhar em outros sites

xanburzum 169

Compartilhar este post

Link para o post

Compartilhar em outros sites

PHP+Codeigniter - Dúvida em Relação a Teclas

Conexão mysql com outro domínio

[Resolvido] JavaScript - Exibir logo dentro da Tabela html

Fóruns

Tempo Real

Informação importante