Pegar valor checkbox e fazer um select

[DSerma 19]

Faltaram as apóstofres..

 

for i = 0 to UBound(ArrP)
        SQLmostraFiltro = SQLmostraFiltro & " OR canal = '" & Arrp(i) & "'"
next

Att;

[Ronaldo Bueno 23]

Beleza Darkdemo, obrigado pela paciência. valeu mesmo.

 

Tenho uma pergunta, pode ? ai vou tentar fazer só.

 

Essa página do resultado, fica dando reflesh em tempo em tempo, e ai acontece que ele não pega o filtro, abre sem nada, saberia me dizer o q tenho que fazer para atualizar as noticias que chegarem novas, mas como o mesmo filtro que o cara fez anteriormente ?

[Patrique 0]

Pesquise por session ou application, com ele é possível você gravar estes dados e mais pra frente quando precisar resgata-los fazendo uma verificação com case ou if para montar a pesquisa ou não.

[Ronaldo Bueno 23]

beleza, obrigado por enquanto. valeu pela força, bom fds

[Clauido José 3]

Cara tenten seguir essa logica fiz um sistema parecido e funciona ok so mude sua query

 

 

sNoOs=Request("sNoOs")

vItensMarcado = split(sNoOs,",")

if not IsArray(vItensMarcado) then

vItensMarcado = array(vItensMarcado)

end if

for i = 0 to ubound(vItensMarcado)

if trim(vItensMarcado(i)) <> "" then

strSql = "Select * from tabDTH where DatCompromisso = '" & (Data) & "' "

strSql = strSql & " and NoOs = " & vItensMarcado(i)

if rsRota.state=1 then rsRota.Close

rsRota.Open strSql,Conexao,1,1

end if

next

 

[Patrique 0]

Nesse caso como existe for ele duplica as queries... SELECT... CONN

 

Desaconselho a alguém fazer assim, pois são vários queries dependendo do resultado e existe outras formas que não sobrecarregam tanto assim.

 

Se a aplicação for pequena beleza, mais se for grande a diferença será sentida.