Jump to content


Photo

Resgatar Os Registros E Jogar No Input (text)


  • Faça o login para participar
3 replies to this topic

#1 rafa-martin

rafa-martin

    24 Horas

  • Usuários
  • 406 posts
  • Sexo:Não informado

Posted 21/12/2005, 10:19

pessoal, eu fiz um for dessa forma:

dim no, crit, alt, valor
if not isnull(r_noterm) then
for y = 0 to ubound(r_noterm,2)
if r_noterm(0,y) > 0 then
valor = r_noterm(3,y)
Response.Write "valor -" & valor & "<br>"
end if
next
'Response.End
end if

nesse for eu trago todos os registros do campo na tabela

e chamo dessa forma:

<%for x = 1 to j%>
<td align="center">
<input size=5 type="text" onKeypress="return sonumeros(event);" name="textos" value="<%=valor%>">
</td>
<%next%>

e como vc's podem ver o input é gerado várias vezes na tela. e q o value dele é o valor da variável valor q faço no for.

só que está jogando no value no input apenas o ultimo valor do campo da tabela, pq quando acaba o loop, acaba no ultimo registro e por isso joga apenas o ultimo. só q eu queria pegar todos e jogar todos no input.

nesse meu caso gera 6 inputs e os valores 1 2 3 4 5 e 6 tem q ir para o value do input

como eu posso fazer isso?

Attached Files



#2 FoxCrazy

FoxCrazy

    Bill Medley - He Ain't Heavy, He's My Brother

  • Usuários
  • 187 posts
  • Sexo:Não informado
  • Interesses:ASP Maníaco!

Posted 21/12/2005, 10:53

Olá caro amigo,

É o seguinte, os imputs lo loop estão com o mesmo nome, faça o seguinte;


<%for x = 1 to j%>
<td align="center">
<input size=5 type="text" onKeypress="return sonumeros(event);" name="textos<%=x%>" value="<%=valor%>">
</td>
<%next%>


Agora teremos 6 inputs com 6 nomes diferentes.

Um Abraço.

.


#3 rafa-martin

rafa-martin

    24 Horas

  • Usuários
  • 406 posts
  • Sexo:Não informado

Posted 21/12/2005, 11:04

o problema é q eu ´já inclui dessa forma

for i = 0 to ubound(splalternativa)
for k = 0 to UBound(splcritpai) step 1
r_mt = con.Gravar(erro,noterm,trim(splcritpai(k)),trim(splalternativa(i)),trim(splvalor(x)),dtmatriz,session("ParticipanteAlcanceID"),session("ParticipanteID"),session("ProgramaID"),null)
x = x + 1
next
next

então eu tenho q trazer da forma q te falei

como posso fazer isso?

#4 rafa-martin

rafa-martin

    24 Horas

  • Usuários
  • 406 posts
  • Sexo:Não informado

Posted 21/12/2005, 12:47

eu fiz uma forma de fazer a busca dessa forma:

dim valor
if not isnull(r_noterm) then
for y = 0 to ubound(r_noterm,2)
if r_noterm(0,y) > 0 then
valor = r_noterm(3,y)
'for x = 1 to j
%>
<td align="center">
<input size=5 type="text" onKeypress="return sonumeros(event);" name="textos" " value="<%=valor%>">
</td>
<%
'next
end if
next
end if

ele até traz, porém veja como fica.

os valores 4 5 e 6 teriam q estar debaixo dos 1 2 e 3. ele está criando coluna a mais.

teria q ficar como na primeita imagem aqui postada por mim. só q com os valore 1 2 3
4 5 6

como posso fazer isso?

Attached Files






1 user(s) are reading this topic

0 membro(s), 1 visitante(s) e 0 membros anônimo(s)

IPB Skin By Virteq