For each

[mkboy 1]

Alguem pode me explicar esse for:

 

ASP

[*]  For Each Image in Imagens

 

[*]  Arquivo = Left(Image.name, Instr(1, Image.name, ".", 1) - 1)

 

[*]  Arquivo = Image.Name

 

[*] 'pega nome do arquivo

 

[*] nArquivo = "thumb_" & Arquivo

 

[*] 'gera nome thumbnails

 

[*] objImage.LoadImage Pasta & "\" & Image.name

 

[*] 'carrega imagem

 

[*] objImage.Resize 100,100

 

[*] 'redimensiona a imagem

 

[*] objImage.ImageFormat = 1

 

[*] 'formato jpeg

 

[*] objImage.Filename = dirThumb & nArquivo

 

[*] 'informa local para salvar thumb

 

[*] objImage.SaveImage()

 

[*] 'salva seu thumb

 

[*]' Response.Write("<img src='./thumb/" & nArquivo & "'><br>" & vbcrlf)

 

[*] 'exibe thumb na tela

 

[*]  Next

[alfaleo 0]

O For each faz uma referencia para cada item, objeto, etc dentro de uma determinada coleção.No caso: For each IMAGEM in Imagesvocê está fazendo o seguinte: - Referenciando à coleção Images, que provavelmente possui diversos objetos do tipo Imagem - Atribuindo ao objeto corrente (dentro do loop) o nome IMAGEM, para poder manipulá-lo - Efetua comandos que utilizam propriedades e metodos desse objeto - Faz o looping e repete o processo para o proximo objetoEspero ter ajudado.