SQL ASP

[DeeKilleer]

Galera Tenho essa instrução :

Sql = "Select Candidato,ID_Candidato From Candidato_Dados Where ID_Candidato = in(" & Request.Form("Numeros"))

Mas está dando erro, fala que se espera um final da instrução, porém eu não sei como colocar as aspas corretamente, por causa do IN. Alguém pode me ajudar ??

valeu!

[Jonathan Queiroz]

Falta um operador "&" ali no final

Tente assim:

Sql = "Select Candidato,ID_Candidato From Candidato_Dados Where ID_Candidato = in(" & Request.Form("Numeros") & ")"

[DeeKilleer]

Ahh Vlw..

Outra pergunta, como eu faço para pegar mais de um resultado no Select, visto que eu tenho um IN ali, mas ele só está pegando um resultado.

<%
        Dim Sql, Tipo_Consulta
        Sql = "Select Candidato,ID_Candidato,Email From Candidato_Dados Where ID_Candidato in(" & Request.Form("Numeros") & ")"
        RS = conexao.Execute(Sql)
        Set RS = Server.CreateObject("ADODB.RecordSet")            
        RS.Open Sql, conexao, 3, 3
    %>
        
    <%=    RS.Fields("Email") %>
    <% RS.movenext%>

Editado Março 23, 2009 por DeeKilleer

[DeeKilleer]

Galera, já Consegui esse problema acima.

Eu estou pegando por exemplo 3 Email, como resultado, e entre ele coloquei para que aparecesse um ";" (Ponto e Vírgula), mas quando chega no último e-mail ele coloca o ";", como faço para tirá-lo ?

<%
        Dim Sql, Tipo_Consulta
        Sql = "Select Candidato,ID_Candidato,Email From Candidato_Dados Where ID_Candidato in(" & Request.Form("Numeros") & ")"
        RS = conexao.Execute(Sql)
        Set RS = Server.CreateObject("ADODB.RecordSet")            
        RS.Open Sql, conexao, 3, 3
        While Not RS.EOF 
    %>
        
    <%=    RS.Fields("Email") & "; " %>
    
    <% 
       RS.Movenext 
       Wend
       RS.Close
       Set RS = Nothing
    %>

[bareta]

vamos lá...

basicamente:

response.write left(RS.Fields("Email"),len(RS.Fields("Email"))-1)