[Resolvido] on Error resume next - Problema

[gfm100 0]

Olá pessoal, esse é meu primeiro post aqui, mas sempre usei o iMaster pra tirar dúvidas, porém dessa vez eu pesquisei mas não consegui de jeito nenhum aplicar o "on Error resume next" do ASP no meu código.

 

o código é o seguinte:

CODE

do While i < 9

Set FSO = Server.CreateObject("Scripting.FileSystemObject")

Set imagem(i) = FSO.GetFile(Server.MapPath(arrayImagem(i)))

imagem.delete

i = i + 1

loop

Pra quem já entendeu é simples, mas vou explicar...

 

Quero que quando ele não achar o arquivo para apagar ele simplesmente ignore e continue tentando apagar os próximos.

 

O array tem capacidade de 9 variáveis (0 até 8) e já tentei usar o "on Error resume next" de várias formas,e a última ficou assim:

CODE

do While i < 10

Set FSO = Server.CreateObject("Scripting.FileSystemObject")

Set imagem(i) = FSO.GetFile(Server.MapPath(arrayImagem(i)))

on Error resume next

imagem.delete

i = i + 1

if Err.number <> 0 then

end if

on Error goto 0

loop

Alguém poderia me dar uma ajudinha??? O serviço está bem em cima da hora pra entregar http://forum.imasters.com.br/public/style_emoticons/default/blush.gif

 

Obrigado pela atenção http://forum.imasters.com.br/public/style_emoticons/default/thumbsup.gif

[gfm100 0]

Desculpem pela minha falta de atenção http://forum.imasters.com.br/public/style_emoticons/default/blush.gif

 

Percebi meu erro agora: estava colocando o "on Error resume next" depois do erro acontecer :P

 

O correto é:

CODE

do While i < 9

on Error resume next

Set FSO = Server.CreateObject("Scripting.FileSystemObject")

Set imagem(i) = FSO.GetFile(Server.MapPath(arrayImagem(i)))

if Err = 56 then

i = i + 1

else

imagem(i).delete

i = i + 1

end if

loop

Só queria que alguem me explicasse o que seria o "on Error goto 0" que algumas pessoas colocam, pois o resto já entendi http://forum.imasters.com.br/public/style_emoticons/default/joia.gif

 

Obrigado!