Problemas com request

[Carcleo 4]

Por que, no script abaixo, quando chego no fim do arquivo na linha

response.write "<a href=ibusca.asp?action=consultar&pagina=" & Cont & "&onde="&request.QueryString("onde")&">" & mostra & "</a> "

quando faço o

onde="&request.QueryString("onde")&"

A variavel onde recebe apenas a primeira parte da string até o primeiro espaço vazio?

Detalhe:

Coloquei um response.write uma linha antes para ver a variavel, e ela estava completa.

Preciso colocar ela toda ali pra jogar pro inicio do arquivo.

Como fazer isso?

 

 

ASP

[*]

[*]

[*]<%

[*] Dim busca, onde, pesq, x, bg, DfId, DesenharTabela, cor, ModuloNome 'Declara as variaveis.

[*] Dim laco, buscadas, considera, palavra, palavra2, pergunta, registro

[*] Dim NomeAutor, objRecordSetNomeAutor, objRecordSetNomeModulo

[*] Dim faq_id, faq_modulo, faq_autor, faq_pergunta, faq_resposta, faq_versao

[*] Dim pagina, paginas, registros, total, inicio, fim, nomes, cont, mostra

[*]

[*]If REQUEST.QUERYSTRING("action") = "consultar" then

[*]

[*] pagina = request("pagina")

[*] if pagina = "" then

[*] pagina = 1

[*] else

[*] pagina = cint(pagina)

[*] end if

[*] DesenharTabela = true

[*]

[*] Conectar objConecta, objRecordSet, "SELECT tbFaq.DfIdFaq, tbModulo.DfNomeModulo, tbFaq.DfIdUsuario, tbFaq.DfPergunta, tbFaq.DfResposta, tbFaq.DfVersao FROM tbFaq INNER JOIN tbModulo ON tbfaq.DfidModulo = tbModulo.DfIdModulo where "&request.QueryString("onde")&""

[*] if not objRecordSet.EOF then

[*] nomes = objRecordSet.getrows()

[*]

[*] total = ubound(nomes,2)

[*] registros = 10

[*] paginas = total / 10

[*]

[*] if cint(paginas) * registros < total then

[*] paginas = cint(paginas) + 1

[*] end if

[*]

[*] if pagina = 1 then

[*] inicio = 0

[*] else

[*] inicio = cint(registros) * (pagina) - 10

[*] end if

[*]

[*] fim = cint(inicio) + 9

[*] if cint(fim) > cint(total) then

[*] fim = cint(total)

[*] end if

[*]

[*] if DesenharTabela=True then

[*] 'Criando desenho tabela

[*] response.Write "<br><p>"

[*] response.Write "<table border='0' width=95% align=center cellspacing='1', cellpading='2'>"

[*] response.Write "<tr bgcolor=#8193A7>"

[*] response.Write "<td width=50 align=center height=20><font color=#FFFFFF><b>ID</b></fonte></td>"

[*] response.Write "<td width=70 align=center height=20><font color=#FFFFFF><b>Modulo</b></fonte></td>"

[*] response.Write "<td width=320 align=center height=20><font color=#FFFFFF><b>Pergunta</b></fonte></td>"

[*] response.Write "<td width=100 align=center height=20><font color=#FFFFFF><b>Autor</b></fonte></td>"

[*] response.Write "<td width=100 align=center height=20><font color=#FFFFFF><b>Versao</b></fonte></td>"

[*] response.Write "<td width=100 align=center height=20><font color=#FFFFFF><b>Visualizar</b></fonte></td>"

[*] response.Write "</tr>"

[*] DesenharTabela = false

[*] End if

[*]

[*] cor = 1

[*]

[*] FOR Cont=inicio TO fim

[*] if (cor = 1) then

[*] bg = "#E8ECEE"

[*] cor = 2

[*] else

[*] bg = "#D3DBDE"

[*] cor = 1

[*] end if

[*]

[*] response.Write "<tr bgcolor="&bg&">"

[*] response.Write "<td width=50 height=20>"&nomes(0,Cont) &"</td>"

[*] response.Write "<td width=70 height=20>"&nomes(1,Cont) &"</td>"

[*] response.Write "<td width=320 height=20>"&nomes(3,Cont) &"</td>"

[*] response.Write "<td width=100 height=20>"&nomes(4,Cont) &"</td>"

[*] response.Write "<td width=100 height=20>"&nomes(5,Cont) &"</td>"

[*] response.Write "<td width=100 height=20 align=center><a href=verfaq.asp?action=1&id="&nomes(0,Cont) &"><img src=../imagens/ver.ico width=25 border=0></a></td>"

[*] response.Write "</tr>"

[*] next

[*] response.Write "</td></tr></table><br>"

[*] FOR Cont = 1 TO cint(paginas)

[*] if cint(pagina) = Cont then

[*] mostra = "[" & Cont & ]"

[*] else

[*] mostra = Cont

[*] end if

[*] response.write "<a href=ibusca.asp?action=consultar&pagina=" & Cont & "&onde="&request.QueryString("onde")&">" & mostra & "</a> "

[*] next

[*]' response.Write request("onde")

[*] else

[*] response.Write "<center><b>Nenhuma Faq Cadastrada</b></center>"

[*] end if

[*]end if

[*]' ############################# Fim da Lista para Edição ###########################

[*]%>

[*]

[dark0 0]

Topico repetido..

 

http://www.imasters.com.br/forum/index.php?showtopic=128823

[Mário Monteiro 179]

porque você não fechou com aspas...

[dark0 0]

porque você não fechou com aspas...

<{POST_SNAPBACK}>

hã? :blink:

[naofuieu 0]

Sai melhor pra você declarar essa Request.QueryString("onde") como uma variável.

 

onde = Request.QueryString("onde")

 

Daí, você põe no códido algo assim:

 

response.write "<a href=ibusca.asp?action=consultar&pagina=" & Cont & "&onde=" & onde & ">" & mostra & "</a> "

 

Do jeito que você havia feito, o ASP interpreta o ("onde") como sendo texto a ser inserido...