Shopping Hospedagem Fórum Contato
     
   O portal do desenvolvedor ASP Florianópolis-SC, Sábado - 18 de Novembro de 2017  
Busca

Menu do site
Efetuar Login
Usuário:

Senha:

 Esqueceu a senha?
Login automático

 Cadastre-se
Capturando dados com o For Each
Avaliações: 19   -   Minha nota: Média Geral: 6  
Existe uma maneira de tratarmos rapidamente com dados de uma coleção de informações.
Esta coleção pode ser dados um Array, de um formulário, ou de uma URL, entre outros.
basta utilizamos o comando For Each, que pode ser muito útil na programação.

Vejamos através de exemplos o que podemos fazer:

Tratando dados vindos de um formulário
 
1
2
3
4
5
6
7
8
9
11
<%
Dim item
For Each item In Request.Form
  Response.Write item
  Response.Write " = "
  Response.Write Request.Form(item)
  Response.Write "<br>"
Next
Set item = Nothing
%>


Na linha 3 utilizamos o For Each para capturar todas as variaveis vindas de um formulário
Na linha 5 escrevemos o nome da variável
Na linha 5 escrevemos o valor da variável


Tratando dados vindos de uma URL

1
2
3
4
5
6
7
8
9
11
<%
Dim item
For Each item In Request.QueryString
  Response.Write item
  Response.Write " = "
  Response.Write Request.QueryString(item)
  Response.Write "<br>"
Next
Set item = Nothing
%>

Da mesma forma, na linha 3 utilizamos o For Each para capturar todas as variaveis vindas de uma URL
Na linha 5 escrevemos o nome da variável
Na linha 5 escrevemos o valor da variável

Tratando dados de umArray

1
2
3
4
5
6
7
8
9
11
12
13
14
15
16

<%
Dim dia(6)
dia(0)="Domingo"
dia(1)="Segunda-Feira"
dia(2)="Terça-Feira"
dia(3)="Quarta-Feira"
dia(4)="Quinta-Feira"
dia(5)="Sexta-Feira"
dia(6)="Sábado"

For Each item In dia
  Response.write item
  Response.Write "<br>"
Next
%>

A vantagem deste comando é que podemos tratar com os dados sem mesmo sabermos os nomes das variáveis, como expressa bem os exemplos de um Request.Form e o Request.QueryString.


Espero que este exemplo lhe seja útil.



Fabiano Dias
fabiano@superasp.com.br

www.superasp.com.br
O portal do desenvolvedor ASP




SuperASP do Brasil Ltda

03.066.522/0001-84
Av. Rio Branco 433 - Centro - Florianopolis - SC
Contato

© 2001/2008 - Superasp do Brasil Ltda. Todos os direitos reservados