Tratamento De Erros

[Lucas Phillip]

Ae galera... eu to com problema em tratar erros no vb6... eu estava usando

on error goto x

e isso ate q funcionava se tivesse só 1 erro por sub... mas ai começo a aparecer mais de 1 e ai a coisa complico..

eu queria saber se não tem algo parecido com o tratamento de erros do vb.net, aquele "try, catch, end try", só q pro vb6... ou então algum jeito melhor de tratar erros..

vlw

[Aspmais]

Cara vê se esse tuto aqui te ajuda...

http://www.linhadecodigo.com.br/artigos.asp?id_ac=136

[brunohjoia]

Basta que você inclua um if para que o programa identifique qual é o erro ocorrido e que faça o correto tratamento do erro. Você pode usar assim:

on error goto trataerro

trataerro:
   if err="numero do erro" then
      msgbox "Erro numero " & Err & " " & err.description
   elseif err="numero do outro erro" then
      msgbox "blablabla"
   elseif ....

E assim por diante!

falou!

[Lucas Phillip]

ae.. não consegui fazer o q eu quero ainda não.. dexa eu tenta explica melhor

por exemplo...

a = split(B, "-")

on error goto continua

if (a(2) = "x") then
'codigos
end if

if (a(2) = "y") then
'codigos
end if

continua:
'codigos

tem um split no script, e eu quero pegar por exemplo o a(2)... só q nem sempre a(2) existe... então quando ele não existe volta erro... ai para tirar esse erro, eu coloquei um on error goto continua...

só q eu preciso checar 2 vezes o a(2)... só q se a 1 falhar, a linha "on error goto continua" vai fazer com q o segundo if seja ignorado, porque já deu erro no primeiro if...

deu pra entender o q eu quero agora?

vlw

[Decio]

e se você tentar colocar um Resume Next no final da função continua ? será que funciona??

[Lucas Phillip]

não da porque o erro acontece num if... então se eu coloco resume next, só piora a situação porque simplesmente ignora o if, executando sempre tudo q ta dentro dele

entendam q não precisa acontecer nada quando tiver erro.. eu quero q ele simplesmente seja ignorado e o programa continue funcionando normalmente...

[Lucas Phillip]

ae.. acabo q eu consegui fazer uma gambiarra la com resume next... isso ainda vai me dar problemas no futuro, mas pelo menos resolveu por enquanto...

falou

[Decio]

pois é , eu tambem não sou adepto do resume next, mas é melhor do que erros mal resolvidos na sua aplicação.