N deu certo n mano... da um erro dizendo que esta em conflito entre si.. está aí o codigo todo com a paginaçao. tipo para eu tentar.. como faço para ter outro campo com o nome localtipo.. ex: conexao com localtipo e localtipo1.. e localtexto e localtexo1.. acho que assim deveria funcionar ! tem como adicionar ?? <% if Request.Form("localtipo") <> "" Then Dim textoqueveio, tipoSQL textoqueveio = Trim(Request("localtexto")) _____________________________________________________________ <option value="localnome">Estado civil</option> </select> </p> <p align="center"><font face="Arial"><select size="1" name="localtipo"> <option value="localsexo">Procuro por</option> </select> </font> </p> <p align="center"><font face="Arial"><select size="1" name="localtexto"> <option value="sexo">Homem</option> <option value="sexo">Mulher</option> </select> </font> </p> <blockquote> <p align="center"> <font face="Arial"> <select size="1" name="localtexto"> <option>Solteiro</option> <option>Enrolado</option> <option>Namorando</option> <option>Noivo</option> <option>Casado(a)</option> </select> <br> <input TYPE="SUBMIT" VALUE="Localizar"> </font> </font> <table border="0" width="471" bgcolor="#FF99FF" cellspacing="0" cellpadding="0"> <tr> <tudo width="230"><font size="1" color="#000000"><img border="0" src="chatlove/cadastrolg.gif"><br> <img border="0" src="chatlove/seta.gif"> <span class="csscadtexto">Buscar por Afinidade<br> </span><img border="0" src="chatlove/seta.gif"> <span class="csscadtexto">Identidade anônima<br> </span><img border="0" src="chatlove/seta.gif"> <span class="csscadtexto">Veja as Cantadas da galera<br> </span><img border="0" src="chatlove/seta.gif"><span class="csscadtexto"> Marque um encontro<br> </span><img border="0" src="chatlove/seta.gif"><span class="csscadtexto"> Registre e faça novas amizades.</span></font></tudo> <tudo width="241" bgcolor="#FF0066"> </tudo> </tr> </table> <table border="0" width="100%" cellspacing="0" cellpadding="0"> <tr> <tudo width="47%"><font face="Arial"> <a href="cadastro.asp"> <img border="0" src="chatlove/cadastro.gif"></a><br> </font><font size="1" face="Verdana">Cadastre-se agora e fique ligado(a) ! Você pode encontrar sua alma gêmea ou uma nova amizade</font></tudo> <tudo width="53%"></tudo> </tr> </table> <p align="left"> <font size="2"> <font face="Arial"><br> </font> </blockquote> </form> </DIV> </font> <font size="2" face="Arial"> <% if Request.Form("localtipo") <> "" Then Dim textoqueveio, tipoSQL textoqueveio = Trim(Request("localtexto")) if Request("localtipo") = "localnome" then Dim user1SQL user1SQL = "SELECT * FROM tabelatotal WHERE nome LIKE '%" & textoqueveio & "%' ORDER BY nick" tipoSQL = user1SQL end if if Request("localtipo") = "localsexo" then Dim user2SQL user2SQL = "SELECT * FROM tabelatotal WHERE sexo LIKE '%" & textoqueveio & "%' ORDER BY nick" tipoSQL = user2SQL end if if Request("localtipo") = "op" then Dim SQLoperadores SQLoperadores = "SELECT * FROM tabelatotal WHERE (situacao = 2) OR (situacao = 3) ORDER BY nick" tipoSQL = SQLoperadores end if Dim userRS Set userRS = Server.CreateObject("ADODB.Recordset") userRS.Open tipoSQL, objcon Dim hoje hoje = Year(Date()) Dim contador contador = 0 do While Not userRS.EOF %>