Requisitar um campo determinado

[regitronic 0]

Pessoal estou com uma dúvida: tenho uma tabelinha com uma linha e 3 colunas a primeira coluna tem um text field, nesta tabela eu do um movenext loop para mostrar varios dados recuperados do BD então são geradas varias linhas nessa tabela e varias text field, porem eu preciso recupera por exemplo o primeiro text field, como todos os text field gerados pelo loop tem o mesmo nome então quando mando fazer a consulta ele requisita todos os text field então o banco trava. Alguem pode me ajuda?

 

A pagina está abaixo

<!--#include file="conecta.asp"-->
<% on error resume next %>
<%

pedido = request.Form("pedido")
set rs = conexao.execute("SELECT * FROM pedidos WHERE num_pedido='"&pedido&"'")

%>
<style type="text/css">
<!--
.style2 {font-family: Verdana, Arial, Helvetica, sans-serif; font-size: 10px; }
-->
</style>
<form id="form1" name="form1" method="post" action="mailto: diniz@regitronic.com.br, ">
  <table width="800" height="529" border="0" align="center" cellpadding="0" cellspacing="0">
    <tr>
      <td height="135"><img src="top.jpg" width="800" height="135" /></td>
    </tr>
    <tr>
      <td height="347"><table width="100%" border="1" cellpadding="0" cellspacing="0" bordercolor="#000000">
        <tr>
          <td width="13%"><div align="center" class="style2">CODIGO</div></td>
          <td width="59%"><div align="center" class="style2">NOME</div></td>
          <td width="17%"><div align="center" class="style2">QUANTIDADE</div></td>
          <td width="11%"><div align="center" class="style2">VALOR</div></td>
        </tr>
        <tr>
          <td><% do while not rs2.eof %>
		  <% response.Write rs("codigo") %>
             </td>
          <td><% response.Write rs("nome") %>
             </td>
          <td><% response.Write rs("quantidade") %>
             </td>
          <td><% response.Write rs("valor") %>
             </td>
        </tr>
        <tr><% rs2.MoveNext
		loop %>
          <td> </td>
          <td> </td>
          <td> </td>
          <td> </td>
        </tr>
      </table></td>
    </tr>
    <tr>
      <td height="19" bgcolor="#003466"> </td>
    </tr>
  </table>
</form>

[xanburzum 169]

naun entendi muito, bem,....

[regitronic 0]

tipo

eu tenho uma pagina com uma tabela como a demostrada abaixo dentro de uma form e o OK é um botão se Submit

 

Nº Pedido STATUS TRANSMITIR

TEXT FIELD1 AGUARDANDO OK

 

Ai depois do select e do loop ela retoma os valores assim

 

Nº Pedido STATUS TRANSMITIR

TEXT FIELD1 AGUARDANDO OK

TEXT FIELD1 AGUARDANDO OK

TEXT FIELD1 AGUARDANDO OK

 

Mas quando eu clico no botao OK da primeira linha, a pagina intende que eu to chamando todas as text fields pois todas elas tem o mesmo nome (pois são geradas apartir de um loop) e eu não sei como por exemplo quando a pessoa clicar em OK ele requisitar so o valor q está na primeira text na verdade eu queria q ficasse assim

 

Nº Pedido STATUS TRANSMITIR

TEXT FIELD1 AGUARDANDO OK

TEXT FIELD2 AGUARDANDO OK

TEXT FIELD3 AGUARDANDO OK

.

.

.

So que de um jeito automatico sem que eu precise inserir as text fields manualmente e quando a pessoa clicar em OK na linha 1 requisitar a text field da linha 1

[xanburzum 169]

faz um loop no request.form , ele virá separado por virgula, você pode dar um SPLIT nele e recuperar os valores...

[regitronic 0]

cara eu nunca usei essa função split tem como você me explicar como ficaria?

[xanburzum 169]

Função Split ( ), Devolve um array com um numero especificado de substrings.

 

 

Dim MeuString, MeuArray, Msg
MeuString = "VBScriptXéXgiro!"
MeuArray = Split(MyString, "x", -1, 1)
' MeuArray(0) tem "VBScript".
' MeuArray(1) tem "é".
' MeuArray(2) tem "giro!".
Msg = MeuArray(0) & " " & MeuArray(1)
Msg = Msg & " " & MeuArray(2)
Response.write Msg

Você está tentando quebrar uma string em pedaços menores, Função que lhe permite dividir dados e fatiar string.

 

Vamos dizer que você toma em uma frase e quer colocar cada palavra em uma variável diferente. Então você levar em

 

NameStr = "Mr. Xan Burzum"

 

Configurar a matriz para armazenar os resultados com

 

Dim WordArray

 

em seguida, fazer a divisão, usando um espaço como o indicador de separação

 

WordArray = Split (NameStr, "")

 

Agora WordArray (0) é igual a "Mr.", WordArray (1) é igual a "Xan" e WordArray (2) é igual a "Burzum"! Você pode usar as funções de matriz e várias outras funções de cadeia para trabalhar com esses resultados.